1)简单的宏
CL-USER> (defmacro print-test (x y)
`(format t "~A ~A~%" ,x ,y))
PRINT-TEST
CL-USER> (print-test 'hello 'world)
HELLO WORLD
NIL
2)
3)
1)简单的宏
CL-USER> (defmacro print-test (x y)
`(format t "~A ~A~%" ,x ,y))
PRINT-TEST
CL-USER> (print-test 'hello 'world)
HELLO WORLD
NIL
2)
3)
转载于:https://my.oschina.net/u/241930/blog/602136