On 2013-06-21 12:14AM, Marcos Cruz wrote:
>: (everychar)   ( key -- key )  dup bl <> and  ;
>' (everychar) is everychar

You're *removing* the existing functionality of everychar -- I'd guess
that's what's screwing it up.  Try this:

: (everychar)  defers everychar  dup bl <> and ;

Works for me, anyway...

--Josh

Reply via email to