I really like your function Thomas. Very good!
Brett.
----- Original Message -----
From: <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Monday, July 24, 2000 1:03 PM
Subject: [REBOL] context exploration
Hello,
While playing with contexts, I threw together this little function to show
the words that are defined in a context (and their values in that context).
(something like that have been discussed before AFAIR, but a 1min. search
didn't find it, sooo :-)
It goes like this:
show-context: func [word [word!]] [
foreach x-word next first system/words [
if value? bind x-word :word [
print [:x-word "|" get bind x-word :word]
]
]
]
Attached is a script that demonstrates the use of the function with contexts
created with func, use and make object!
Best regards
Thomas Jensen