aboutsummaryrefslogtreecommitdiff
path: root/lib/macros.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lib/macros.lisp')
-rw-r--r--lib/macros.lisp5
1 files changed, 5 insertions, 0 deletions
diff --git a/lib/macros.lisp b/lib/macros.lisp
index c60b867..2c4bdd8 100644
--- a/lib/macros.lisp
+++ b/lib/macros.lisp
@@ -124,3 +124,8 @@ sequentially via ->>"
(defmacro alist-val (key alist)
"Helper macro for getting the value of KEY in ALIST."
`(cdr (assoc ,key ,alist)))
+
+(defmacro call-rev (func-name &rest arguments)
+ "Call a function with arguments but in reverse
+i.e. (call-rev f x1 x2 ... xn) => (f xn ... x2 x1)."
+ `(,func-name ,@(reverse arguments)))