CMP-INST-EMITTER in sparc backend

[Nikodemus Siivola]

Eric Marsden <email address hidden> via lists.sourceforge.net to sbcl-devel

Hi,

,----
| * (lisp-implementation-version)
| "1.0.51.36-8adca5c"
| * (lambda (p1)
| (declare (type (member #\x #\U173B #\f #\U000BED1B #\U) p1))
| (typep (the atom p1) '(eql #\U173B)))
| debugger invoked on a TYPE-ERROR:
| The value 5947 is not of type (OR NULL SB-C:TN (SIGNED-BYTE 13)).
| (SB-VM::CMP-INST-EMITTER
| #<SB-ASSEM:SEGMENT :TYPE :REGULAR>
| #<SB-C::VOP
| :INFO SB-VM::FAST-CHAR=/CHARACTER/C
| :ARGS #<SB-C:TN-REF
| :TN #<SB-C:TN P1!1[NL0]>
| :WRITE-P NIL
| :VOP SB-VM::FAST-CHAR=/CHARACTER/C>
| :RESULTS NIL
| :CODEGEN-INFO (#<SB-ASSEM:LABEL 1> NIL #\U173B)>
| #<SB-C:TN P1!1[NL0]>
| 5947)[:EXTERNAL]
`----

[Nikodemus Siivola (nikodemus)]

Oops, missed from the original copy:

Tested on Sparc64/Linux.

[Paul Khuong (pvk)]

FIxed in b2d132a Fix constant character comparisons for SPARC/sb-unicode .