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>
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)