Two glitches while testing gcc version 4.3.0 20070216

Steve Kargl sgk@troutmask.apl.washington.edu
Sat Feb 17 22:43:00 GMT 2007


On Sat, Feb 17, 2007 at 11:27:17PM +0100, Dominique Dhumieres wrote:
> > Try commenting out etime declarations in second.f
> >
> > *     .. External Functions ..
> > *      REAL               ETIME
> > *      EXTERNAL           ETIME
> 
> I knew I was missing something. Note that was not required with the gfortran 
> version around Feb  5  2006.

>From ChangeLog-2006:

2006-07-15  Steven G. Kargl  <kargls@comcast.net>

	* intrinsics/etime.c: Remove etime_
	* libtool-version: Bump from libgfortran.so.1 to libgfortran.so.2

It was a historical accident caused by LAPACK that gfortran etime_
to the world.

laptop:kargl[214] svn diff -r 115478:115477 etime.c 
Index: etime.c
===================================================================
--- etime.c     (revision 115478)
+++ etime.c     (revision 115477)
@@ -90,3 +90,25 @@ etime (gfc_array_r4 *t)
   etime_sub (t, &val);
   return val;
 }
+
+/* LAPACK's test programs declares ETIME external, therefore we
+   need this.  */
+
+extern GFC_REAL_4 etime_ (GFC_REAL_4 *t);
+export_proto_np(etime_);
+

> Finally with -O3    -funroll-loops, I got:
> 
> csep.out: CST drivers:      1 out of  11664 tests failed to pass the threshold
> ded.out: DES:    2 out of  3264 tests failed to pass the threshold
> ded.out: DSX:    2 out of  3494 tests failed to pass the threshold
> dgd.out: DXV drivers:    200 out of   5000 tests failed to pass the threshold
> sgd.out: SXV drivers:     37 out of   5000 tests failed to pass the threshold
> ssep.out: SST:    2 out of  4662 tests failed to pass the threshold
> ssep.out: SST drivers:      1 out of  14256 tests failed to pass the threshold
> zgd.out: ZXV drivers:     24 out of   5000 tests failed to pass the threshold

These are very good results. 

-- 
Steve



More information about the Fortran mailing list