From: Paul Thomas <pault@gcc.gnu.org>
Date: Sun, 14 Aug 2005 21:43:12 +0000 (+0000)
Subject: re PR fortran/21432 (gfortran does not support printing of namelists)
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=21d7d31f71d4c4e16ee17ac547d3e0b6963e8ba1;p=gcc.git

re PR fortran/21432 (gfortran does not support printing of namelists)

2005-08-14 Paul Thomas  <pault@gcc.gnu.org>

	PR fortran/21432.
	* gfortran.texi: Document PRINT namelist.

From-SVN: r103085
---

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 152ab005eef..d92bfd42e9f 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2005-08-14 Paul Thomas  <pault@gcc.gnu.org>
+
+	PR fortran/21432.
+	* gfortran.texi: Document PRINT namelist.
+
 2005-08-14 Paul Thomas  <pault@gcc.gnu.org>
 
 	PR fortran/21432.
diff --git a/gcc/fortran/gfortran.texi b/gcc/fortran/gfortran.texi
index 30acb8f70c1..7d26d5fba09 100644
--- a/gcc/fortran/gfortran.texi
+++ b/gcc/fortran/gfortran.texi
@@ -729,6 +729,15 @@ had been called:
 To aid this dialog, when input is from stdin, errors send their
 messages to stderr and execution continues, even if IOSTAT is set.
 
+PRINT namelist is permitted.  This causes an error if -std=f95 is used.
+@smallexample
+PROGRAM test_print
+  REAL, dimension (4)  ::  x = (/1.0, 2.0, 3.0, 4.0/)
+  NAMELIST /mynml/ x
+  PRINT mynml
+END PROGRAM test_print
+@end smallexample
+
 @node X format descriptor
 @section X format descriptor
 @cindex X format descriptor