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)
© 著作权归作者所有