Monday 9 December 2013

Rebol LAB Zero to perfect #1

Try #1:

rebol[]

visitor: [2 4 6 4 2 4 6]
view: ask ["when?"]
visitor.int: to-integer view
print visitor/visitor.int
halt


Error:
when?1
** Script Error: Invalid path value: visitor.int
** Near: print visitor/visitor.int
halt



Try #2:
rebol[]

visitor: [1 2 3 2 1 2 3]
view: ask ["when?"]
visitor.int: to-integer view
print visitor/:visitor.int
halt

Error #1 (still have error when view = words):
when?as
** Script Error: Invalid argument: as
** Where: to-integer
** Near: to integer! :value

Pefect!
rebol[]

visitor: [2 4 6 4 2 4 6]
view: ask ["when?"]
either visitor.int: attempt [to-integer view] [print visitor/:visitor.int][print "Gak terima huruf bro!"]
halt

No comments:

Post a Comment