Changeset 14331


Ignore:
Timestamp:
Oct 5, 2010, 10:48:27 AM (9 years ago)
Author:
gb
Message:

Bootstrapping: replace unused operators with new ones for ASH, LOGNOT.
(More to come.)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/compiler/nxenv.lisp

    r14235 r14331  
    9898     (%i- . #.(logior operator-single-valued-mask operator-assignment-free-mask operator-acode-subforms-mask operator-side-effect-free-mask))
    9999     (cxxr . #.(logior operator-single-valued-mask operator-assignment-free-mask operator-acode-subforms-mask operator-side-effect-free-mask))
    100      (%dfp-combine . 0)
     100     (ash . #.(logior operator-single-valued-mask operator-assignment-free-mask operator-assignment-free-mask operator-acode-subforms-mask operator-side-effect-free-mask))
    101101     (%ilsl . #.(logior operator-single-valued-mask operator-assignment-free-mask operator-assignment-free-mask operator-acode-subforms-mask operator-side-effect-free-mask))
    102102     (%ilogand2 . #.(logior operator-single-valued-mask operator-assignment-free-mask operator-acode-subforms-mask operator-side-effect-free-mask))
     
    113113     (%fixnum-ref-natural . #.operator-single-valued-mask)
    114114     (%current-tcr . #.operator-single-valued-mask)
    115      (%stack-trap . #.operator-single-valued-mask)
     115     (%ilognot . #.(logior operator-single-valued-mask operator-assignment-free-mask operator-acode-subforms-mask operator-side-effect-free-mask operator-cc-invertable-mask))
    116116     (multiple-value-prog1 . 0)
    117117     (multiple-value-bind . 0)
Note: See TracChangeset for help on using the changeset viewer.