RosettaCodeData/Task/Variable-size-Get/Forth/variable-size-get-1.fth

3 lines
91 B
Forth
Raw Permalink Normal View History

2019-09-12 10:33:56 -07:00
: .CELLSIZE ( -- ) CR 1 CELLS . ." Bytes" ;
VARIABLE X ( creates a variable 1 cell wide)