(defmacro demo (expr)(print expr))(defmacro mymachine (exprs)`(if ,(eq exprs nil) nil (progn (demo ,(car exprs)) (mymachine ,(cdr exprs) ) )))
(mymachine ((defmacro demoinside (expr)(print expr))(defmacro mymachineinside (exprs)`(if ,(eq exprs nil) nil (progn (demoinside ,(car exprs)) (mymachineinside ,(cdr exprs) ) )))
(mymachineinside (
(print (+ 2 30) )(print (+ 3 4) ) ))))
