diff options
Diffstat (limited to 'libgfortran/io/transfer.c')
| -rw-r--r-- | libgfortran/io/transfer.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libgfortran/io/transfer.c b/libgfortran/io/transfer.c index 87b8c05..71c60b6 100644 --- a/libgfortran/io/transfer.c +++ b/libgfortran/io/transfer.c @@ -2982,7 +2982,7 @@ static void skip_record (st_parameter_dt *dtp, ssize_t bytes) { ssize_t rlength, readb; - static const ssize_t MAX_READ = 4096; +#define MAX_READ 4096 char p[MAX_READ]; dtp->u.p.current_unit->bytes_left_subrecord += bytes; @@ -3282,7 +3282,7 @@ next_record_w_unf (st_parameter_dt *dtp, int next_subrecord) static ssize_t sset (stream * s, int c, ssize_t nbyte) { - static const int WRITE_CHUNK = 256; +#define WRITE_CHUNK 256 char p[WRITE_CHUNK]; ssize_t bytes_left, trans; |