diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2020-03-11 22:30:44 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2020-03-11 22:30:44 -0700 |
commit | 2ac521b48f9bc2f5f4bb6eb4b92eee9433e62995 (patch) | |
tree | 3beff3cecf7dd335af776f9673ad38316d8c1887 | |
parent | bbb650af0c211ef35580daecd975a096e71b0b3a (diff) | |
download | txr-2ac521b48f9bc2f5f4bb6eb4b92eee9433e62995.tar.gz txr-2ac521b48f9bc2f5f4bb6eb4b92eee9433e62995.tar.bz2 txr-2ac521b48f9bc2f5f4bb6eb4b92eee9433e62995.zip |
tags: missing eval in macro.
* tags.tl (static-when): Macro must explicitly reduce
expression to its value.
-rwxr-xr-x | tags.tl | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -148,7 +148,7 @@ (defvarl ftw-skip-subtree 0) (defmacro static-when (expr . body) - (when expr ^(progn ,*body))) + (when (eval expr) ^(progn ,*body))) (compile-only (let ((o (new tags-opts))) |