summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2015-07-06 19:47:35 -0700
committerKaz Kylheku <kaz@kylheku.com>2015-07-06 19:47:35 -0700
commit1e1d6176ebac760a396caf705acfb2feab371068 (patch)
tree76888621865d8f8b11023bcaa47fdd6730cc6713
parent3bacbe6a822251fea2e5fd0bc68e54e36f673b4c (diff)
downloadtxr-1e1d6176ebac760a396caf705acfb2feab371068.tar.gz
txr-1e1d6176ebac760a396caf705acfb2feab371068.tar.bz2
txr-1e1d6176ebac760a396caf705acfb2feab371068.zip
* txr.1: Replace callf example under mapf.
-rw-r--r--txr.15
1 files changed, 2 insertions, 3 deletions
diff --git a/txr.1 b/txr.1
index 22503b64..378169cd 100644
--- a/txr.1
+++ b/txr.1
@@ -23497,10 +23497,9 @@ The following equivalence holds:
.TP* Example:
.cblk
- ;; Keep those pairs which are two of a kind
+ ;; Add the squares of 2 and 3
+ [[mapf + [dup *] [dup *]] 2 3] -> 13
- (keep-if [callf eql first second] '((1 1) (2 3) (4 4) (5 6)))
- -> ((1 1) (4 4))
.cble
.SS* Input and Output (Streams)