Changeset 5115


Ignore:
Timestamp:
Sep 5, 2006, 4:06:36 AM (18 years ago)
Author:
Gary Byers
Message:

REQUIRE-CHAR-CODE: comparison of OBJECT with TAG is not a CMPI.

Location:
trunk/ccl/compiler/PPC
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/ccl/compiler/PPC/PPC32/ppc32-vinsns.lisp

    r5103 r5115  
    878878  (clrlwi. tag object (- ppc32::nbits-in-word ppc32::nlisptagbits))
    879879  (lis tag (ash #x110000 -16))
    880   (cmplwi crf1 object tag)
     880  (cmplw crf1 object tag)
    881881  (bne crf0 :bad)
    882882  (blt+ crf1 :got-it)

  • trunk/ccl/compiler/PPC/PPC64/ppc64-vinsns.lisp

    r5104 r5115  
    969969  (clrldi. tag object (- ppc64::nbits-in-word ppc64::nlisptagbits))
    970970  (lis tag (ash #x110000 -16))
    971   (cmpldi crf1 object tag)
     971  (cmpld crf1 object tag)
    972972  (bne crf0 :bad)
    973973  (blt+ crf1 :got-it)
Note: See TracChangeset for help on using the changeset viewer.