RosettaCodeData/Task/Memory-allocation/BBC-BASIC/memory-allocation-2.basic

10 lines
191 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
size% = 12345
PROCstack(size%)
END
DEF PROCstack(s%)
LOCAL mem%
DIM mem% LOCAL s%-1
PRINT ; s% " bytes of stack allocated at " ; mem%
ENDPROC