--- gforth/stuff.fs 2004/11/28 20:35:06 1.38 +++ gforth/stuff.fs 2004/12/01 10:02:59 1.39 @@ -289,6 +289,8 @@ AUser CSP \ defer stuff +[ifundef] defer@ : defer@ >body @ ; [then] + :noname ' defer@ ; :noname postpone ['] postpone defer@ ; interpret/compile: action-of ( interpretation "name" -- xt; compilation "name" -- ; run-time -- xt ) \ gforth