aboutsummaryrefslogtreecommitdiff
path: root/src/interp/pf2sex.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/pf2sex.boot')
-rw-r--r--src/interp/pf2sex.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/pf2sex.boot b/src/interp/pf2sex.boot
index d760baa4..bdc6b70f 100644
--- a/src/interp/pf2sex.boot
+++ b/src/interp/pf2sex.boot
@@ -461,8 +461,8 @@ patternVarsOf expr ==
patternVarsOf1(expr, nil)
patternVarsOf1(expr, varList) ==
- NULL expr => varList
- ATOM expr =>
+ null expr => varList
+ atom expr =>
null symbol? expr => varList
SymMemQ(expr, varList) => varList
[expr, :varList]