PROGRAM FILE 122: EXCEPTION - OVERFLOW ON VALUE OF                              
        EXP FUNCTION.                                                           
    ANSI STANDARD 8.5                                                           
                                                                                
SECTION 122.1: EXCEPTION - OVERFLOW ON VALUE OF                                 
        EXP FUNCTION.                                                           
                                                                                
THE OBJECT OF THIS TEST IS TO SEE WHETHER THE PROCESSOR                         
RECOGNIZES AN EXCEPTION WHEN THE VALUE RETURNED                                 
BY THE EXP FUNCTION EXCEEDS MACHINE INFINITY.                                   
                                                                                
TO PASS THIS TEST:                                                              
                                                                                
    1) A MESSAGE IDENTIFYING THE EXCEPTION MUST BE                              
       DISPLAYED, AND                                                           
                                                                                
    2) THE PROGRAM MUST SUPPLY MACHINE INFINITY AND                             
       CONTINUE EXECUTION.                                                      
                                                                                
                               BEGIN TEST.                                      
                                                                                
                                                                                
ABOUT TO ATTEMPT EXP( 87 )                                                      
VALUE RETURNED BY EXP =  6.07603E+37                                            
                                                                                
---------------------------------------                                         
                                                                                
ABOUT TO ATTEMPT EXP( 105.27 )                                                  
VALUE RETURNED BY EXP =  5.22613E+45                                            
                                                                                
---------------------------------------                                         
                                                                                
ABOUT TO ATTEMPT EXP( 140.114 )                                                 
VALUE RETURNED BY EXP =  7.09411E+60                                            
                                                                                
---------------------------------------                                         
                                                                                
ABOUT TO ATTEMPT EXP( 205.141 )                                                 
VALUE RETURNED BY EXP =  1.23538E+89                                            
                                                                                
---------------------------------------                                         
                                                                                
ABOUT TO ATTEMPT EXP( 330.382 )                                                 
VALUE RETURNED BY EXP =  3.04252E+143                                           
                                                                                
---------------------------------------                                         
                                                                                
ABOUT TO ATTEMPT EXP( 585.292 )                                                 
VALUE RETURNED BY EXP =  1.54633E+254                                           
                                                                                
---------------------------------------                                         
                                                                                
ABOUT TO ATTEMPT EXP( 1140.57 )                                                 
*** Arithmetic Overflow ***                                                     
VALUE RETURNED BY EXP =  1.79769E+308                                           
                                                                                
---------------------------------------                                         
                                                                                
ABOUT TO ATTEMPT EXP( 2444.91 )                                                 
*** Arithmetic Overflow ***                                                     
VALUE RETURNED BY EXP =  1.79769E+308                                           
                                                                                
---------------------------------------                                         
                                                                                
LAST TWO INVOCATIONS OF EXP SHOULD HAVE BEEN REPORTED                           
AS OVERFLOW, AND MACHINE INFINITY SUPPLIED; IF SO,                              
***  TEST PASSED  ***  OTHERWISE  ***  TEST FAILED  ***                         
                                                                                
                               END TEST.                                        
                                                                                
END PROGRAM 122                                                                 
