diff options
author | dos-reis <gdr@axiomatics.org> | 2012-05-01 02:27:52 +0000 |
---|---|---|
committer | dos-reis <gdr@axiomatics.org> | 2012-05-01 02:27:52 +0000 |
commit | e37c877a8ad003972fc6c0206dc6220e266f0a8b (patch) | |
tree | 6a4dafe69f35f013172cdbf7b646064328380986 /src/interp/g-opt.boot | |
parent | 52d8ccbf25a71457f923860824696742328bdb35 (diff) | |
download | open-axiom-e37c877a8ad003972fc6c0206dc6220e266f0a8b.tar.gz |
* algebra/integer.spad.pamphlet (Integer): Use %iaddmod, %isubmod,
%imulmod.
* algebra/si.spad.pamphlet (SingleInteger): Likewise.
* interp/c-util.boot (devaluate): Use # in lieu of QVSIZE.
* interp/g-opt.boot: %ilfshift and %irshift are now builtin
side-effect free operations.
* interp/lisp-backend.boot: Translate them.
* interp/g-util.boot (mergeSort): Avoid QSDIFFERENCE.
* interp/slam.boot: Likewise.
* interp/sys-macros.lisp: Likewise.
* interp/macros.lisp: Avoid QVMAXINDEX.
* interp/vmlisp.lisp (QSDIFFERENCE): Remove.
(QSGREATERP): Likewise.
(QSLEFTSHIFT): Likewise.
(QSLESSP): Likewise.
(QSMAX): Likewise.
(QSMIN): Likewise.
(QSMINUS): Likewise.
(QSMINUSP): Likewise.
(QSODDP): Likewise.
(QSABSVAL): Likewise.
(QSPLUS): Likewise.
(QSZEROP): Likewise.
(QVMAXINDEX): Likewise.
(QVSIZE): Likewise.
(ZERO?): Likewise.
Diffstat (limited to 'src/interp/g-opt.boot')
-rw-r--r-- | src/interp/g-opt.boot | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/src/interp/g-opt.boot b/src/interp/g-opt.boot index fedbc988..775b3b8a 100644 --- a/src/interp/g-opt.boot +++ b/src/interp/g-opt.boot @@ -640,6 +640,7 @@ $VMsideEffectFreeOperators == %ilength %ibit %icst0 %icst1 %icstmin %icstmax %imul %iadd %isub %igcd %ilcm %ipow %imin %imax %ieven? %iodd? %iinc %idec %irem %iquo %idivide %idec %irandom %imulmod %iaddmod %isubmod + %ilshift %irshift %feq %flt %fle %fgt %fge %fmul %fadd %fsub %fexp %fmin %fmax %float? %fpowi %fdiv %fneg %i2f %fminval %fmaxval %fbase %fprec %ftrunc %fsqrt %fpowf %flog %flog2 %flog10 %fmanexp %fNaN? %fdecode |