-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Hi Enoch,

> Shouldn't ALSO be corrected as follows:

ANS94 has in section 16.6.2.0715 ALSO the following specification

"Transform the search order consisting of widn, ... wid2, wid1 (where
wid1 is searched first) into widn, ... wid2, wid1, wid1. An ambiguous
condition exists if there are too many word lists in the search order."

Essentially a DUP on the search order stack with a weak stack overflow
check.

Your code does something different, reminds to what vocabulary
(not part of ANS94) is made for.

your example should better be written as

 > vocabulary liby
 > only also liby

or
 > wordlist constant liby
 > only also
 > get-order swap drop liby swap set-order

vocubulary's runtime destroys the top-of-searchorderstack, not
what I'd have invented myself.

vocabulary.frt is in the lib directory.

Finally: Your idea is great, but I can't accept your patch ;)

In my internal code base I have a few words for word-list management
that did not found their way to the public repo. Mostly because
they are suggested by some people who got punished after publishing
them (mostly on clf). I don't like to be punished ;)

 : >order  ( wid -- )  >r get-order r> swap 1+ set-order ;
 : order>  ( -- wid )  get-order swap >r 1- set-order r> ;


Matthias

-----BEGIN PGP SIGNATURE-----
Version: GnuPG v1.4.11 (GNU/Linux)
Comment: Using GnuPG with Thunderbird - http://www.enigmail.net/

iEYEARECAAYFAlLk09MACgkQ9bEHdGEMFjN2twCgxwr7/ZIbFXi7hmTA+ZzRiO31
Tb8AoMwMU0eJmofApr6k+9UGTHm/V21I
=Gren
-----END PGP SIGNATURE-----

------------------------------------------------------------------------------
CenturyLink Cloud: The Leader in Enterprise Cloud Services.
Learn Why More Businesses Are Choosing CenturyLink Cloud For
Critical Workloads, Development Environments & Everything In Between.
Get a Quote or Start a Free Trial Today.
http://pubads.g.doubleclick.net/gampad/clk?id=119420431&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