diff options
author | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2005-03-16 19:33:07 +0000 |
---|---|---|
committer | François-Xavier Coudert <fxcoudert@gcc.gnu.org> | 2005-03-16 19:33:07 +0000 |
commit | 0376d694c2162127e4a727dd67e8c982eff04871 (patch) | |
tree | ca8f2d91f118b10d4e64f5e484426a62570bc336 | |
parent | 2786eb77b2d11d62515e4ed1aa36137addf6a172 (diff) | |
download | gcc-0376d694c2162127e4a727dd67e8c982eff04871.zip gcc-0376d694c2162127e4a727dd67e8c982eff04871.tar.gz gcc-0376d694c2162127e4a727dd67e8c982eff04871.tar.bz2 |
* io.h: Setting higher default record length.
From-SVN: r96574
-rw-r--r-- | libgfortran/io/io.h | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/libgfortran/io/io.h b/libgfortran/io/io.h index 694ca1d..05c4355 100644 --- a/libgfortran/io/io.h +++ b/libgfortran/io/io.h @@ -245,10 +245,11 @@ typedef struct unit_flags; -/* The default value of record length is defined here. This value can - be overriden by the OPEN statement or by an environment variable. */ +/* The default value of record length for preconnected units is defined + here. This value can be overriden by an environment variable. + Default value is 1 Gb. */ -#define DEFAULT_RECL 10000 +#define DEFAULT_RECL 1073741824 typedef struct gfc_unit |