Changeset 9376


Ignore:
Timestamp:
May 6, 2008, 5:24:21 PM (11 years ago)
Author:
rme
Message:

Correct vinsn temps in fix-fixnum-overflow-ool{-and-branch}. Add PROVIDE.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/ia32/compiler/X86/X8632/x8632-vinsns.lisp

    r9265 r9376  
    10761076  (leal (:@ (:%l src) x8632::fixnumone) (:%l dest)))
    10771077
    1078 ;;; xxx
    10791078(define-x8632-vinsn (fix-fixnum-overflow-ool :call)
    10801079    (((val :lisp))
    10811080     ((val :lisp))
    1082      ((unboxed (:s32 #.x8632::edx))
    1083       (header (:u32 #.x8632::imm0))
     1081     ((unboxed (:s32 #.x8632::imm0))
     1082      ;; we use %mm0 for header in subprim
    10841083      (entry (:label 1))))
    10851084  (jno.pt :done)
     
    10951094  :done)
    10961095
    1097 ;;; xxx
    10981096(define-x8632-vinsn (fix-fixnum-overflow-ool-and-branch :call)
    10991097    (((val :lisp))
    11001098     ((val :lisp)
    11011099      (lab :label))
    1102      ((unboxed (:s32 #.x8664::imm1))
    1103       (header (:u32 #.x8664::imm0))
     1100     ((unboxed (:s32 #.x8632::imm0))
     1101      ;; we use %mm0 for header in subprim
    11041102      (entry (:label 1))))
    11051103  (jno.pt lab)
     
    37963794  x86::*x86-opcode-template-lists*))
    37973795
     3796(provide "X8632-VINSNS")
Note: See TracChangeset for help on using the changeset viewer.