Changeset 11503


Ignore:
Timestamp:
Dec 11, 2008, 5:16:32 PM (11 years ago)
Author:
gz
Message:

%init-misc fix (r11428 from trunk)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/working-0711/ccl/level-0/X86/x86-array.lisp

    r10972 r11503  
    143143             (%init-ivector-u16 len
    144144                                (logand (the (signed-byte 16)
    145                                           (require-type val '(unsigned-byte 16)))
     145                                          (require-type val '(signed-byte 16)))
    146146                                        #xffff)
    147147                                uvector))
Note: See TracChangeset for help on using the changeset viewer.