diff options
| author | Aryadev Chavali <aryadev@aryadevchavali.com> | 2025-07-09 21:31:43 +0100 |
|---|---|---|
| committer | Aryadev Chavali <aryadev@aryadevchavali.com> | 2025-07-10 00:08:23 +0100 |
| commit | cd6ac8930db6ad3b866b4b8398a25b49c3767a5b (patch) | |
| tree | b7d85e0845f1d0aa1b17ee3a0105823190bba4be /lib/macros.lisp | |
| parent | 062b5f59d74bda9710c3b532648658a4a7910290 (diff) | |
| download | cantedraw-cd6ac8930db6ad3b866b4b8398a25b49c3767a5b.tar.gz cantedraw-cd6ac8930db6ad3b866b4b8398a25b49c3767a5b.tar.bz2 cantedraw-cd6ac8930db6ad3b866b4b8398a25b49c3767a5b.zip | |
Overhaulmaster
Loads of changes, some which I wasn't sure what I was on when doing
them
Diffstat (limited to 'lib/macros.lisp')
| -rw-r--r-- | lib/macros.lisp | 5 |
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))) |