Changeset 9913


Ignore:
Timestamp:
Jul 7, 2008, 3:29:06 PM (11 years ago)
Author:
gz
Message:

Propagate r9495 to trunk

File:
1 edited

Legend:

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

    r9887 r9913  
    61646164    (^)))
    61656165
     6166(defx862 x862-%valid-code-char %valid-code-char (seg vreg xfer c)
     6167  (let* ((reg (x862-one-untargeted-reg-form seg c x8664::arg_z)))
     6168    ;; Typecheck even if result unused.
     6169    (unless *x862-reckless* (! require-char-code reg))
     6170    (if vreg
     6171      (ensuring-node-target (target vreg)
     6172        (! code-char->char target reg)))
     6173    (^)))
     6174
    61666175(defun x862-eq-test (seg vreg xfer cc form1 form2)
    61676176  (with-x86-local-vinsn-macros (seg)
Note: See TracChangeset for help on using the changeset viewer.