Hello Matthias,

Your latest commit to "Speed up defers. And save some code space."
breaks my _private word list _scope. Compliation hangs. I am sure you'll
figure out why faster.

TIA, Enoch.

-----------------------------------------------------------------

wordlist constant _private

get-order _private -rot 1+ set-order    \ 2nd on search order

: _scope  ( addr len -- addr' len' wid ) 
   2dup
   1 >  if                              \ name length check
      s" _" tuck icompare  if           \ name prefix check
         _private exit                  \ no name change
      then
   else
      drop
   then
   [ ' wlscope defer@ ] literal execute
;

' _scope is wlscope

-----------------------------------------------------------------


------------------------------------------------------------------------------
Rapidly troubleshoot problems before they affect your business. Most IT 
organizations don't have a clear picture of how application performance 
affects their revenue. With AppDynamics, you get 100% visibility into your 
Java,.NET, & PHP application. Start your 15-day FREE TRIAL of AppDynamics Pro!
http://pubads.g.doubleclick.net/gampad/clk?id=84349831&iu=/4140/ostg.clktrk
_______________________________________________
Amforth-devel mailing list for http://amforth.sf.net/
Amforth-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/amforth-devel

Reply via email to