Load these two function and run C:main, you will see that (eval(list(read(strcat "C:"
func))), returns the results of C:test function.
(defun C:main (/ func)
(setq func "test")
(eval(list(read(strcat "C:" func))))
(princ)
)
(defun C:test ()
(princ "\nEvaluated this function")
(princ)
)
--
"We can't solve problems by using the same kind
of thinking we used when we created them."
--Albert Einstein
Ken Alexander
Acad 2000
Windows XP Pro
"rlk" wrote in message news:f153b84.1@WebX.maYIadrTaRb...
> I'm sorry...I don't understand what's going on with this..