This is the mail archive of the
fortran@gcc.gnu.org
mailing list for the GNU Fortran project.
Re: librarystatus.html
- From: Tobias Schlüter <tobias dot schlueter at physik dot uni-muenchen dot de>
- To: Scott Robert Ladd <coyote at coyotegulch dot com>
- Cc: GCC Fortran mailing list <fortran at gcc dot gnu dot org>
- Date: Sat, 24 Apr 2004 00:19:13 +0200
- Subject: Re: librarystatus.html
- References: <40898AE3.3010002@coyotegulch.com>
An easy way of answering part of Scott's question which intrinsics are
implemented, is to look at the testsuite, anything which has a testcase
which passes, is implemented.
Anyway, while looking at the testsuite I noticed a few typos. The
(non-copyrightable) patch is below.
- Tobi
2004-04-24 Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
* execute/intrinsic_count.f90: Fix typo: we're testing COUNT, not
ANY and ALL.
* execute/intrinsic_mmloc.f90: Fix typo: we're testing MINLOC and
MAXLOC, not MINVAL and MAXVAL
Index: execute/intrinsic_count.f90
===================================================================
RCS file:
/cvsroot/gcc/gcc/gcc/testsuite/gfortran.fortran-torture/execute/Attic/intrinsic_count.f90,v
retrieving revision 1.1.2.1
diff -u -r1.1.2.1 intrinsic_count.f90
--- execute/intrinsic_count.f90 26 Jul 2003 16:27:49 -0000 1.1.2.1
+++ execute/intrinsic_count.f90 23 Apr 2004 22:12:47 -0000
@@ -1,5 +1,5 @@
-! Program to test the ANY and ALL intrinsics
-program intrinsic_anyall
+! Program to test the COUNT intrinsic
+program intrinsic_count
implicit none
logical(kind=4), dimension (3, 5) :: a
integer(kind=4), dimension (5) :: b
Index: execute/intrinsic_mmloc.f90
===================================================================
RCS file:
/cvsroot/gcc/gcc/gcc/testsuite/gfortran.fortran-torture/execute/Attic/intrinsic_mmloc.f90,v
retrieving revision 1.1.2.1
diff -u -r1.1.2.1 intrinsic_mmloc.f90
--- execute/intrinsic_mmloc.f90 26 Jul 2003 16:27:49 -0000 1.1.2.1
+++ execute/intrinsic_mmloc.f90 23 Apr 2004 22:12:47 -0000
@@ -1,5 +1,5 @@
-! Program to test the MINVAL and MAXVAL intrinsics
-program testmmval
+! Program to test the MINLOC and MAXLOC intrinsics
+program testmmloc
implicit none
integer, dimension (3, 3) :: a
integer, dimension (3) :: b