xincalpha.s 344 B

12345678910111213141516171819
  1. TEXT _xdec(SB), $-8
  2. MOVQ R0, R1 /* p */
  3. dec1:
  4. MOVLL (R1), R0 /* *p */
  5. SUBL $1, R0
  6. MOVQ R0, R2
  7. MOVLC R2, (R1) /* --(*p) */
  8. BEQ R2, dec1 /* write failed, retry */
  9. RET
  10. TEXT _xinc(SB), $-8
  11. MOVQ R0, R1 /* p */
  12. inc1:
  13. MOVLL (R1), R0 /* *p */
  14. ADDL $1, R0
  15. MOVLC R0, (R1) /* (*p)++ */
  16. BEQ R0, inc1 /* write failed, retry */
  17. RET