here is the code that I used to test it
Code: Select all
(setq test (lambda (other)
(block (myvar)
(setq myvar (lambda (a b) (multiply a b)))
(dbgoutput (objSetData gplayership "mytest" myvar))
(dbgoutput (apply myvar (list 5 3)))
(dbgoutput (apply (objGetData gplayership "mytest") (list 5 3)))
)
))
True
15
[lambda
is this as intended?