Re: [Amforth] wordlist scope

[Matthias T. <mt...@we...>]

Hi Enoch,

looks fine 

GIve me some more days to think about it (Im currently
busy with other things) I find the sequence "(create) !e" 
sligthly strange. Your smudge change from an simple 
XT to WID-XT makes sense.

Matthias

> Hello Matthias & All:
> 
> wlscope, "wordlist scope", is a deferred word which enables AmForth appl
> to choose the wordlist for a new voc entry based on its name.  For
> example, put all created words whose name begins with a tilde (~) on a
> private wordlist. The default action is get-current.
> 
> Please find in <http://pastebin.com/KEWfnWNz> a tested new patch for
> your review against AmForth r1400. This patch enables do the following:
> 
> ======================================================================
> 
> wordlist constant private
> 
> : scope  ( c-addr u -- c-addr u wid )
> 
>    over c@ [char] ~ =  if
>       private
>    else
>       get-current
>    then
> ;
> 
> ' scope is wlscope
>