aboutsummaryrefslogtreecommitdiff
path: root/src/interp
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2012-05-24 15:27:03 +0000
committerdos-reis <gdr@axiomatics.org>2012-05-24 15:27:03 +0000
commit6a85fc5a253361e9f0782e9b1288e0c2c656896e (patch)
tree7ac7a9726c0210a4ae9a082e79ebe89760b44310 /src/interp
parent6daddccab40c5040b809d6c9842cdc7e9ae8cf8d (diff)
downloadopen-axiom-6a85fc5a253361e9f0782e9b1288e0c2c656896e.tar.gz
* boot/scanner.boot (lexerLineLength): New.
(shoeNextLine): Use it in replacement of $sz. (shoeLineToks): Likewise. (shoeLispEscape): Likewise. (shoeEsc): Likewise. (shoeStartsComment): Likewise. (shoeStartsNegComment): Likewise. (shoeNegComment): Likewise. (shoeComment): Likewise. (shoePossFloat): Likewise. (shoeSpace): Likewise. (shoeS): Likewise. (shoeW): Likewise. (shoeInteger1): Likewise. (shoeNumber): Likewise. (shoeExponent): Likewise.
Diffstat (limited to 'src/interp')
-rw-r--r--src/interp/database.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/database.boot b/src/interp/database.boot
index 61040869..33e024e1 100644
--- a/src/interp/database.boot
+++ b/src/interp/database.boot
@@ -60,9 +60,9 @@ pathToDatabase name ==
--%
structure %Constructor ==
- Record(name: %Symbol,kind: %ConstructorKind,abbrev: %Symbol,
+ Record(id: %Symbol,kind: %ConstructorKind,abbrev: %Symbol,
xparms: %List %Symbol) with
- constructorName == (.name)
+ constructorIdentifier == (.id)
constructtorKind == (.kind)
constructrorAbbreviation == (.abbrev)
constructorExplicitParameters == (.xparms)