home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 466.lha / AztecArp_v1.9 / Source.LZH / dospkt.asm < prev    next >
Assembly Source File  |  1990-12-05  |  352b  |  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.     pea    (a6)
  19.     move.l    _ArpBase,a6
  20.     jsr    -318(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.