2 ; Ullrich von Bassewitz, 10.12.1998
4 ; Long int compare function - used by the compare operators
9 .importzp sp, sreg, ptr1
13 stx ptr1+1 ; EAX now in sreg:ptr1
36 plp ; Restore the flags
39 lda #$FF ; Set the N flag
42 L3: lda #$01 ; Clear the N flag