diff options
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/fortran/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/fortran/intrinsic.texi | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index 2708abb..be6867c 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -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 diff --git a/gcc/fortran/intrinsic.texi b/gcc/fortran/intrinsic.texi index 7549c52..4e172fd 100644 --- a/gcc/fortran/intrinsic.texi +++ b/gcc/fortran/intrinsic.texi @@ -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) |