FYI,  Better yet....

>> a: make object! [
[                Init: func [][
[                            d/e/f: system/words/a/b/c
[                            ]
[                b: make object! [
[                                c: "Object"
[                            ]
[                d: make object! [
[                            b: make object! [
[                                            c: "Second Object"
[                                            ]
[                            e: make object! [
[                                        f: none
[                                        ]
[                            ]
[            ]
>> a/init
== "Object"
>> a/d/e/f
== "Object"


JFYI.

Enjoy!!
Ammon




----- Original Message -----
From: "Gregg Irwin" <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Thursday, October 11, 2001 9:22 PM
Subject: [REBOL] Re: Backwards Navigation on path


> Hi Ammon,
>
> What about taking a slight detour? Create a prototype object and then wrap
> up object "instantiation" inside a function. Here's the idea:
>
> >> a: context [
> [        b: context [c: none]
> [        d: context [
> [                b: context [c: none]
> [                e: context [f: none]
> [            ]
> [    ]
> >>
> >> make-a: does [
> [        make a [
> [                self/b/c: "object"
> [                self/d/b/c: "second object"
> [                self/d/e/f: self/b/c
> [            ]
> [    ]
> >> aa: make-a
> >> aa/d/e/f
> == "object"
>
> Will that approach work for you or am I still off track?
>
> --Gregg
>
> --
> To unsubscribe from this list, please send an email to
> [EMAIL PROTECTED] with "unsubscribe" in the
> subject, without the quotes.

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

Reply via email to