diff options
| author | dos-reis <gdr@axiomatics.org> | 2011-04-17 16:55:39 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2011-04-17 16:55:39 +0000 |
| commit | 1642c3f8ce94264813f4d7ac79f24f16f5fb7ded (patch) | |
| tree | 9ad1840c79408767e5cac07c3c111f67928328f7 /src/interp/ax.boot | |
| parent | f7ba5aa3dec20e2371ff9be8c7a9973a3a08cba8 (diff) | |
| download | open-axiom-1642c3f8ce94264813f4d7ac79f24f16f5fb7ded.tar.gz | |
* boot/tokens.boot: Translate maxIndex to MAXINDEX.
Diffstat (limited to 'src/interp/ax.boot')
| -rw-r--r-- | src/interp/ax.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/ax.boot b/src/interp/ax.boot index 6f3fe6bd..4b38a678 100644 --- a/src/interp/ax.boot +++ b/src/interp/ax.boot @@ -332,12 +332,12 @@ getDefaultingOps catname == $infovec: local := getInfovec name opTable := $infovec.1 $opList:local := nil - for i in 0..MAXINDEX opTable repeat + for i in 0..maxIndex opTable repeat op := opTable.i i := i + 1 startIndex := opTable.i stopIndex := - i + 1 > MAXINDEX opTable => MAXINDEX getCodeVector() + i + 1 > maxIndex opTable => maxIndex getCodeVector() opTable.(i + 2) curIndex := startIndex while curIndex < stopIndex repeat |