Changeset 15456


Ignore:
Timestamp:
Sep 1, 2012, 5:05:47 PM (8 years ago)
Author:
wws
Message:

ARM code for issue #1012. ARM compiler doesn't use the new VINSIN with my example, so untested.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/compiler/ARM/arm-vinsns.lisp

    r15425 r15456  
    12901290  (uuo-error-reg-not-xtype src (:$ arm::xtype-s8))
    12911291  :ok)
     1292
     1293(define-arm-vinsn (%unbox-s8 :predicatable)
     1294    (((dest :s8))
     1295     ((src :lisp)))
     1296  (mov dest (:$ #xff))
     1297  (and dest dest (:asr src (:$ arm::fixnumshift))))
    12921298
    12931299(define-arm-vinsn unbox-base-char (((dest :u32))
Note: See TracChangeset for help on using the changeset viewer.