home *** CD-ROM | disk | FTP | other *** search
/ Aminet 3 / Aminet 3 - July 1994.iso / Aminet / dev / e / makeefile.lha / MakeEFile_and_src / Examples / PModules / astartup / exit.asm < prev    next >
Encoding:
Assembly Source File  |  1994-04-19  |  288 b   |  19 lines
  1. *
  2. * exit.asm -> exit.bin -> exit.e
  3. *
  4.     opt l-
  5.     include    exec/exec_lib.i
  6.  
  7.     movem.l    a2-5,-(sp)
  8.     cargs    #16,databaseptr.l
  9.  
  10.     movea.l    databaseptr(sp),a1
  11.     move.l    (a1),d0            ; database
  12.     beq.s    end
  13.     move.l    d0,a1
  14.     move.l    (a1),d0            ; sv_Size
  15.     movea.l    4.w,a6
  16.     jsr    _LVOFreeMem(a6)
  17.  
  18. end    movem.l    (sp)+,a2-5
  19.