: [entry]
HERE @ ( w h )
SWAP SCPY ( h )
HERE @ SWAP - ( sz )
( write prev value )
HERE @ CURRENT @ - ,
C, ( write size )
HERE @ CURRENT !
;
: (entry) WORD [entry] ;