aboutsummaryrefslogtreecommitdiff
path: root/src/boot/parser.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2010-12-27 08:39:14 +0000
committerdos-reis <gdr@axiomatics.org>2010-12-27 08:39:14 +0000
commitdbbc18b48695c2339520e9ba1e640f7559ff2e8a (patch)
tree60e4dede3670bef78ad74415620c313fc12eba88 /src/boot/parser.boot
parent66c8612e257defa8e42bb7b50b0c88a73422e660 (diff)
downloadopen-axiom-dbbc18b48695c2339520e9ba1e640f7559ff2e8a.tar.gz
* boot/initial-env.lisp (IDENTP): Remove.
* boot/ast.boot: Replace IDENTP with symbol? where appropriate. * boot/parser.boot: Likewise. * boot/translator.boot: Likewise.
Diffstat (limited to 'src/boot/parser.boot')
-rw-r--r--src/boot/parser.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/boot/parser.boot b/src/boot/parser.boot
index 4d475238..14cbd4a0 100644
--- a/src/boot/parser.boot
+++ b/src/boot/parser.boot
@@ -1159,7 +1159,7 @@ bpOutItem()==
b:=bpPop1()
bpPush
b is ["+LINE",:.] => [ b ]
- b is ["L%T",l,r] and IDENTP l =>
+ b is ["L%T",l,r] and symbol? l =>
$InteractiveMode => [["SETQ",l,r]]
[["DEFPARAMETER",l,r]]
translateToplevel(b,false)