Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search
 

[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