diff options
| author | Brooks Moses <bmoses@stanford.edu> | 2006-10-12 23:22:16 +0000 |
|---|---|---|
| committer | Brooks Moses <brooks@gcc.gnu.org> | 2006-10-12 16:22:16 -0700 |
| commit | 680600846dcfe0a403bbc45aba83389a4c933720 (patch) | |
| tree | 701e0e80b982b9704b6c6ad9f9b500db56a72258 /gcc | |
| parent | 25f32574182fbf4e705bf468429901867f4f559f (diff) | |
| download | gcc-680600846dcfe0a403bbc45aba83389a4c933720.zip gcc-680600846dcfe0a403bbc45aba83389a4c933720.tar.gz gcc-680600846dcfe0a403bbc45aba83389a4c933720.tar.bz2 | |
intrinsic.texi (STAT): Fixed a format typo in sample code.
* intrinsic.texi (STAT): Fixed a format typo in sample code.
From-SVN: r117676
Diffstat (limited to 'gcc')
| -rw-r--r-- | gcc/fortran/ChangeLog | 4 | ||||
| -rw-r--r-- | gcc/fortran/intrinsic.texi | 2 |
2 files changed, 5 insertions, 1 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index ea9902f..6f1006d 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,5 +1,9 @@ 2006-10-12 Brooks Moses <bmoses@stanford.edu> + * intrinsic.texi (STAT): Fixed a format typo in sample code. + +2006-10-12 Brooks Moses <bmoses@stanford.edu> + * intrinsic.texi (STAT): Shortened lines in sample code. 2006-10-11 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de> diff --git a/gcc/fortran/intrinsic.texi b/gcc/fortran/intrinsic.texi index 6eb7122..7549c52 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, o19)") buff(3) + WRITE (*, FMT="('File mode:', T30, I19)") 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) |