diff options
author | dos-reis <gdr@axiomatics.org> | 2011-01-27 21:12:57 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2011-01-27 21:12:57 +0000 |
commit | a31c0a21788a17c1bce15120225bc5a15fa1da33 (patch) | |
tree | 5f5cea97cd52114dee92a8b66ca802e7fd0fab08 /src/interp/nrunopt.boot | |
parent | 8e0d0dbfa31e6a035ec5e954c192742ade763dda (diff) | |
download | open-axiom-a31c0a21788a17c1bce15120225bc5a15fa1da33.tar.gz |
Generate SVREF for simple vector slot refs.
Diffstat (limited to 'src/interp/nrunopt.boot')
-rw-r--r-- | src/interp/nrunopt.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/nrunopt.boot b/src/interp/nrunopt.boot index 635937a6..f15ed5f4 100644 --- a/src/interp/nrunopt.boot +++ b/src/interp/nrunopt.boot @@ -272,7 +272,7 @@ augmentPredCode(n,lastPl) == delta:=2 * delta; u) for x in pl] augmentPredVector(dollar,value) == - setShellEntry(dollar,3,value + QVELT(dollar,3)) + vectorRef(dollar,3) := value + vectorRef(dollar,3) isHasDollarPred pred == pred is [op,:r] => |