Mailing List Archive: 49091 messages
  • Home
  • Script library
  • AltME Archive
  • Mailing list
  • Articles Index
  • Site search

[REBOL] Re: view indirection

From: ingo:2b1 at: 20-Nov-2001 19:43

Hi Patrick, Once upon a time Patrick Philipot spoketh thus:
> set-check: func [n [integer!] /local code ][ > code: copy "" > code: join join "set in c" n join " 'data true show c" n > print ["generated code ; " code] > do code > ] > > IT IS WORKING ! (the print is only for debugging purpose). However I am not satisfied with this code. I'am looking for a more elegant way to do that. Something like : > > myCheckBox: guru-function( "c" 5) > myCheckbox/data: true
how about that one?
>> c1: make object! [data: none] >> probe c1
make object! [ data: none ]
>> guru-function: func [ s [string!] n [integer!]][
[ get to-word join s n [ ]
>> mc: guru-function "c" 1 >> mc/data: "yup"
== "yup"
>> probe c1
make object! [ data: "yup" ] And how 'guru-function works: 'join the string (s) and the integer (n) make a word out of it and get what you find under that word (without the 'get it would only return the name of the word 'c1, namely a word c1. With 'get, it returns the object!, c1 points too). I hope that helps Ingo