home *** CD-ROM | disk | FTP | other *** search
/ Amiga ISO Collection / AmigaUtilCD2.iso / Programming / C / OTL-MC6.DMS / in.adf / libsrc.lha / LIBSRC / system.asm < prev    next >
Encoding:
Assembly Source File  |  1994-04-16  |  404 b   |  30 lines
  1.  
  2. * Maxon C++
  3. * Library-Modul "System"
  4. * Jens Gelhar 28.01.92, 16.04.94
  5.  
  6.     xref    _DOSBase
  7.  
  8.     xdef    _system,system__PCc
  9.  
  10. SystemTagList    = -606
  11.  
  12. _system:
  13. system__PCc:
  14.     movem.l    d2/a6,-(a7)
  15.     move.l    _DOSBase,a6
  16.     cmp.w    #36,20(a6)        ; mindestens V36
  17.     blt.b    fail
  18.     move.l    2*4+4(a7),d1
  19.     beq.b    fail
  20.     move.l    #taglist,d2
  21.     jsr    SystemTagList(a6)
  22.     bra.b    ret
  23. fail    moveq    #-1,d0
  24. ret    movem.l    (a7)+,d2/a6
  25.     rts
  26.  
  27. taglist    dc.l 0
  28.  
  29.     end
  30.