home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 5 / 05.iso / a / a069 / 1.img / TRSOURCE.EXE / INFINITY.ASM < prev    next >
Encoding:
Assembly Source File  |  1990-10-22  |  500 b   |  24 lines
  1. ; INFINITY.ASM
  2. ;
  3. ; by Leonard Zerman
  4. ;
  5. ; Placed in the public domain by Tom Rettig Associates, 10/22/1990.
  6. ;----------------------------------------------------------------
  7.  
  8.          INCLUDE EXTENDA.INC
  9.          DATASEG
  10.  
  11.          CLpublic <INFINITY>
  12.  
  13.          CLstatic <double INF 7FEFFFFFFFFFFFFFH>
  14.          ; 8087 bit pattern for infinity -1
  15.  
  16.          CLfunc double INFINITY 
  17.  
  18.          CLcode
  19.  
  20.          CLret INF
  21. ;**********************************************
  22.          END
  23.  
  24.