[REBOL] Re: Objects: Preventing Code Duplication Re:(9)

[giesse]

Hello [EMAIL PROTECTED]!

On 03-Dic-99, you wrote:

 i> To remind you, this is my version of !:

 i> !: func [object [object!] 'method ] [
 i>  set in object/methods 'object object
 i>  if error? try [return get in object/methods method] [return
 i> none] ]

To create simpler methods, why not binding them to the right
object at the right time?

Something like:

!: func [
    object [object!] 
    'method [word!]
    /local mth
] [
    ; let's skip error checking for clarity
    mth: get in object/methods method
    bind second :mth in object 'self
    return :mth
]
    
Regards,
    Gabriele.
-- 
o--------------------) .-^-. (----------------------------------o
| Gabriele Santilli / /_/_\_\ \ Amiga Group Italia --- L'Aquila |
| GIESSE on IRC     \ \-\_/-/ /  http://www.amyresource.it/AGI/ |
o--------------------) `-v-' (----------------------------------o