diff options
| author | Janne Blomqvist <jblomqvi@cc.hut.fi> | 2005-09-26 23:24:45 +0300 |
|---|---|---|
| committer | Bud Davis <bdavis@gcc.gnu.org> | 2005-09-26 20:24:45 +0000 |
| commit | 18623faed15aed3cc1ecbca0e7323bbc02b4d44b (patch) | |
| tree | 1d8a8fc9695ef85e44fe907a795461636d663eb7 /libgfortran/io/io.h | |
| parent | d05d9ac771ec6e7f7a1f0f0417106b0c73a9943d (diff) | |
| download | gcc-18623faed15aed3cc1ecbca0e7323bbc02b4d44b.zip gcc-18623faed15aed3cc1ecbca0e7323bbc02b4d44b.tar.gz gcc-18623faed15aed3cc1ecbca0e7323bbc02b4d44b.tar.bz2 | |
[multiple changes]
2005-09-24 Janne Blomqvist <jblomqvi@cc.hut.fi>
* trans-io.c (gfc_build_io_library_fndecls): Add entry
iocall_x_array for transfer_array. (transfer_array_desc): New
function. (gfc_trans_transfer): Add code to call
transfer_array_desc.
2005-09-24 Janne Blomqvist <jblomqvi@cc.hut.fi>
* io.h: Changed prototypes of list_formatted_{read|write}.
* list_read.c (list_formatted_read): Renamed to
list_formatted_read_scalar and made static. (list_formatted_read):
New function.
* transfer.c: Prototype for transfer_array. Changed transfer
function pointer. (unformatted_read): Add nelems argument, use
it. (unformatted_write): Likewise. (formatted_transfer): Changed
name to formatted_transfer_scalar. (formatted_transfer): New
function. (transfer_integer): Add nelems argument to transfer
call, move updating item count to transfer
functions. (transfer_real): Likewise. (transfer_logical):
Likewise. (transfer_character): Likewise. (transfer_complex):
Likewise. (transfer_array): New function. (data_transfer_init):
Call formatted_transfer with new argument. (iolength_transfer):
New argument, use it.
* write.c (list_formatted_write): Renamed to
list_formatted_write_scalar, made static. (list_formatted_write):
New function.
From-SVN: r104662
Diffstat (limited to 'libgfortran/io/io.h')
| -rw-r--r-- | libgfortran/io/io.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/libgfortran/io/io.h b/libgfortran/io/io.h index 4f5f88a..65051fa 100644 --- a/libgfortran/io/io.h +++ b/libgfortran/io/io.h @@ -613,7 +613,7 @@ internal_proto(read_decimal); /* list_read.c */ -extern void list_formatted_read (bt, void *, int); +extern void list_formatted_read (bt, void *, int, size_t); internal_proto(list_formatted_read); extern void finish_list_read (void); @@ -666,7 +666,7 @@ internal_proto(write_x); extern void write_z (fnode *, const char *, int); internal_proto(write_z); -extern void list_formatted_write (bt, void *, int); +extern void list_formatted_write (bt, void *, int, size_t); internal_proto(list_formatted_write); /* error.c */ |