(defmacro mymachine (expr)
`(if ,(eq expr 0)
nil
(progn
(print ,expr )
(mymachine ,(1- expr) )
)
)
)
(mymachien 10)
error follow
(setq chen 10)
(mymachine chen)
(defmacro mymachine (expr)
`(if ,(eq expr 0)
nil
(progn
(print ,expr )
(mymachine ,(1- expr) )
)
)
)
(mymachien 10)
error follow
(setq chen 10)
(mymachine chen)