* 1+ ( val -- val+1 ) return the value incremented by one simulate: : 1+ 1 + ;
1+
( val -- val+1 )
simulate: : 1+ 1 + ;
core ordinary primitive