Screening multiple refinements
[1/3] from: tim::johnsons-web::com at: 14-Sep-2000 21:19
Hello:
How may a rebol function check to see whether or
not it is a defined function i.e:
cursor: func[/eof /bof ] ;eof and bof would be allowable refinements
[ ; code here]
cursor/top ; would be an error
TIA
Tim
[2/3] from: al:bri:xtra at: 15-Sep-2000 17:50
Tim asked:
> How may a rebol function check to see whether or not it is a defined
function i.e:
> cursor: func[/eof /bof ] ;eof and bof would be allowable refinements
> [ ; code here]
>
> cursor/top ; would be an error
>> cursor: func [/eof /bof] [
[ if eof [print "eof refinement"]
[ if bof [print "refinement: bof"]
[ ]
>> cursor
== none
>> cursor/eof
eof refinement
== none
>> cursor/top
** Script Error: cursor has no refinement called top.
** Where: cursor/top
Andrew Martin
Hyposonic Rebolutionary...
ICQ: 26227169
http://members.ncbi.com/AndrewMartin/
http://members.xoom.com/AndrewMartin/
[3/3] from: tim:johnsons-web at: 14-Sep-2000 22:16
Thanks Al:
:)
[Al--Bri--xtra--co--nz] wrote: