Hello Matthias & all, [undefined] didn't work for me so I replaced it with the following definition. I guess it's something with "immediate".
Thanks, Enoch. svn diff lib/forth200x/defined.frt Index: lib/forth200x/defined.frt =================================================================== --- lib/forth200x/defined.frt (revision 1379) +++ lib/forth200x/defined.frt (working copy) @@ -1,4 +1,2 @@ - -\ from the proposal -: [defined] parse-name find-name dup if swap drop then ; immediate -: [undefined] [defined] 0= ; immediate +: [defined] parse-name find-name if drop -1 else 0 then ; immediate +: [undefined] parse-name find-name if drop 0 else -1 then ; immediate ------------------------------------------------------------------------------ Everyone hates slow websites. So do we. Make your web apps faster with AppDynamics Download AppDynamics Lite for free today: http://p.sf.net/sfu/appdyn_d2d_feb _______________________________________________ Amforth-devel mailing list for http://amforth.sf.net/ Amforth-devel@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/amforth-devel
