> -----Original Message-----
> From: [EMAIL PROTECTED] [mailto:[EMAIL PROTECTED]]On Behalf Of
> Gregg Irwin
> Sent: Friday, January 18, 2002 10:23 PM
> To: [EMAIL PROTECTED]
> Subject: [REBOL] Re: dbms3.r 01

> Can an object's spec block be extended, or
> modified, after it is created?

Hi, yes it can:

extend-object: func ['obj-word [word!] 'word [word!] value [any-type!] /local
the-obj][
                all [not object? the-obj: get obj-word make error! "No object 
provided."]

                if in the-obj word [
                        set in the-obj word value
                        return the-obj
                ]

                set obj-word make the-obj reduce [to-set-word word value]
]

--
Robert M. M�nch
IT & Management Freelancer
Mobile: +49 (0)177 2452 802
Fax   : +49 (0)721 8408 9112
Web   : http://www.robertmuench.de

-- 
To unsubscribe from this list, please send an email to
[EMAIL PROTECTED] with "unsubscribe" in the 
subject, without the quotes.

Reply via email to