home *** CD-ROM | disk | FTP | other *** search
/ The Fred Fish Collection 1.5 / ffcollection-1-5-1992-11.iso / ff_disks / 300-399 / ff376.lzh / AztecArp / Sources.LZH / dospkt.asm < prev    next >
Assembly Source File  |  1990-08-01  |  369b  |  32 lines
  1. * repair for aztec's dospkt() routine - now uses Arp library
  2.  
  3.     dseg
  4.  
  5.     public    _ArpBase
  6.     public    _errno
  7.  
  8.     cseg
  9.  
  10.     public    _LVOSendPacket
  11.     public    _dos_packet
  12.  
  13. _dos_packet:
  14.     move.l    4(sp),a1
  15.     move.l    8(sp),d0
  16.     lea.l    12(sp),a0
  17.  
  18.     move.l    a6,-(sp)
  19.     move.l    _ArpBase,a6
  20.     jsr    _LVOSendPacket(a6)
  21.     move.l    (sp)+,a6
  22.  
  23.     if INT16
  24.         move.w    d1,_errno
  25.     else
  26.         move.l    d1,_errno
  27.     endc
  28.  
  29.     rts
  30.  
  31.     end
  32.