Skip to content
Snippets Groups Projects
Forked from redox-os / gcc
Source project has a limited visibility.
  • jvdelisle's avatar
    2639e4cd
    2005-09-14 Jerry DeLisle <jvdelisle@verizon.net · 2639e4cd
    jvdelisle authored
    	PR fortran/21875 Internal Unit Array I/O, NIST
    	* libgfortran.h: Add run time error code for array stride.
    	* runtime/error.c (translate_error): Add error message for
    	array stride.
    	* io/io.h: Add array descriptor pointer to IOPARM structure.
    	Add prtotypes for two new functions.
    	* io/transfer.c (data_transfer_init): Removed initialization and
    	moved to unit.c (get_unit)
    	* io/transfer.c (next_record_r): Include internal unit read
    	functionality.
    	* io/transfer.c (next_record_w): Include internal unit write
    	functionality, including padding of character array records.
    	* io/unit.c (get_array_unit_len): New function to return the number
    	of records in the character array 'file' from the array descriptor.
    	* io/unit.c (get_unit): Gathered initialization code from
    	init_data_transfer for internal units and added initialization of
    	character array unit.
    	* io/unit.c (is_array_io): New function to determine if internal unit
    	is an array.
    	* io/unix.c (mem_alloc_w_at): Add error checks for bad record length
    	and end of file.
    
    
    git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@104276 138bc75d-0d04-0410-961f-82ee72b054a4
    2639e4cd
    History
    2005-09-14 Jerry DeLisle <jvdelisle@verizon.net
    jvdelisle authored
    	PR fortran/21875 Internal Unit Array I/O, NIST
    	* libgfortran.h: Add run time error code for array stride.
    	* runtime/error.c (translate_error): Add error message for
    	array stride.
    	* io/io.h: Add array descriptor pointer to IOPARM structure.
    	Add prtotypes for two new functions.
    	* io/transfer.c (data_transfer_init): Removed initialization and
    	moved to unit.c (get_unit)
    	* io/transfer.c (next_record_r): Include internal unit read
    	functionality.
    	* io/transfer.c (next_record_w): Include internal unit write
    	functionality, including padding of character array records.
    	* io/unit.c (get_array_unit_len): New function to return the number
    	of records in the character array 'file' from the array descriptor.
    	* io/unit.c (get_unit): Gathered initialization code from
    	init_data_transfer for internal units and added initialization of
    	character array unit.
    	* io/unit.c (is_array_io): New function to determine if internal unit
    	is an array.
    	* io/unix.c (mem_alloc_w_at): Add error checks for bad record length
    	and end of file.
    
    
    git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@104276 138bc75d-0d04-0410-961f-82ee72b054a4