1 // compile.asm: WORD p_allot,'ALLOT',fasm
11 "ALLOT" is a function word that merely increments the <<p_here,HERE>>
12 variable with +n+ so as to claim that amount of the heap.
15 .Defintion concept for ALLOT
17 ( n -- ) : ALLOT HERE @ + HERE ! ;
22 .Usage example {counter:example}: claim 16 bytes for variable FOO
23 CREATE FOO DROP HERE @ 16 ALLOT