home *** CD-ROM | disk | FTP | other *** search
/ The Best of Mecomp Multimedia 2 / MECOMP-CD-II.iso / amiga / tools / workbench / gurulog / src / clr.asm < prev    next >
Encoding:
Assembly Source File  |  1998-01-31  |  214 b   |  13 lines
  1. ; clr(mem,sze)
  2. ; clears sze bytes of memory starting at mem
  3.  
  4.     XDEF    clr_ii
  5. clr_ii    move.l    8(sp),a0    ; get m
  6.     move.l    a0,a1
  7.     add.l    4(sp),a1    ; get s
  8.     moveq    #0,d0
  9. .loop    cmp.l    a0,a1
  10.     beq.s    .exit
  11.     move.b    d0,(a0)+
  12. .exit    rts
  13.