9 lines
269 B
Text
9 lines
269 B
Text
|
: (setq MyObject (new '(+MyClass))) # Create some object
|
||
|
|
-> $385605941
|
||
|
|
: (put MyObject 'newvar '(some value)) # Set variable
|
||
|
|
-> (some value)
|
||
|
|
: (show MyObject) # Show the object
|
||
|
|
$385605941 (+MyClass)
|
||
|
|
newvar (some value)
|
||
|
|
-> $385605941
|