aboutsummaryrefslogtreecommitdiff
path: root/src/interp/parse.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2009-06-16 03:05:07 +0000
committerdos-reis <gdr@axiomatics.org>2009-06-16 03:05:07 +0000
commita47287421322670f8de068fdfa06c1e68844f2e0 (patch)
tree2011370b8161ecbc80b044e9877c68f052858fb6 /src/interp/parse.boot
parent3853f26115f242232720abb5252978de20b72c01 (diff)
downloadopen-axiom-a47287421322670f8de068fdfa06c1e68844f2e0.tar.gz
Fix SF/2396945
* interp/scan.boot: '@@' is no longer a keyword. * interp/cparse.boot (npColonQuery): Remove. * interp/parse.boot (parseAtAt): Likewise. * interp/postpar.boot (postAtAt): Likewise.
Diffstat (limited to 'src/interp/parse.boot')
-rw-r--r--src/interp/parse.boot6
1 files changed, 0 insertions, 6 deletions
diff --git a/src/interp/parse.boot b/src/interp/parse.boot
index 1886e924..2a93222d 100644
--- a/src/interp/parse.boot
+++ b/src/interp/parse.boot
@@ -197,11 +197,6 @@ parsePretend t ==
t isnt ["pretend",x,typ] => systemErrorHere ["parsePretend",t]
["pretend",parseTran x,parseType typ]
-parseAtAt: %ParseForm -> %Form
-parseAtAt t ==
- t isnt ["@@",x,typ] => systemErrorHere ["parseAtAt",t]
- ["@@",parseTran x,parseType typ]
-
parseHas: %ParseForm -> %Form
parseHas t ==
t isnt ["has",x,y] => systemErrorHere ["parseHas",t]
@@ -482,7 +477,6 @@ for x in [["<=", :"parseLessEqual"],_
["MDEF", :"parseMDEF"],_
["or", :"parseOr"],_
["pretend", :"parsePretend"],_
- ["@@",:"parseAtAt"],_
["SEGMENT", :"parseSegment"],_
["SEQ", :"parseSeq"],_
["VCONS", :"parseVCONS"],_