aboutsummaryrefslogtreecommitdiff
path: root/libgfortran
AgeCommit message (Collapse)Author
2006-01-252006-01-24 Jerry DeLisle <jvdelisle@gcc.gnu.org>Jerry DeLisle
PR libgfortran/25835 * io/transfer.c (st_read_done): Flush buffers when read is done. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@110200 138bc75d-0d04-0410-961f-82ee72b054a4
2006-01-182006-01-17 Jerry DeLisle <jvdelisle@gcc.gnu.org>Jerry DeLisle
PR libgfortran/25697 * io/transfer.c (us_read): Detect end of file condition from previous operations and bail out (no need to pre-position). git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@109870 138bc75d-0d04-0410-961f-82ee72b054a4
2006-01-182006-01-17 Jerry DeLisle <jvdelisle@gcc.gnu.org>Jerry DeLisle
PR libgfortran/25631 * io/transfer.c (formatted_transfer_scalar): Adjust pending_spaces and skips so that TL works correctly when no bytes_used yet. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@109858 138bc75d-0d04-0410-961f-82ee72b054a4
2006-01-16 * configure.ac (CFLAGS): Update to include -std=gnu99 so thatRoger Sayle
the configure tests will be run with the same environment as used to compile the libgfortran source code. * configure: Regenerate. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@109774 138bc75d-0d04-0410-961f-82ee72b054a4
2006-01-12 * intrinsics/c99_functions.c: Add function prototypes to avoidRoger Sayle
warnings from -Wstrict-prototypes -Wmissing-prototypes. On Tru64 work around a brain-dead libm by redirecting calls to cabs{,f,l} to a local __gfc_cabs{,f,l}. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@109646 138bc75d-0d04-0410-961f-82ee72b054a4
2006-01-072006-01-07 Janne Blomqvist <jb@gcc.gnu.org>Janne Blomqvist
* configure.ac: Remove check for sys/mman.h. * configure: Regenerated. * Makefile.in: Regenerated. * config.h.in: Regenerated. * aclocal.m4: Regenerated. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@109455 138bc75d-0d04-0410-961f-82ee72b054a4
2006-01-07 Fix date.Jerry DeLisle
git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@109447 138bc75d-0d04-0410-961f-82ee72b054a4
2006-01-06Fix previous ChangeLog entryTobias Schl"uter
git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@109417 138bc75d-0d04-0410-961f-82ee72b054a4
2006-01-062006-01-05 Jerry DeLisle <jvdelisle@gcc.gnu.org>Jerry DeLisle
PR libgfortran/25598 * io/file_pos.c (unformatted_backspace): Assure the new file position to seek is not less than zero. (st_backspace): Set unit bytes_left to zero. * io/transfer.c (next_record_r): Fix line lengths, no functional change. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@109405 138bc75d-0d04-0410-961f-82ee72b054a4
2006-01-02config:Paolo Bonzini
2006-01-02 Paolo Bonzini <bonzini@gnu.org> PR target/25259 * stdint.m4: New. gcc: 2006-01-02 Paolo Bonzini <bonzini@gnu.org> PR target/25259 * Makefile.in (DECNUMINC): Include libdecnumber's build directory. libgfortran: 2006-01-02 Paolo Bonzini <bonzini@gnu.org> PR target/25259 * configure.ac: Use GCC_HEADER_STDINT. * libgfortran.h: Include gstdint.h. * aclocal.m4: Regenerate. * configure: Regenerate. libdecnumber: 2006-01-02 Paolo Bonzini <bonzini@gnu.org> PR target/25259 * configure.ac: Use GCC_HEADER_STDINT. * decContext.h: Include gstdint.h. * aclocal.m4: Regenerate. * configure: Regenerate. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@109241 138bc75d-0d04-0410-961f-82ee72b054a4
2006-01-01* Split the ChangeLog into years.Steven G. Kargl
git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@109225 138bc75d-0d04-0410-961f-82ee72b054a4
2006-01-012005-12-31 Jerry DeLisle <jvdelisle@gcc.gnu.org>Jerry DeLisle
PR libgfortran/25594 PR libgfortran/25419 * io/list_read.c (list_formatted_read_scalar): Test for comma to return a null value (default). Revert patch of 25419 on 2005-12-28. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@109211 138bc75d-0d04-0410-961f-82ee72b054a4
2005-12-282005-12-28 Jerry DeLisle <jvdelisle@gcc.gnu.org>Jerry DeLisle
PR libgfortran/25139 * io/unix.c (fd_truncate): Set s->active to zero. PR libgfortran/25510 * libgfortran.h: Add ERROR_INTERNAL and ERROR_INTERNAL_UNIT. * runtime/error.c (translate_error): Add messages for new errors. * io/list_read.c (next_char): Use new errors. * io/transfer.c (next_record_r) (next_record_w): Use new errors. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@109122 138bc75d-0d04-0410-961f-82ee72b054a4
2005-12-282005-12-28 Jerry DeLisle <jvdelisle@gcc.gnu.org>Jerry DeLisle
PR libgfortran/25550 * io/file_pos.c (st_rewind): Reset bytes left so no error occurs in next_record_r. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@109101 138bc75d-0d04-0410-961f-82ee72b054a4
2005-12-282005-12-28 Jerry DeLisle <jvdelisle@gcc.gnu.org>Jerry DeLisle
PR libgfortran/25419 * io/list_read.c (list_formatted_read_scalar): Allow comma to return a null value (default). git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@109099 138bc75d-0d04-0410-961f-82ee72b054a4
2005-12-222005-12-21 Jerry DeLisle <jvdelisle@gcc.gnu.org>Jerry DeLisle
PR libgfortran/25307 * io/list_read.c (next_char): Handle end-of-file conditions for internal units and add support for internal character array units. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@108938 138bc75d-0d04-0410-961f-82ee72b054a4
2005-12-192005-12-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>Jerry DeLisle
PR libgfortran/25463 * io/transfer.c (finalize_transfer): Fix execution order so that next_record is set to zero in all cases. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@108784 138bc75d-0d04-0410-961f-82ee72b054a4
2005-12-162005-12-16 Jerry DeLisle <jvdelisle@gcc.gnu.org>Jerry DeLisle
PR libgfortran/25264 PR libgfortran/25349 * io/unit.c (get_unit): Delete code that cleared the string when the unit was opened, which is too soon. * io/transfer.c (next_record_w): Pass done flag in. Change logic for setting max_pos. Add code to position unit and pad record as needed. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@108671 138bc75d-0d04-0410-961f-82ee72b054a4
2005-12-13 PR libfortran/24991Jakub Jelinek
* acinclude.m4 (LIBGFOR_CHECK_PRAGMA_WEAK): Rename to... (LIBGFOR_GTHREAD_WEAK): ... this. Define SUPPORTS_WEAK rather than HAVE_PRAGMA_WEAK. Define GTHREAD_USE_WEAK to 0 on hosts that shouldn't use weak in gthr.h. * configure.ac: Use LIBGFOR_GTHREAD_WEAK instead of LIBGFOR_CHECK_PRAGMA_WEAK. * config.h.in: Regenerated. * configure: Regenerated. * io/io.h (SUPPORTS_WEAK): Don't define here. * intrinsics/ftell.c (ftell, FTELL_SUB): Add unlock_unit call. * intrinsics/fget.c (fgetc, fputs): Likewise. * intrinsics/tty.c (ttynam): Likewise. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@108471 138bc75d-0d04-0410-961f-82ee72b054a4
2005-12-13gcc/fortran/Richard Sandiford
* Make-lang.in (fortran/trans-resolve.o): Depend on fortran/dependency.h. * gfortran.h (gfc_expr): Add an "inline_noncopying_intrinsic" flag. * dependency.h (gfc_get_noncopying_intrinsic_argument): Declare. (gfc_check_fncall_dependency): Change prototype. * dependency.c (gfc_get_noncopying_intrinsic_argument): New function. (gfc_check_argument_var_dependency): New function, split from gfc_check_fncall_dependency. (gfc_check_argument_dependency): New function. (gfc_check_fncall_dependency): Replace the expression parameter with separate symbol and argument list parameters. Generalize the function to handle dependencies for any type of expression, not just variables. Accept a further argument giving the intent of the expression being tested. Ignore intent(in) arguments if that expression is also intent(in). * resolve.c: Include dependency.h. (find_noncopying_intrinsics): New function. (resolve_function, resolve_call): Call it on success. * trans-array.h (gfc_conv_array_transpose): Declare. (gfc_check_fncall_dependency): Remove prototype. * trans-array.c (gfc_conv_array_transpose): New function. * trans-intrinsic.c (gfc_conv_intrinsic_function): Don't use the libcall handling if the expression is to be evaluated inline. Add a case for handling inline transpose()s. * trans-expr.c (gfc_trans_arrayfunc_assign): Adjust for the new interface provided by gfc_check_fncall_dependency. libgfortran/ * m4/matmul.m4: Use a different order in the special case of a transposed first argument. * generated/matmul_c4.c, generated/matmul_c8.c, generated/matmul_c10.c, * generated/matmul_c16.c, generated/matmul_i4.c, generated/matmul_i8.c, * generated/matmul_i10.c, generated/matmul_r4.c, generated/matmul_r8.c * generated/matmul_r10.c, generated/matmul_r16.c: Regenerated. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@108459 138bc75d-0d04-0410-961f-82ee72b054a4
2005-12-10Forgot ChangeLog for 108359Janne Blomqvist
git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@108361 138bc75d-0d04-0410-961f-82ee72b054a4
2005-12-102005-12-10 Janne Blomqvist <jb@gcc.gnu.org>Janne Blomqvist
* Makefile.am: Enable loop unrolling for matmul. * configure: Regenerated. * Makefile.in: Regenerated. * aclocal.m4: Regenerated. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@108359 138bc75d-0d04-0410-961f-82ee72b054a4
2005-12-102005-12-10 Thomas Koenig <Thomas.Koenig@online.de>Thomas Koenig
PR fortran/23815 * io.c (top level): Add convert to io_tag. (resolve_tag): convert is GFC_STD_GNU. (match_open_element): Add convert. (gfc_free_open): Likewise. (gfc_resolve_open): Likewise. (gfc_free_inquire): Likewise. (match_inquire_element): Likewise. * dump-parse-tree.c (gfc_show_code_node): Add convet for open and inquire. gfortran.h: Add convert to gfc_open and gfc_inquire. * trans-io.c (gfc_trans_open): Add convert. (gfc_trans_inquire): Likewise. * ioparm.def: Add convert to open and inquire. * gfortran.texi: Document CONVERT. 2005-12-10 Thomas Koenig <Thomas.Koenig@online.de> PR fortran/23815 * io/file_pos.c (unformatted_backspace): If flags.convert does not equal CONVERT_NATIVE, reverse the record marker. * io/open.c: Add convert_opt[]. (st_open): If no convert option is given, set CONVERT_NATIVE. If CONVERT_BIG or CONVERT_LITTLE are given, set flags.convert to CONVERT_NATIVE or CONVERT_SWAP (depending on wether we have a big- or little-endian system). * io/transfer.c (unformatted_read): Remove unused attribute from arguments. If we need to reverse bytes, break up large transfers into a loop. Split complex numbers into its two parts. (unformatted_write): Likewise. (us_read): If flags.convert does not equal CONVERT_NATIVE, reverse the record marker. (next_record_w): Likewise. (reverse_memcpy): New function. * io/inquire.c (inquire_via_unit): Implement convert. * io/io.h (top level): Add enum unit_convert. Add convert to st_parameter_open and st_parameter_inquire. Define IOPARM_OPEN_HAS_CONVERT and IOPARM_INQUIRE_HAS_CONVERT. Increase padding for st_parameter_dt. Declare reverse_memcpy(). 2005-12-10 Thomas Koenig <Thomas.Koenig@online.de> PR fortran/23815 * gfortran.dg/unf_io_convert_1.f90: New test. * gfortran.dg/unf_io_convert_2.f90: New test. * gfortran.dg/unf_io_convert_3.f90: New test. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@108358 138bc75d-0d04-0410-961f-82ee72b054a4
2005-12-09 PR libfortran/24991Jakub Jelinek
* acinclude.m4: Include acx.m4 and no-executables.m4. * configure.ac: Add GCC_TOPLEVEL_SUBDIRS. * configure: Rebuilt. * Makefile.am (AM_CPPFLAGS): Use $(host_subdir) in build dir path. * Makefile.in: Rebuilt. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@108280 138bc75d-0d04-0410-961f-82ee72b054a4
2005-12-092005-12-08 Jerry DeLisle <jvdelisle@gcc.gnu.org>Jerry DeLisle
PR libgfortran/25039 * io/io.h: Create a new flag sf_read_comma to control comma separators in numeric reads. * io/transfer.c (formatted_transfer_scalar): Initialize the flag. (read_sf): Check for commas coming in and if the flag is set, shortcut the read. * io/read.c (read_a) (read_x): Clear the flag for character reads and reset it after the reads. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@108271 138bc75d-0d04-0410-961f-82ee72b054a4
2005-12-04 * io/format.c: Removing unused code.Francois-Xavier Coudert
* intrinsics/random.c: Likewise. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@108014 138bc75d-0d04-0410-961f-82ee72b054a4
2005-12-02Add forgotten ChangeLog entry:Janne Blomqvist
2005-11-27 Janne Blomqvist <jb@gcc.gnu.org> * m4/ifunction.m4: Add const restrict to function arguments. * m4/iforeach.m4: Likewise. * m4/eoshift1.m4: Likewise. * m4/eoshift3.m4: Likewise. * m4/dotprod.m4: Likewise. * m4/dotprodc.m4: Likewise. * m4/dotprodl.m4: Likewise. * m4/shape.m4: Likewise. * m4/cshift1.m4: Likewise. * m4/reshape.m4: Likewise. * m4/transpose.m4: Likewise. * generated/eoshift*: Regenerated * generated/dotprod*: Likewise. * generated/shape*: Likewise. * generated/cshift1*: Likewise. * generated/reshape*: Likewise. * generated/transpose*: Likewise. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107912 138bc75d-0d04-0410-961f-82ee72b054a4
2005-12-02 PR libfortran/25116Francois-Xavier Coudert
* io/transfer.c (data_transfer_init): Don't set the default for namelist I/O on preconnected files to UNFORMATTED. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107900 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-30 * libgfortran.h (ILP32 typedefs): Define _UINT8_T, _UINT32_T andEric Botcazou
_UINT64_T on Solaris. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107708 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-292005-11-28 Steven G. Kargl <kargls@comcast.net>Steven G. Kargl
PR libgfortran/25149 * intrinsics/abort.c: Add external abort_ to allow linking when invoking -std=f95 in testsuite. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107655 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-28 libfortran/24991Jakub Jelinek
* acinclude.m4 (LIBGFOR_CHECK_PRAGMA_WEAK): Rename to... (LIBGFOR_GTHREAD_WEAK): ... this. Define SUPPORTS_WEAK rather than HAVE_PRAGMA_WEAK. Define GTHREAD_USE_WEAK to 0 on hosts that shouldn't use weak in gthr.h. * configure.ac: Use LIBGFOR_GTHREAD_WEAK instead of LIBGFOR_CHECK_PRAGMA_WEAK. * config.h.in: Regenerated. * configure: Regenerated. * io/io.h (SUPPORTS_WEAK): Don't define here. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107616 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-28 * intrinsics/ftell.c (ftell, FTELL_SUB): Add unlock_unit call.Jakub Jelinek
* intrinsics/fget.c (fgetc, fputs): Likewise. * intrinsics/tty.c (ttynam): Likewise. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107595 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-282005-11-27 Jerry DeLisle <jvdelisle@gcc.gnu.org>Jerry DeLisle
PR libgfortran/25109 * io/unit.c (init_units): Set default flag to BLANK_NULL per requirement of F95 standard. Set PAD_YES for stdin. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107588 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-27 * intrinsics/random.c: Include config.hDavid Edelsohn
* io/size_from_kind.c: Include config.h and libgfortran.h * io/io.h: Revert 2005-11-21 change. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107577 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-27libgfortran ChangeLog:Janne Blomqvist
2005-11-27 Janne Blomqvist <jb@gcc.gnu.org> * m4/*: Add const restrict to function arguments. * generated/*.c: Regenerate. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107573 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-27 * io/write.c (namelist_write): Correct type in previous commit.Francois-Xavier Coudert
git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107564 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-27 PR libfortran/24919Francois-Xavier Coudert
* io/list_read.c (eat_separator, finish_separator, read_character): Handle CRLF separators correctly during reads. (nml_query): Use the HAVE_CRLF macro to print adequate newlines. * io/io.h (st_parameter_dt): Add comment about the possible values for sf_seen_eor. * io/unix.c (tempfile, regular_file): HAVE_CRLF doesn't imply that O_BINARY is defined, so we add that condition. (stream_at_bof): Fix typo in comment. * io/transfer.c (read_sf): Handle correctly CRLF, setting sf_seen_eor value to 2 instead of 1. (formatted_transfer_scalar): Use the sf_seen_eor value to handle CRLF the right way. * io/write.c (nml_write_obj, namelist_write): Use CRLF as newline when HAVE_CRLF is defined. * gfortran.dg/ftell_1.f90: Modify testcase so that it doesn't fail on CRLF platforms. * gfortran.dg/ftell_2.f90: Likewise. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107563 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-26 * io/list_read.c (nml_parse_qualifier): Use ssize_t instead of intRichard Henderson
in dtp->u.p.value. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107545 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-26libgfortran ChangeLog:Janne Blomqvist
2005-11-26 Janne Blomqvist <jb@gcc.gnu.org> PR libgfortran/24945 * io/open.c (edit_modes): Check for STATUS_UNKNOWN flag. testsuite ChangeLog 2005-11-26 Janne Blomqvist <jb@gcc.gnu.org> PR libgfortran/24945 * gfortran.dg/open_status_2.f90: New test. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107538 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-25 * io/list_read.c (nml_parse_qualifier): Use memcpy to extractRichard Henderson
values from dtp->u.p.value. * io/io.h (struct st_parameter_dt): Change reversion_flag, first_item, seen_dollar, sf_seen_eor, eor_condition, no_leading_blank, char_flag, input_complete, at_eol, comma_flag, namelist_mode, nml_read_error to single-bit fields. Move value to where it'll be at least pointer aligned. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107520 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-23 * io/open.c (new_unit): Use the right unit number when checkingAlan Modra
for stdin, stdout, stderr. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107413 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-232005-11-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>Jerry DeLisle
PR libgfortran/24794 * io/list_read.c (read_character): Add auto completion on short namelist reads. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107394 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-22 * io/io.h (_LARGE_FILES): Undefine for AIX.David Edelsohn
(_LARGE_FILE_API): Define for AIX. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107380 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-21gcc/fortran/Jakub Jelinek
PR fortran/14943 PR fortran/21647 * Make-lang.in (fortran/trans-io.o): Depend on fortran/ioparm.def. * dump-parse-tree.c (gfc_show_code_node): Dump c->block for EXEC_{READ,WRITE,IOLENGTH} nodes. * io.c (terminate_io, match_io, gfc_match_inquire): Put data transfer commands into EXEC_{READ,WRITE,IOLENGTH}'s code->block. * resolve.c (resolve_blocks): Handle EXEC_{READ,WRITE,IOLENGTH}. * trans-io.c (ioparm_unit, ioparm_err, ioparm_end, ioparm_eor, ioparm_list_format, ioparm_library_return, ioparm_iostat, ioparm_exist, ioparm_opened, ioparm_number, ioparm_named, ioparm_rec, ioparm_nextrec, ioparm_size, ioparm_recl_in, ioparm_recl_out, ioparm_iolength, ioparm_file, ioparm_file_len, ioparm_status, ioparm_status_len, ioparm_access, ioparm_access_len, ioparm_form, ioparm_form_len, ioparm_blank, ioparm_blank_len, ioparm_position, ioparm_position_len, ioparm_action, ioparm_action_len, ioparm_delim, ioparm_delim_len, ioparm_pad, ioparm_pad_len, ioparm_format, ioparm_format_len, ioparm_advance, ioparm_advance_len, ioparm_name, ioparm_name_len, ioparm_internal_unit, ioparm_internal_unit_len, ioparm_internal_unit_desc, ioparm_sequential, ioparm_sequential_len, ioparm_direct, ioparm_direct_len, ioparm_formatted, ioparm_formatted_len, ioparm_unformatted, ioparm_unformatted_len, ioparm_read, ioparm_read_len, ioparm_write, ioparm_write_len, ioparm_readwrite, ioparm_readwrite_len, ioparm_namelist_name, ioparm_namelist_name_len, ioparm_namelist_read_mode, ioparm_iomsg, ioparm_iomsg_len, ioparm_var): Remove. (enum ioparam_type, enum iofield_type, enum iofield, enum iocall): New enums. (gfc_st_parameter_field, gfc_st_parameter): New typedefs. (st_parameter, st_parameter_field, iocall): New variables. (ADD_FIELD, ADD_STRING): Remove. (dt_parm, dt_post_end_block): New variables. (gfc_build_st_parameter): New function. (gfc_build_io_library_fndecls): Use it. Initialize iocall array rather than ioparm_*, add extra first arguments to the function types. (set_parameter_const): New function. (set_parameter_value): Add type argument, return a bitmask. Changed to set a field in automatic structure variable rather than set a field in a global _gfortran_ioparm variable. (set_parameter_ref): Likewise. If requested var has different size than what field should point to, call with a temporary and then copy into the user variable. Add postblock argument. (set_string): Remove var_len argument, add type argument, return a bitmask. Changed to set fields in automatic structure variable rather than set a field in a global _gfortran_ioparm variable. (set_internal_unit): Remove iunit, iunit_len, iunit_desc arguments, add var argument. Return a bitmask. Changed to set fields in automatic structure variable rather than set a field in a global _gfortran_ioparm variable. (set_flag): Removed. (io_result): Add var argument. Changed to read common.flags field from automatic structure variable and bitwise AND it with 3. (set_error_locus): Add var argument. Changed to set fields in automatic structure variable rather than set a field in a global _gfortran_{filename,line} variables. (gfc_trans_open): Use gfc_start_block rather than gfc_init_block. Create a temporary st_parameter_* structure. Adjust callers of all above mentioned functions. Pass address of the temporary variable as first argument to the generated function call. Use iocall array rather than ioparm_* separate variables. (gfc_trans_close, build_filepos, gfc_trans_inquire): Likewise. (build_dt): Likewise. Change first argument to tree from tree *. Don't dereference code->ext.dt if last_dt == INQUIRE. Emit IOLENGTH argument setup here. Set dt_parm/dt_post_end_block variables and gfc_trans_code the nested data transfer commands in code->block. (gfc_trans_iolength): Just set last_dt and call build_dt immediately. (transfer_namelist_element): Pass address of dt_parm variable to generated functions. Use iocall array rather than ioparm_* separate variables. (gfc_trans_backspace, gfc_trans_endfile, gfc_trans_rewind, gfc_trans_flush, gfc_trans_read, gfc_trans_write): Use iocall array rather than ioparm_* separate variables. (gfc_trans_dt_end): Likewise. Pass address of dt_parm variable as first argument to generated function. Adjust io_result caller. Prepend dt_post_end_block before io_result code. (transfer_expr): Use iocall array rather than ioparm_* separate variables. Pass address of dt_parm variables as first argument to generated functions. * ioparm.def: New file. gcc/testsuite/ PR fortran/24774 * gfortran.dg/inquire_9.f90: New test. PR fortran/21647 * gfortran.fortran-torture/execute/inquire_5.f90: New test. libgfortran/ PR fortran/24774 PR fortran/14943 PR fortran/21647 * Makefile.am (AM_CPPFLAGS): Add gcc directories as -I paths, add -D_GNU_SOURCE. * Makefile.in: Regenerated. * acinclude.m4 (LIBGFOR_CHECK_SYNC_FETCH_AND_ADD, LIBGFOR_CHECK_GTHR_DEFAULT, LIBGFOR_CHECK_PRAGMA_WEAK): New macros. * configure.ac: Add them. * configure: Rebuilt. * config.h.in: Rebuilt. * libtool-version: Bump libgfortran.so SONAME to libgfortran.so.1. * libgfortran.h (library_start, show_locus, internal_error, generate_error, find_option): Add st_parameter_common * argument. (library_end): Change into a dummy macro. * io/io.h: Include gthr.h. (SUPPORTS_WEAK): Define if HAVE_PRAGMA_WEAK. (CHARACTER): Remove define. (st_parameter, global_t): Remove typedef. (ioparm, g, ionml, current_unit): Remove variables. (init_error_stream): Remove prototype. (CHARACTER1, CHARACTER2): Define. (st_parameter_common, st_parameter_open, st_parameter_close, st_parameter_filepos, st_parameter_inquire, st_parameter_dt): New typedefs. (IOPARM_LIBRETURN_MASK, IOPARM_LIBRETURN_OK, IOPARM_LIBRETURN_ERROR, IOPARM_LIBRETURN_END, IOPARM_LIBRETURN_EOR, IOPARM_ERR, IOPARM_END, IOPARM_EOR, IOPARM_HAS_IOSTAT, IOPARM_HAS_IOMSG, IOPARM_COMMON_MASK, IOPARM_OPEN_HAS_RECL_IN, IOPARM_OPEN_HAS_FILE, IOPARM_OPEN_HAS_STATUS, IOPARM_OPEN_HAS_ACCESS, IOPARM_OPEN_HAS_FORM, IOPARM_OPEN_HAS_BLANK, IOPARM_OPEN_HAS_POSITION, IOPARM_OPEN_HAS_ACTION, IOPARM_OPEN_HAS_DELIM, IOPARM_OPEN_HAS_PAD, IOPARM_CLOSE_HAS_STATUS, IOPARM_INQUIRE_HAS_EXIST, IOPARM_INQUIRE_HAS_OPENED, IOPARM_INQUIRE_HAS_NUMBER, IOPARM_INQUIRE_HAS_NAMED, IOPARM_INQUIRE_HAS_NEXTREC, IOPARM_INQUIRE_HAS_RECL_OUT, IOPARM_INQUIRE_HAS_FILE, IOPARM_INQUIRE_HAS_ACCESS, IOPARM_INQUIRE_HAS_FORM, IOPARM_INQUIRE_HAS_BLANK, IOPARM_INQUIRE_HAS_POSITION, IOPARM_INQUIRE_HAS_ACTION, IOPARM_INQUIRE_HAS_DELIM, IOPARM_INQUIRE_HAS_PAD, IOPARM_INQUIRE_HAS_NAME, IOPARM_INQUIRE_HAS_SEQUENTIAL, IOPARM_INQUIRE_HAS_DIRECT, IOPARM_INQUIRE_HAS_FORMATTED, IOPARM_INQUIRE_HAS_UNFORMATTED, IOPARM_INQUIRE_HAS_READ, IOPARM_INQUIRE_HAS_WRITE, IOPARM_INQUIRE_HAS_READWRITE, IOPARM_DT_LIST_FORMAT, IOPARM_DT_NAMELIST_READ_MODE, IOPARM_DT_HAS_REC, IOPARM_DT_HAS_SIZE, IOPARM_DT_HAS_IOLENGTH, IOPARM_DT_HAS_FORMAT, IOPARM_DT_HAS_ADVANCE, IOPARM_DT_HAS_INTERNAL_UNIT, IOPARM_DT_HAS_NAMELIST_NAME, IOPARM_DT_IONML_SET): Define. (gfc_unit): Add lock, waiting and close fields. Change file from flexible array member into pointer to char. (open_external): Add st_parameter_open * argument. (find_file, file_exists): Add file and file_len arguments. (flush_all_units): New prototype. (max_offset, unit_root, unit_lock): New variable. (is_internal_unit, is_array_io, next_array_record, parse_format, next_format, unget_format, format_error, read_block, write_block, next_record, convert_real, read_a, read_f, read_l, read_x, read_radix, read_decimal, list_formatted_read, finish_list_read, namelist_read, namelist_write, write_a, write_b, write_d, write_e, write_en, write_es, write_f, write_i, write_l, write_o, write_x, write_z, list_formatted_write, get_unit): Add st_parameter_dt * argument. (insert_unit): Remove prototype. (find_or_create_unit, unlock_unit): New prototype. (new_unit): Return gfc_unit *. Add st_parameter_open * and gfc_unit * arguments. (free_fnodes): Remove prototype. (free_format_data): New prototype. (scratch): Remove. (init_at_eol): Remove prototype. (free_ionml): New prototype. (inc_waiting_locked, predec_waiting_locked, dec_waiting_unlocked): New inline functions. * io/unit.c (max_offset, unit_root, unit_lock): New variables. (insert): Adjust os_error caller. (insert_unit): Made static. Allocate memory here, initialize lock and after inserting it return it, locked. (delete_unit): Adjust for deletion of g. (find_unit_1): New function. (find_unit): Use it. (find_or_create_unit): New function. (get_unit): Add dtp argument, change meaning of the int argument as creation request flag. Adjust for different st_* calling conventions, lock internal unit's lock before returning it and removal of g. Call find_unit_1 instead of find_unit. (is_internal_unit, is_array_io): Add dtp argument, adjust for removal of most of global variables. (init_units): Initialize unit_lock. Adjust insert_unit callers and adjust for g removal. (close_unit_1): New function. (close_unit): Use it. (unlock_unit): New function. (close_units): Lock unit_lock, use close_unit_1 rather than close_unit. * io/close.c (st_close): Add clp argument. Adjust for new st_* calling conventions and internal function API changes. * io/file_pos.c (st_backspace, st_endfile, st_rewind, st_flush): Add fpp argument. Adjust for new st_* calling conventions and internal function API changes. (formatted_backspace, unformatted_backspace): Likewise. Add u argument. * io/open.c (edit_modes, st_open): Add opp argument. Adjust for new st_* calling conventions and internal function API changes. (already_open): Likewise. If not HAVE_UNLINK_OPEN_FILE, unlink scratch file. Instead of calling close_unit just call sclose, free u->file if any and clear a few u fields before calling new_unit. (new_unit): Return gfc_unit *. Add opp and u arguments. Adjust for new st_* calling conventions and internal function API changes. Don't allocate unit here, rather than work with already created unit u already locked on entry. In case of failure, close_unit it. * io/unix.c: Include unix.h. (BUFFER_SIZE, unix_stream): Moved to unix.h. (unit_to_fd): Add unlock_unit call. (tempfile): Add opp argument, use its fields rather than ioparm. (regular_file): Likewise. (open_external): Likewise. Only unlink file if fd >= 0. (init_error_stream): Add error argument, set structure it points to rather than filling static variable and returning its address. (FIND_FILE0_DECL, FIND_FILE0_ARGS): Define. (find_file0): Use them. Don't crash if u->s == NULL. (find_file): Add file and file_len arguments, use them instead of ioparm. Add locking. Pass either an array of 2 struct stat or file and file_len pair to find_file0. (flush_all_units_1, flush_all_units): New functions. (file_exists): Add file and file_len arguments, use them instead of ioparm. * io/unix.h: New file. * io/lock.c (ioparm, g, ionml): Remove variables. (library_start): Add cmp argument, adjust for new st_* calling conventions. (library_end): Remove. (free_ionml): New function. * io/inquire.c (inquire_via_unit, inquire_via_filename, st_inquire): Add iqp argument, adjust for new st_* calling conventions and internal function API changes. * io/format.c (FARRAY_SIZE): Decrease to 64. (fnode_array, format_data): New typedefs. (avail, array, format_string, string, error, saved_token, value, format_string_len, reversion_ok, saved_format): Remove variables. (colon_node): Add const. (free_fnode, free_fnodes): Remove. (free_format_data): New function. (next_char, unget_char, get_fnode, format_lex, parse_format_list, format_error, parse_format, revert, unget_format, next_test): Add fmt or dtp arguments, pass it all around, adjust for internal function API changes and adjust for removal of global variables. (next_format): Likewise. Constify return type. (next_format0): Constify return type. * io/transfer.c (current_unit, sf_seen_eor, eor_condition, max_pos, skips, pending_spaces, scratch, line_buffer, advance_status, transfer): Remove variables. (transfer_integer, transfer_real, transfer_logical, transfer_character, transfer_complex, transfer_array, current_mode, read_sf, read_block, read_block_direct, write_block, write_block_direct, unformatted_read, unformatted_write, type_name, write_constant_string, require_type, formatted_transfer_scalar, us_read, us_write, pre_position, data_transfer_init, next_record_r, next_record_w, next_record, finalize_transfer, iolength_transfer, iolength_transfer_init, st_iolength, st_iolength_done, st_read, st_read_done, st_write, st_write_done, st_set_nml_var, st_set_nml_var_dim, next_array_record): Add dtp argument, pass it all around, adjust for internal function API changes and removal of global variables. * io/list_read.c (repeat_count, saved_length, saved_used, input_complete, at_eol, comma_flag, last_char, saved_string, saved_type, namelist_mode, nml_read_error, value, parse_err_msg, nml_err_msg, prev_nl): Remove variables. (push_char, free_saved, next_char, unget_char, eat_spaces, eat_separator, finish_separator, nml_bad_return, convert_integer, parse_repeat, read_logical, read_integer, read_character, parse_real, read_complex, read_real, check_type, list_formatted_read_scalar, list_formatted_read, finish_list_read, find_nml_node, nml_untouch_nodes, nml_match_name, nml_query, namelist_read): Add dtp argument, pass it all around, adjust for internal function API changes and removal of global variables. (nml_parse_qualifier): Likewise. Add parse_err_msg argument. (nml_read_obj): Likewise. Add pprev_nl, nml_err_msg, clow and chigh arguments. (nml_get_obj_data): Likewise. Add pprev_nl and nml_err_msg arguments. (init_at_eol): Removed. * io/read.c (convert_real, read_l, read_a, next_char, read_decimal, read_radix, read_f, read_x): Add dtp argument, pass it all around, adjust for internal function API changes and removal of global variables. (set_integer): Adjust internal_error caller. * io/write.c (no_leading_blank, nml_delim): Remove variables. (write_a, calculate_sign, calculate_G_format, output_float, write_l, write_float, write_int, write_decimal, write_i, write_b, write_o, write_z, write_d, write_e, write_f, write_en, write_es, write_x, write_char, write_logical, write_integer, write_character, write_real, write_complex, write_separator, list_formatted_write_scalar, list_formatted_write, nml_write_obj, namelist_write): Add dtp argument, pass it all around, adjust for internal function API changes and removal of global variables. (extract_int, extract_uint, extract_real): Adjust internal_error callers. * runtime/fpu.c (_GNU_SOURCE): Don't define here. * runtime/error.c: Include ../io/unix.h. (filename, line): Remove variables. (st_printf): Pass address of a local variable to init_error_stream. (show_locus): Add cmp argument. Use fields it points to rather than filename and line variables. (os_error, runtime_error): Remove show_locus calls. (internal_error): Add cmp argument. Pass it down to show_locus. (generate_error): Likewise. Use flags bitmask instead of non-NULL check for iostat and iomsg parameter presence, adjust for st_* calling convention changes. * runtime/stop.c (stop_numeric, stop_string): Remove show_locus calls. * runtime/pause.c (pause_numeric, pause_string): Likewise. * runtime/string.c: Include ../io/io.h. (find_option): Add cmp argument. Pass it down to generate_error. * intrinsics/flush.c (recursive_flush): Remove. (flush_i4, flush_i8): Use flush_all_units. Add unlock_unit call. * intrinsics/rand.c: Include ../io/io.h. (rand_seed_lock): New variable. (srand, irand): Add locking. (init): New constructor function. * intrinsics/random.c: Include ../io/io.h. (random_lock): New variable. (random_r4, random_r8, arandom_r4, arandom_r8): Add locking. (random_seed): Likewise. open failed if fd < 0. Set i correctly. (init): New constructor function. * intrinsics/system_clock.c (tp0, t0): Remove. (system_clock_4, system_clock_8): Don't subtract tp0/t0 from current time, use just integer arithmetics. * intrinsics/tty.c (isatty_l4, isatty_l8, ttynam_sub): Add unlock_unit calls. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107328 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-20 * Makefile.am: Revert 2005-11-14 change. Enable -free-vectorizeRichard Henderson
via gmake per-target variables. * Makefile.in, aclocal.m4: Regenerate. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107261 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-18 * configure.ac: Add "-I ." to the AM_FCFLAGS.Francois-Xavier Coudert
* configure: Regenerate. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107172 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-18 * config/fpu-glibc.h (set_fpu): Only call fedisableexcept forHans-Peter Nilsson
nonzero FE_ALL_EXCEPT. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107145 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-17 PR fortran/24892Francois-Xavier Coudert
* io/io.h (unit_access): Add ACCESS_APPEND. * io/open.c (access_opt): Add APPEND value for ACCESS keyword. (st_open): Use that new value to set the POSITION accordingly. * gfortran.dg/open_access_append_1.f90: New test. * gfortran.dg/open_access_append_2.f90: New test. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@107119 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-142005-11-14 Janne Blomqvist <jb@gcc.gnu.org>Janne Blomqvist
PR fortran/21468 * Makefile.am: Add -ftree-vectorize for compiling matmul. * m4/matmul.m4: Add const and restrict to type declarations as appropriate. * m4/matmull.m4: Likewise. * Makefile.in: Regenerated. * generated/matmul_*.c: Likewise. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@106898 138bc75d-0d04-0410-961f-82ee72b054a4
2005-11-13 * intrinsics/fget.c: New file.Francois-Xavier Coudert
* intrinsics/ftell.c: New file. * io/unix.c (stream_offset): New function. * io/io.h: Add prototype for stream_offset. * Makefile.am: Add intrinsics/fget.c and intrinsics/ftell.c. * Makefile.in: Regenerate. * intrinsic.c (add_functions): Add COMPLEX, FTELL, FGETC, FGET, FPUTC, FPUT, AND, XOR and OR intrinsic functions. (add_subroutines): Add FGETC, FGET, FPUTC, FPUT and FTELL intrinsic subroutines. * gfortran.h: Add GFC_ISYM_AND, GFC_ISYM_COMPLEX, GFC_ISYM_FGET, GFC_ISYM_FGETC, GFC_ISYM_FPUT, GFC_ISYM_FPUTC, GFC_ISYM_FTELL, GFC_ISYM_OR, GFC_ISYM_XOR. * iresolve.c (gfc_resolve_and, gfc_resolve_complex, gfc_resolve_or, gfc_resolve_fgetc, gfc_resolve_fget, gfc_resolve_fputc, gfc_resolve_fput, gfc_resolve_ftell, gfc_resolve_xor, gfc_resolve_fgetc_sub, gfc_resolve_fget_sub, gfc_resolve_fputc_sub, gfc_resolve_fput_sub, gfc_resolve_ftell_sub): New functions. * check.c (gfc_check_complex, gfc_check_fgetputc_sub, gfc_check_fgetputc, gfc_check_fgetput_sub, gfc_check_fgetput, gfc_check_ftell, gfc_check_ftell_sub, gfc_check_and): New functions. * simplify.c (gfc_simplify_and, gfc_simplify_complex, gfc_simplify_or, gfc_simplify_xor): New functions. * trans-intrinsic.c (gfc_conv_intrinsic_function): Add cases for GFC_ISYM_AND, GFC_ISYM_COMPLEX, GFC_ISYM_FGET, GFC_ISYM_FGETC, GFC_ISYM_FPUT, GFC_ISYM_FPUTC, GFC_ISYM_FTELL, GFC_ISYM_OR and GFC_ISYM_XOR. * intrinsic.h: Add prototypes for all functions added to iresolve.c, simplify.c and check.c. * gfortran.dg/complex_intrinsic_1.f90: New test. * gfortran.dg/complex_intrinsic_2.f90: New test. * gfortran.dg/fgetc_1.f90: New test. * gfortran.dg/fgetc_2.f90: New test. * gfortran.dg/fgetc_3.f90: New test. * gfortran.dg/ftell_1.f90: New test. * gfortran.dg/ftell_2.f90: New test. * gfortran.dg/gnu_logical_1.F: New test. * gfortran.dg/gnu_logical_2.f90: New test. git-svn-id: https://gcc.gnu.org/svn/gcc/trunk@106859 138bc75d-0d04-0410-961f-82ee72b054a4
generated by cgit v1.2.3 (git 2.25.1) at 2024-07-13 13:25:06 +0000