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

10 lines
191 B
Text
Raw Permalink Normal View History

2013-04-10 21:29:02 -07: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