UNUSED
* UNUSED ( -- val )

return the number of cells that are left to be used
above >HERE

core ordinary primitive