[REBOL] Re: Rebol/Gotcha Handling previously defined words
From: tim::johnsons-web::com at: 10-Dec-2003 20:45
* Volker Nitsch <[nitsch-lists--netcologne--de]> [031210 12:08]:
> Am Mittwoch 10 Dezember 2003 20:30 schrieb Tim Johnson:
>
> Quickly fixing myself:
> (forgot return-value, added object to checklist)
Hiya Volker:
That looks like the right track to me.
Must check that out as soon as I'm done waltzing
with the snake.
Thanks very much!
tim
> my.context: func [[catch] block /local ctx] [
> ctx: context block
> foreach word first ctx [
> if all [
> value? w: in system/words word
> any [
> ; add your checks here
> any-function? get w
> object? get w
> ]
> ] [
> throw make error! join "You don't want to redefine this: " word
> ]
> ]
> ctx ; oops, never forget return value..
> ]
>
> ctx: my.context [a: b: none]
> ? ctx
> ctx2: my.context [a: reduce: none]
>
> > TIA
>
> -Volker
>
> --
> To unsubscribe from this list, just send an email to
> [rebol-request--rebol--com] with unsubscribe as the subject.
--
Tim Johnson <[tim--johnsons-web--com]>
http://www.alaska-internet-solutions.com