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