I've been fooling around inside REBOL functions and came across this
unexpected behaviour:

>> Spec: func ['f /Set Block [block!]] [either Set [insert clear first
get f Block] [first get f]]
>> Body: func ['f /Set Block [block!]] [either Set [insert clear second
get f bind Block first spec :f] [second get f]]
>>
>> f: func [test] [print test]
>> f 12
12
>> body f
== [print test]
>> rebol/version
== 2.2.0.3.1
>> body/set f [print ["Test:" test]]


REBOL caused an invalid page fault in
module REBOL.EXE at 0137:00402fbb.
Registers:
EAX=000010d0 CS=0137 EIP=00402fbb EFLGS=00010212
EBX=0000010d SS=013f ESP=0065fa48 EBP=0065fa68
ECX=0080221c DS=013f ESI=00db8638 FS=21ff
EDX=00000000 ES=013f EDI=000003f9 GS=0000
Bytes at CS:EIP:
8b 4f 08 8b 51 08 8b c2 80 38 00 74 20 3b 58 0c 
Stack dump:
00dc2b08 00db8638 00821cf4 0040307b 000003f9 00db8638 00000000 00821ce4
00000000 0040a19d 000003f9 00db8638 00000000 007820e4 00824be0 0065fabc


Andrew Martin
Burning REBOL...
[EMAIL PROTECTED]
http://members.xoom.com/AndrewMartin/
Online @ 33,600 Baud!
-><-

Reply via email to