RosettaCodeData/Task/Variable-size-Get/Forth/variable-size-get-1.fth
2019-09-12 10:33:56 -07:00

2 lines
91 B
Forth

: .CELLSIZE ( -- ) CR 1 CELLS . ." Bytes" ;
VARIABLE X ( creates a variable 1 cell wide)