diff options
author | Colin Okay <cbeok@protonmail.com> | 2020-07-15 09:09:51 -0500 |
---|---|---|
committer | Colin Okay <cbeok@protonmail.com> | 2020-07-15 09:09:51 -0500 |
commit | b072097c20373d0d6d7698b3d5593235ca2e2128 (patch) | |
tree | 5d21e89729af57c768e92b003e715761b4fe7f01 | |
parent | 63c5598b3de4b9aace0ad9f5a130a1dcc38c1132 (diff) |
inflate! example in README updated
-rw-r--r-- | README.md | 16 |
1 files changed, 8 insertions, 8 deletions
@@ -236,14 +236,14 @@ Here are some simple examples of their use: (0 2 4 6 8) ;; generate (times N) for each N in the range 1 to 4 -> (collect (inflate! #'times (range :from 1 :to 4 :inclusive t))) -(0 0 1 0 1 2 0 1 2 3) - -;; In the above example, you can see that -;; first 0 is generated (times 1) -;; then 0 1 (times 2) -;; then 0 1 2 (times 3) -;; and finally 0 1 2 3 (times 4) +> (for x (inflate! #'times (range :from 1 :to 4 :inclusive t)) + (when (zerop x) (terpri)) + (princ x) (princ #\Space)) + +0 ; (times 1) +0 1 ; (times 2) +0 1 2 ; (times 3) +0 1 2 3 ; (times 4) ``` |