home *** CD-ROM | disk | FTP | other *** search
/ Atari FTP / ATARI_FTP_0693.zip / ATARI_FTP_0693 / Mint / mntlib32.zoo / lattice / linea.s < prev    next >
Text File  |  1993-05-23  |  315b  |  25 lines
  1.     INCLUDE    inc.i
  2.     
  3. ; Line A bindings for Lattice C
  4.  
  5.     XDATA
  6.     xref    ___aline,___fonts,___funcs
  7.     
  8.     XFUNC
  9.     IF    _REGARG
  10.     xdef    @linea0
  11. @linea0:
  12.     ELSE
  13.     xdef    _linea0
  14. _linea0:
  15.     ENDC
  16.     
  17.     movem.l    d2/a2,-(sp)
  18.     dc.w    $A000
  19.     move.l    a0,___aline
  20.     move.l    a1,___fonts
  21.     move.l    a2,___funcs
  22.     movem.l    (sp)+,d2/a2
  23.     rts
  24.     end
  25.