aboutsummaryrefslogtreecommitdiff
path: root/src/interp/pf2sex.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-08-06 21:17:36 +0000
committerdos-reis <gdr@axiomatics.org>2011-08-06 21:17:36 +0000
commit89674096006b286c3c20e0969c493e7f42b56365 (patch)
treefe8fe5485d0fed3e41943833f387f1dccd57148a /src/interp/pf2sex.boot
parent2a44af7ae10c039f26cea6767df41d73a3d795a0 (diff)
downloadopen-axiom-89674096006b286c3c20e0969c493e7f42b56365.tar.gz
cleanup
Diffstat (limited to 'src/interp/pf2sex.boot')
-rw-r--r--src/interp/pf2sex.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/pf2sex.boot b/src/interp/pf2sex.boot
index b531026b..30e619ff 100644
--- a/src/interp/pf2sex.boot
+++ b/src/interp/pf2sex.boot
@@ -473,7 +473,7 @@ patternVarsOf expr ==
patternVarsOf1(expr, varList) ==
null expr => varList
- atom expr =>
+ expr isnt [.,:.] =>
not symbol? expr => varList
SymMemQ(expr, varList) => varList
[expr, :varList]