aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-map.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-10-03 02:10:23 +0000
committerdos-reis <gdr@axiomatics.org>2011-10-03 02:10:23 +0000
commit5a03f408233bf4e17759ace9a83dcf6012f72dcc (patch)
tree5af46b5ebca646527bb7ec115cfaaf68d5e00d23 /src/interp/i-map.boot
parenta2fd94946c6b380e2ee7ec242fd56aa4d52d9c92 (diff)
downloadopen-axiom-5a03f408233bf4e17759ace9a83dcf6012f72dcc.tar.gz
Cleanup.
Diffstat (limited to 'src/interp/i-map.boot')
-rw-r--r--src/interp/i-map.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-map.boot b/src/interp/i-map.boot
index 5a25e8e3..8261ac76 100644
--- a/src/interp/i-map.boot
+++ b/src/interp/i-map.boot
@@ -343,7 +343,7 @@ mkFormalArg(x,s) ==
isConstantArgument x ==
integer? x => x
- x is ["QUOTE",.] => x
+ x is ['QUOTE,.] => x
isPatternArgument x == x is ["construct",:.]