------- Comment #1 from fxcoudert at gcc dot gnu dot org  2007-08-03 16:25 
-------
I'm in Edinbourg airport right now, so I'll make this quick:

--- value_4.f90 2007-08-03 18:24:42.000000000 +0200
+++ /home/fxcoudert/devel/trunk/gcc/testsuite/gfortran.dg/value_4.f90  
2007-07-03 13:18:15.000000000 +0200
@@ -73,7 +73,7 @@ program value_4
   j = 0
   k = i
   j = i_to_i (i, k)
-  if (delta ((3_4 * i), j)) call abort ()
+  if (delta ((3 * i), j)) call abort ()

   u = (-1.0, 2.0)
   v = (1.0, -2.0)


-- 

fxcoudert at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
         AssignedTo|unassigned at gcc dot gnu   |fxcoudert at gcc dot gnu dot
                   |dot org                     |org
             Status|UNCONFIRMED                 |ASSIGNED
     Ever Confirmed|0                           |1
           Keywords|                            |patch
   Last reconfirmed|0000-00-00 00:00:00         |2007-08-03 16:25:53
               date|                            |


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32955

Reply via email to