Further to my earlier email on this please find attached the actual terminal output when I try to load ((
ok > \ keep the previously active forth-recognizer stack ok > variable old-f-rs ok > wordlist constant comment-actions ok > ok > get-current ok > comment-actions set-current ok > ok > \ only words in this wordlist are executed inside comments ok > \ at least the )) is needed. ok > ok > \ switch back to the saved recognizer stack ok > : )) ok old-f-rs @ to forth-recognizer ok; immediate ok > ok > \ that's all for the comment actions ok > set-current ok > ok > \ every word found is fine. Even the ones that are not found ok > \ in the dictionary ok > ' noop dup dup dt:token: r:skip ok > : rec:skip ( addr len -- r:skip ) 2drop r:skip ; ok > ok > \ search only in the comment-actions wordlist ok > : rec:comment-actions ( addr len -- xt +/-1 r:word | r:fail ) ok comment-actions search-wordlist ( xt +/-1 | 0 ) ok ?dup if dt:xt else dt:null then ok; ok > ok > \ a simple two-element recognizer stack ok > 2 rec-stack constant rs:comment ok > ' rec:skip ' rec:comment-actions 2 rs:comment set-recognizers ------------------------------------------------------------------------------ Check out the vibrant tech community on one of the world's most engaging tech sites, Slashdot.org! http://sdm.link/slashdot _______________________________________________ Amforth-devel mailing list for http://amforth.sf.net/ Amforth-devel@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/amforth-devel
