home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 22 / AACD 22.iso / AACD / Programming / powerd / lib / powerd.lha / powerd_ppc / SetEStr.ass < prev    next >
Encoding:
Text File  |  1980-03-26  |  224 b   |  18 lines

  1.  
  2.  
  3. # SetEStr(estr:r3:PTR TO CHAR,length:r4:LONG)
  4.  
  5.     .text
  6.     .global    _SetEStr
  7.  
  8. _SetEStr:    lhz    r0,-4(r3)
  9.     cmpw    r0,r4
  10.     bge    .end
  11.     sth    r4,-2(r3)
  12.     li    r0,0
  13.     stbx    r0,r3,r4
  14. .end:    blr
  15.  
  16.     .type    _SetEStr,@function
  17.     .size    _SetEStr,$-_SetEStr
  18.