home *** CD-ROM | disk | FTP | other *** search
/ CD Shareware Magazine 1996 December / CD_shareware_12-96.iso / DOS / Programa / CCDL122.ZIP / CLIBS / STRING / 68K / MEMMOVE.SRC < prev    next >
Encoding:
Text File  |  1996-08-02  |  316 b   |  22 lines
  1.     XDEF _memmove
  2.     section code
  3. _memmove:
  4.     move.l    (8,a0),d1    ; count
  5.     move.l    (4,a0),a1    ; src
  6.     move.l    (a0),a0        ; dest
  7.     move.l    a0,d0        ; dest
  8.     cmp.l    a1,a0
  9.     bcc    negmove
  10. lp:
  11.     move.b    (a1)+,(a0)+
  12.     subq    #1,d1
  13.     bne    lp
  14.     rts
  15. negmove:
  16.     add.l    d1,a1
  17.     add.l    d1,a0
  18. lp1:
  19.     move.b    -(a1),-(a0)
  20.     subq    #1,d1
  21.     bne    lp1
  22.     rts