diff options
Diffstat (limited to 'src/combinator.lisp')
| -rw-r--r-- | src/combinator.lisp | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/combinator.lisp b/src/combinator.lisp index 3c1d21d..9f209c8 100644 --- a/src/combinator.lisp +++ b/src/combinator.lisp @@ -20,6 +20,11 @@ ;;;; Property combinators +(defprop noop :posix (&rest args) + "A property which accepts any number of arguments and does nothing." + (:desc (declare (ignore args)) "No-op property") + (:hostattrs (declare (ignore args)))) + (defmacro define-function-property-combinator (name args &body body) (multiple-value-bind (forms declarations docstring) (parse-body body :documentation t) |