aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorColin Okay <cbeok@protonmail.com>2020-08-13 13:11:54 -0500
committerColin Okay <cbeok@protonmail.com>2020-08-13 13:11:54 -0500
commit49380ae714f2a32ec440b5c2f5f52b67d5b30a03 (patch)
treeffbeddc1a931d608d3c5bba8db79c44f414777da
parent8d1808bac43b06e1b0b23061fafcfe01a7d763ca (diff)
comment
-rw-r--r--examples.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/examples.lisp b/examples.lisp
index 212bb21..8d9204c 100644
--- a/examples.lisp
+++ b/examples.lisp
@@ -12,6 +12,6 @@
#$(mapcar #'*
(loop :for i :upto (length $digits) :collect (1+ (mod i 2)))
$digits)
- #$(mapcar #$$(if (> $$x 9) (- $$x 9) $$x) $digits)
+ #$(mapcar #$$(if (> $$x 9) (- $$x 9) $$x) $digits) ;; <-- nested partial eval
#$(zerop (mod (apply #'+ $digits) 10))))