intrinsic.texi (STAT): Reverted a format in example code to octal; noted this in accompanying string.

* intrinsic.texi (STAT): Reverted a format in example code to
octal; noted this in accompanying string.

From-SVN: r117701
This commit is contained in:
Brooks Moses 2006-10-13 17:20:50 +00:00 committed by Brooks Moses
parent d3a95f2752
commit cdfd6b4b9b
2 changed files with 6 additions and 1 deletions

View file

@ -1,3 +1,8 @@
2006-10-13 Brooks Moses <bmoses@stanford.edu>
* intrinsic.texi (STAT): Reverted a format in example code to
octal; noted this in accompanying string.
2006-10-13 Paul Thomas <pault@gcc.gnu.org>
PR fortran/29373

View file

@ -7642,7 +7642,7 @@ PROGRAM test_stat
IF (status == 0) THEN
WRITE (*, FMT="('Device ID:', T30, I19)") buff(1)
WRITE (*, FMT="('Inode number:', T30, I19)") buff(2)
WRITE (*, FMT="('File mode:', T30, I19)") buff(3)
WRITE (*, FMT="('File mode (octal):', T30, O19)") buff(3)
WRITE (*, FMT="('Number of links:', T30, I19)") buff(4)
WRITE (*, FMT="('Owner''s uid:', T30, I19)") buff(5)
WRITE (*, FMT="('Owner''s gid:', T30, I19)") buff(6)