From: Brooks Moses <brooks.moses@codesourcery.com>
Date: Thu, 8 Mar 2007 23:12:25 +0000 (+0000)
Subject: intrinsic.texi: (ICHAR) Improve internal I/O note.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=122e35b490d32ba0a2d6ea1cef03366c137f3431;p=gcc.git

intrinsic.texi: (ICHAR) Improve internal I/O note.

* intrinsic.texi: (ICHAR) Improve internal I/O note.
(ACHAR): Reference it.
(CHAR): Reference it.
(IACHAR): Reference it.

From-SVN: r122729
---

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 69959422796..67825bfe110 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,10 @@
+2007-03-08  Brooks Moses  <brooks.moses@codesourcery.com>
+
+	* intrinsic.texi: (ICHAR) Improve internal I/O note.
+	(ACHAR): Reference it.
+	(CHAR): Reference it.
+	(IACHAR): Reference it.
+
 2007-03-08  Brooks Moses  <brooks.moses@codesourcery.com>
 
 	* intrinsic.texi: (LINK) Document function form.
diff --git a/gcc/fortran/intrinsic.texi b/gcc/fortran/intrinsic.texi
index e0c472bbf38..50724564fb2 100644
--- a/gcc/fortran/intrinsic.texi
+++ b/gcc/fortran/intrinsic.texi
@@ -478,6 +478,10 @@ program test_achar
 end program test_achar
 @end smallexample
 
+@item @emph{Note}:
+See @ref{ICHAR} for a discussion of converting between numerical values
+and formatted string representations.
+
 @item @emph{See also}:
 @ref{CHAR}, @ref{IACHAR}, @ref{ICHAR}
 
@@ -1856,6 +1860,10 @@ program test_char
 end program test_char
 @end smallexample
 
+@item @emph{Note}:
+See @ref{ICHAR} for a discussion of converting between numerical values
+and formatted string representations.
+
 @item @emph{See also}:
 @ref{ACHAR}, @ref{IACHAR}, @ref{ICHAR}
 
@@ -4606,6 +4614,10 @@ program test_iachar
 end program test_iachar
 @end smallexample
 
+@item @emph{Note}:
+See @ref{ICHAR} for a discussion of converting between numerical values
+and formatted string representations.
+
 @item @emph{See also}:
 @ref{ACHAR}, @ref{CHAR}, @ref{ICHAR}
 
@@ -4851,21 +4863,25 @@ end program test_ichar
 @end smallexample
 
 @item @emph{Note}:
-No intrinsic exists to convert a printable character string to a
-numerical value. For example, there is no intrinsic that, given the
-@code{CHARACTER} value @code{'154'}, returns an @code{INTEGER} or
-@code{REAL} value with the value 154.
-
-Instead, you can use internal-file I/O to do this kind of conversion. For
+No intrinsic exists to convert between a numeric value and a formatted
+character string representation -- for instance, given the
+@code{CHARACTER} value @code{'154'}, obtaining an @code{INTEGER} or
+@code{REAL} value with the value 154, or vice versa. Instead, this
+functionality is provided by internal-file I/O, as in the following
 example:
 @smallexample
 program read_val
   integer value
-  character(len=10) string
-
+  character(len=10) string, string2
   string = '154'
+  
+  ! Convert a string to a numeric value
   read (string,'(I10)') value
   print *, value
+  
+  ! Convert a value to a formatted string
+  write (string2,'(I10)') value
+  print *, string2
 end program read_val
 @end smallexample