home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Programming / powerd / lib / powerd.lha / powerd_ppc / StrCopy.ass < prev    next >
Encoding:
Text File  |  1980-10-15  |  340 b   |  23 lines
  1.  
  2. # StrCopy(r3:PTR TO CHAR,r4:PTR TO CHAR,r5=-1:LONG)
  3.  
  4.     .text
  5.     .global    _StrCopy
  6.  
  7. _StrCopy:
  8.     subi    r6,r3,1
  9.     subi    r4,r4,1
  10. .loop:    lbzu    r0,1(r4)
  11.     stbu    r0,1(r6)
  12.     mr.    r0,r0
  13.     beq    .finish
  14.     subi    r5,r5,1
  15.     mr.    r5,r5
  16.     bne    .loop
  17.     li    r0,0
  18.     stb    r0,1(r6)
  19. .finish:    blr            # r3 contains dest string pointer
  20.  
  21.     .type    _StrCopy,@function
  22.     .size    _StrCopy,$-_StrCopy
  23.