RosettaCodeData/Task/Memory-allocation/BBC-BASIC/memory-allocation-2.bbc
Ingy döt Net db842d013d A-M baby
2013-04-10 21:29:02 -07:00

9 lines
191 B
Text

size% = 12345
PROCstack(size%)
END
DEF PROCstack(s%)
LOCAL mem%
DIM mem% LOCAL s%-1
PRINT ; s% " bytes of stack allocated at " ; mem%
ENDPROC