Thanks Larry, after some time of more experimenting, I also got it working
using the part from rebdoc.r (using if not unset? first vals ..), but your
routine was more clean and compact.
Maybe just a
word-list: make block! 500
in the beginning may speed it up, even if it's not slow..
If I'm not too lazy to write something around this routine (which is
probably easy enough to use stand-alone), I will creating something
that prints a report on new words after a function call (or a
code-snippet), maybe also check if some definition has changed.
/PeO
> Hi PeO
>
> This works:
>
> >> words-with-vals: has [word-list][
> word-list: copy []
> foreach word first rebol/words [
> if not error? try [get in rebol/words :word][append word-list word]
> ]
> word-list
> ]
>
> >> wv: words-with-vals
> == [unset! error! datatype! native! action! routine! op! function! object!
> struct! libr
> ary! port! any-type! any-word! any-function!...
>
> >> length? wv
> == 578
>
--
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the
subject, without the quotes.
