* CELL- ( addr -- addr' ) Decrement address by one cell : CELL- ( addr -- addr' ) CELL - ;
CELL-
( addr -- addr' )
: CELL- ( addr -- addr' ) CELL - ;
toolbelt ordinary primitive