Code: Select all
(defmacro foo-mac (name)
`(format t "mac ~A: ~S~%" ,name *b*))
Code: Select all
(defmacro foo-mac (name)
`(format t "mac ~A: ~S~%" ,name *b*))
Code: Select all
(let loop ((var1 value1) ... (varN valueN))
<body>)
Code: Select all
(labels ((loop (var1 ... varN)
<body>))
(loop value1 ... valueN))