Changeset 10507


Ignore:
Timestamp:
Aug 21, 2008, 9:18:30 AM (11 years ago)
Author:
gb
Message:

Need to handle :rcontext in X862-EXPAND-VINSN, too.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/compiler/X86/x862.lisp

    r10496 r10507  
    57815781                             "unknown vinsn label ~s" valform))))
    57825782                     ((atom valform) valform)
     5783                     ((eq (car valform) :rcontext)
     5784                      (if (>= (backend-lisp-context-register *target-backend*)
     5785                              x86::+x86-segment-register-offset+)
     5786                        (mapcar #'parse-operand-form `(:rcontext ,(cadr valform) nil nil nil))
     5787                        (mapcar #'parse-operand-form `(nil ,(cadr valform) :rcontext nil nil))))
    57835788                     ((atom (cdr valform)) (svref vp (car valform)))
    57845789                     ((eq (car valform) :@)
Note: See TracChangeset for help on using the changeset viewer.