diff options
| author | Gabriel Dos Reis <gdr@axiomatics.org> | 2015-12-26 02:10:51 -0800 |
|---|---|---|
| committer | Gabriel Dos Reis <gdr@axiomatics.org> | 2015-12-26 02:10:51 -0800 |
| commit | 6f164087ba2a3f6794f1c4a18a260350db4a0a55 (patch) | |
| tree | 97f8b3a8a5f4c4d4de60117ca0aa8319a9026a34 /src/interp/nruncomp.boot | |
| parent | ce399e9928fc1fed29dddecc6fac5484b9f755a5 (diff) | |
| download | open-axiom-6f164087ba2a3f6794f1c4a18a260350db4a0a55.tar.gz | |
Introduce opcode '%constant' in lieu of IDENTITY.
Diffstat (limited to 'src/interp/nruncomp.boot')
| -rw-r--r-- | src/interp/nruncomp.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/nruncomp.boot b/src/interp/nruncomp.boot index 32d1ca72..e35db5a9 100644 --- a/src/interp/nruncomp.boot +++ b/src/interp/nruncomp.boot @@ -338,7 +338,7 @@ descendCodeTran(db,u,condList) == u.first := '%list u.rest := nil domainRef(dbTemplate db,i) := - fn is 'IDENTITY => a + fn is '%constant => a fn is ['dispatchFunction,fn'] => fn' fn nil --code for this will be generated by the instantiator |