gforth/kernel/recognizer.fs - diff

Return to recognizer.fs CVS log

Up to [gforth] / gforth / kernel

version 1.10, 2011/10/06 21:02:57	version 1.11, 2011/10/06 21:12:29
Line 107 Variable forth-recognizer	Line 107 Variable forth-recognizer
['] compiler-r IS parser1 state on ;	['] compiler-r IS parser1 state on ;

: >postpone ( token table -- )	: >postpone ( token table -- )
dup r:fail = IF no.extensions THEN
>r r@ r>lit perform r> r>comp @ compile, ;	>r r@ r>lit perform r> r>comp @ compile, ;

: postpone ( "name" -- ) \ core	: postpone ( "name" -- ) \ core