home *** CD-ROM | disk | FTP | other *** search
/ MACD 5 (Alt) / MACD 5.bin / workbench / tools / czesc_4 / smallmath / source / dcmp.a < prev    next >
Encoding:
Text File  |  1993-01-24  |  433 b   |  43 lines
  1.     XDEF _IEEEDPCmp
  2.  
  3.     SECTION code
  4.  
  5. _IEEEDPCmp:
  6.     cmp.l        d2,d0
  7.     beq.b        FirstEQ
  8.     bgt.b        Arg1_BT_Arg2
  9.  
  10. Arg1_ST_Arg2:
  11.     tst.l        d0
  12.     bge.b        Arg1_LT_Arg2
  13.     tst.l        d2
  14.     blt.b        Arg1_GT_Arg2
  15.  
  16. Arg1_LT_Arg2:
  17.     moveq.l     #-1,d0
  18.     rts
  19.  
  20. FirstEQ:
  21.     cmp.l        d3,d1
  22.     blo.b        Arg1_ST_Arg2
  23.     bhi.b        Arg1_BT_Arg2
  24.  
  25. Arg1_EQ_Arg2:
  26.     clr.l        d0
  27.     rts
  28.  
  29. Arg1_BT_Arg2:
  30.     tst.l        d0
  31.     bge.b        Arg1_GT_Arg2
  32.     tst.l        d2
  33.     blt.b        Arg1_LT_Arg2
  34.  
  35. Arg1_GT_Arg2:
  36.     moveq.l     #1,d0
  37.     rts
  38.  
  39.  
  40.  
  41.     END
  42.  
  43.