home *** CD-ROM | disk | FTP | other *** search
-
- # StrCmp(r3:PTR TO CHAR,r4:PTR TO CHAR,r5=-1:LONG)
-
- .text
- .global _StrCmp
-
- _StrCmp:
- subi r3,r3,1
- subi r4,r4,1
- .loop: lbzu r0,1(r3)
- lbzu r6,1(r4)
- cmpw r6,r0
- bne .nosame # strings are different
- mr. r0,r0 # zero (eos) byte?
- beq .same
- subi r5,r5,1
- mr. r5,r5
- bne .loop
-
- .same: li r3,-1
- b .finish
- .nosame: li r3,0
- .finish: blr
-
- .type _StrCmp,@function
- .size _StrCmp,$-_StrCmp
-