[REBOL] How and when is bind useful? Re:(2)

[Al . Bri]

Here's a better example:
>> O: make object! [
[    F1: func [] [print "I'm F1"]
[    F2: func [] [print "And this is F2"]
[    set 'Dialect func [Dialect [block!]] [reduce bind Dialect 'F1]
[    ]
>> B: [F1 F2 F1]
== [F1 F2 F1]
>> Dialect B
I'm F1
And this is F2
I'm F1
== [unset unset unset]

Andrew Martin
Writing poetry on ICQ...
ICQ: 26227169
http://members.xoom.com/AndrewMartin/
-><-