RosettaCodeData/Task/Memory-allocation/FreeBASIC/memory-allocation-1.basic

6 lines
172 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
Dim As Integer size = 12345
Dim As Integer mem = size-1
Print size; " bytes of heap allocated at " ; mem
Clear (mem, , 10)
Print size; " bytes of heap allocated at " ; mem