home *** CD-ROM | disk | FTP | other *** search
/ CD Shareware Magazine 1996 December / CD_shareware_12-96.iso / DOS / Programa / CCDL122.ZIP / CLIBS / COMPLIB / 68K / 68MODS.SRC < prev    next >
Encoding:
Text File  |  1996-07-31  |  212 b   |  20 lines
  1.     section code
  2.     XDEF __mods
  3.     XREF    lludiv
  4. __mods:
  5.     move.l    (8,A7),D1
  6.     bpl.b    n1
  7.     neg.l    d1
  8. n1:
  9.     move.l    (4,A7),D0
  10.     bpl.b    n2
  11.     neg.l    d0
  12. n2:
  13.     move.l    D0,D2
  14.     eor.l    D1,D2
  15.     bsr    lludiv
  16.     MOVE.l    d1,d0
  17.     rts
  18.  
  19.  
  20.