Make defun-inline's lambda list more explicit
author |
Steve Losh <steve@stevelosh.com> |
date |
Sun, 26 Jul 2020 20:11:01 -0400 |
parents |
f077c455877a
|
children |
aee9ba1c4913
|
branches/tags |
(none) |
files |
src/chili-dogs.lisp |
Changes
--- a/src/chili-dogs.lisp Sun Dec 15 13:12:36 2019 -0500
+++ b/src/chili-dogs.lisp Sun Jul 26 20:11:01 2020 -0400
@@ -13,10 +13,10 @@
(declaim (notinline ,name))
',name))
-(defmacro defun-inline (name &body body)
+(defmacro defun-inline (name args &body body)
"Like `defun`, but declaims `name` to be `inline`."
`(progn
(declaim (inline ,name))
- (defun ,name ,@body)
+ (defun ,name ,args ,@body)
',name))