home *** CD-ROM | disk | FTP | other *** search
/ InfoMagic Source Code 1993 July / THE_SOURCE_CODE_CD_ROM.iso / bsd_srcs / usr.bin / gcc / gnulib / vax / fixunsdfsi.s < prev    next >
Encoding:
Text File  |  1991-01-30  |  338 b   |  22 lines
  1. #include "DEFS.h"
  2.  
  3.     .data
  4.     .align    2
  5. Lbig:    .double    0d2.14748364800000000000e+09
  6.     .text
  7.  
  8. /*
  9.  * VAX conversions overflow politely,
  10.  * but we'll be conservative just in case someone is trapping overflow.
  11.  */
  12. ENTRY(__fixunsdfsi, 0)
  13.     cmpd    4(ap),Lbig
  14.     jgeq    1f
  15.     cvtdl    4(ap),r0
  16.     ret
  17.  
  18. 1:    subd3    Lbig,4(ap),r0
  19.     cvtdl    r0,r0
  20.     addl2    $2147483648,r0
  21.     ret
  22.