aboutsummaryrefslogtreecommitdiff
path: root/libgfortran
AgeCommit message (Collapse)AuthorFilesLines
2007-08-06re PR fortran/30947 (intrinsic: ALARM)Francois-Xavier Coudert3-10/+78
PR fortran/30947 * iresolve.c (gfc_resolve_alarm_sub): Suffix the subroutine name with the kind of the STATUS argument. * intrinsics/signal.c: Create specific versions of alarm_sub and alarm_sub_int according to the integer kind of the last argument. * gfortran.map (GFORTRAN_1.0): Remove _gfortran_alarm_sub and _gfortran_alarm_sub_int, add _gfortran_alarm_sub_i4, _gfortran_alarm_sub_i8, _gfortran_alarm_sub_int_i4 and _gfortran_alarm_sub_int_i8. From-SVN: r127259
2007-08-06re PR fortran/29828 ([F2003] MIN and MAX with character variables)Francois-Xavier Coudert3-1/+72
PR fortran/29828 * trans.h (gfor_fndecl_string_minmax): New prototype. * trans-decl.c (gfor_fndecl_string_minmax): New variable. (gfc_build_intrinsic_function_decls): Create gfor_fndecl_string_minmax. * check.c (gfc_check_min_max): Allow for character arguments. * trans-intrinsic.c (gfc_conv_intrinsic_minmax_char): New function. (gfc_conv_intrinsic_function): Add special case for MIN and MAX intrinsics with character arguments. * simplify.c (simplify_min_max): Add simplification for character arguments. * intrinsics/string_intrinsics.c (string_minmax): New function and prototype. * gfortran.map (GFORTRAN_1.0): Add _gfortran_string_minmax * gfortran.dg/minmax_char_1.f90: New test. * gfortran.dg/minmax_char_2.f90: New test. * gfortran.dg/min_max_optional_4.f90: New test. From-SVN: r127252
2007-08-05re PR fortran/31202 (Incorrect rounding generated for NINT)Francois-Xavier Coudert3-2/+31
2007-08-05 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> PR fortran/31202 * intrinsics/c99_functions.c (roundl): Provide fallback implementation for systems without ceill. * c99_protos.h (roundl): Define prototype in all cases. From-SVN: r127227
2007-08-03re PR libfortran/32977 (All gfortran tests fail on Tru64 UNIX V4.0F: ↵Thomas Koenig2-2/+23
vsnprintf missing) 2007-08-03 Thomas Koenig <tkoenig@gcc.gnu.org> PR libfortran/32977 * io/unix.c: If there is no vsnprintf, use vsprintf and issue a fatal error when a buffer overrun occurs. From-SVN: r127187
2007-08-03re PR fortran/31202 (Incorrect rounding generated for NINT)Francois-Xavier Coudert7-9/+629
PR fortran/31202 * f95-lang.c (gfc_init_builtin_functions): Defin builtins for lround{f,,l} and llround{f,,l}. * trans-intrinsic.c (build_fix_expr): Generate calls to the {l,}round{f,,l} functions. * intrinsics/c99_functions.c (roundl,lroundf,lround,lroundl, llroundf,llround,llroundl): New functions. * c99_protos.h (roundl,lroundf,lround,lroundl,llroundf,llround, llroundl): New prototypes. * configure.ac: Check for lroundf, lround, lroundl, llroundf, llround and llroundl. * configure: Regenerate. * Makefile.in: Regenerate. * config.h.in: Regenerate. * gfortran.dg/nint_2.f90: New test. From-SVN: r127185
2007-07-30* libgfortran.h: Include <stdarg.h>.Francois-Xavier Coudert2-0/+5
From-SVN: r127060
2007-07-29re PR libfortran/32858 (printf-capabilities for runtime_error())Thomas Koenig14-256/+184
2007-07-29 Thomas Koenig <tkoenig@gcc.gnu.org> PR libfortran/32858 PR libfortran/30814 * configure.ac: Added checks for presence of stdio.h and stdarg.h. Test presence of vsnprintf(). * configure: Regenerated. * config.h.in: Regenerated. * libgfortran.h: Include <stdio.h>. Add printf attribute to prototype of runtime_error. Remove prototype for st_sprintf. Add prototype for st_vprintf. * runtime/main.c (store_exec_path): Replace st_sprintf by sprintf. * runtime/error.c (st_sprintf): Remove. (runtime_error): Rewrite as a variadic function. Call st_vprintf(). * intrinsics/pack_generic.c: Output extents of LHS and RHS for bounds error. * io/open.c (new_unit): Replace st_sprintf by sprintf. * io/list_read.c (convert_integer): Likewise. (parse_repeat): Likewise. (read_logical): Likewise. (read_character): Likewise. (parse_real): Likewise. (read_real): Likewise. (check_type): Likewise. (nml_parse_qualifyer): Likewise. (nml_read_obj): Likewise. (nml_get_ojb_data): Likewise. * io/unix.c (init_error_stream): Remove. (tempfile): Replace st_sprintf by sprintf. (st_vprintf): New function. (st_printf): Rewrite to call st_vprintf. * io/transfer.c (require_type): Replace st_sprintf by sprintf. * io/format.c (format_error): Likewise. * io/write.c (nml_write_obj): Likewise. 2007-07-29 Thomas Koenig <tkoenig@gcc.gnu.org> PR libfortran/32858 PR libfortran/30814 * gfortran.dg/pack_bounds_1.f90: Adjust to new error message. From-SVN: r127049
2007-07-27Fortran frontend changelog:Janne Blomqvist2-7/+12
2007-07-27 Janne Blomqvist <jb@gcc.gnu.org> * trans-io.c (gfc_build_io_library_fndecls): Change to use gfc_array_index_type for array descriptor triplets instead of gfc_int4_type_node. libgfortran ChangeLog: 2007-07-27 Janne Blomqvist <jb@gcc.gnu.org> * io/transfer.c (st_set_nml_var_dim): Use index_type instead of GFC_INTEGER_4 for array descriptor triplets. From-SVN: r126992
2007-07-27* io/unix.c (stream_ttyname): Mark argument as potentialy unused.Francois-Xavier Coudert2-1/+5
From-SVN: r126983
2007-07-27re PR fortran/32035 ('<anonymous>' may be used uninitialized in this function)Francois-Xavier Coudert2-8/+14
PR fortran/32035 * trans-stmt.c (gfc_trans_character_select): Replace the mechanism with labels by a SWITCH_EXPR. * trans-decl.c (gfc_build_builtin_function_decls): Change return type for select_string. * runtime/select.c (select_string): Adjust prototype and function so that the return value is an integer, not a pointer. * gfortran.dg/select_char_1.f90: New test. From-SVN: r126978
2007-07-24ChangeLog: Correct entry.Tobias Burnus2-0/+5
gcc/fortran/ 2007-07-24 Tobias Burnus <burnus@net-b.de> * ChangeLog: Correct entry. libgfortran/ 2007-07-24 Tobias Burnus <burnus@net-b.de> * libgfortran.h: Add bounds_check to compile_options_t. From-SVN: r126877
2007-07-24re PR fortran/30814 (non-conforming array sizes in PACK should raise an error)Thomas Koenig3-14/+38
2007-07-24 Thomas Koenig <tkoenig@gcc.gnu.org> PR fortran/30814 * trans-decl.c (generate_function_code): Add argument for flag_bounds_check to the array for set_options. * invoke.texi: Mention that some checks require -fbounds-check to be set during compilation of the main program. 2007-07-24 Thomas Koenig <tkoenig@gcc.gnu.org> PR fortran/30814 * libgfortran.h: Add bounds_check to compile_options_t. * runtime/compile_options.c (set_options): Add handling of compile_options.bounds_check. * intrinsics/pack_generic.c (pack_internal): Also determine the number of elements if compile_options.bounds_check is true. Raise runtime error if a different array shape is detected. 2007-07-24 Thomas Koenig <tkoenig@gcc.gnu.org> PR fortran/30814 * gfortran.dg/pack_bounds_1.f90: New test case. From-SVN: r126866
2007-07-23re PR fortran/32600 ([ISO Bind C] C_F_POINTER w/o SHAPE should not be a ↵Christopher D. Rickett4-22/+7
library function) 2007-07-23 Christopher D. Rickett <crickett@lanl.gov> Tobias Burnus <burnus@net-b.de> PR fortran/32600 * trans-expr.c (gfc_conv_function_call): Handle c_funloc. * trans-types.c: Add pfunc_type_node. (gfc_init_types,gfc_typenode_for_spec): Use it. * resolve.c (gfc_iso_c_func_interface): Fix whitespace and improve error message. 2007-07-23 Christopher D. Rickett <crickett@lanl.gov> PR fortran/32600 * intrinsics/iso_c_binding.c (c_funloc): Remove. * intrinsics/iso_c_binding.h: Remove c_funloc. * gfortran.map: Ditto. 2007-07-23 Christopher D. Rickett <crickett@lanl.gov> PR fortran/32600 * gfortran.dg/c_funloc_tests_5.f03: New. * gfortran.dg/c_funloc_tests_5.f04: New. * gfortran.dg/c_funloc_tests_4_driver.c: New. Co-Authored-By: Tobias Burnus <burnus@net-b.de> From-SVN: r126835
2007-07-23read.c (convert_real): Generate error only on EINVAL.Jerry DeLisle2-4/+7
2007-07-22 Jerry DeLisle <jvdelisle@gcc.gnu.org> * io/read.c (convert_real): Generate error only on EINVAL. From-SVN: r126834
2007-07-21re PR fortran/32627 ([ISO Bind C] Accept c_f_pointer for TYPE)Christopher D. Rickett5-1/+259
2007-07-21 Christopher D. Rickett <crickett@lanl.gov> PR fortran/32627 * resolve.c (set_name_and_label): Set kind number for character version of c_f_pointer. (gfc_iso_c_sub_interface): Set the kind of the SHAPE formal arg to that of the actual SHAPE arg. * symbol.c (gen_shape_param): Initialize kind for SHAPE arg. 2007-07-21 Christopher D. Rickett <crickett@lanl.gov> PR fortran/32627 * libgfortran/intrinsics/iso_c_generated_procs.c: Add c_f_pointer for character/string arguments. * libgfortran/intrinsic/iso_c_binding.c (c_f_pointer_u0): Allow the optional SHAPE arg to be any valid integer kind. * libgfortran/gfortran.map: Add c_f_pointer_s0. * libgfortran/mk-kinds-h.sh: Save smallest integer kind as default character kind. * libgfortran/intrinsics/iso_c_generated_procs.c: Add versions of c_f_pointer for complex and logical types. * libgfortran/gfortran.map: Add c_f_pointer versions for logical and complex types. 2007-07-21 Christopher D. Rickett <crickett@lanl.gov> PR fortran/32627 * gfortran.dg/pr32627_driver.c: Driver for pr32627. * gfortran.dg/pr32627.f03: New test case. * gfortran.dg/c_f_pointer_logical.f03: New test case. * gfortran.dg/c_f_pointer_logical_driver.c: Driver for c_f_pointer_logical. * gfortran.dg/c_f_pointer_complex_driver.c: Driver for c_f_pointer_complex. * gfortran.dg/c_f_pointer_complex.f03: New test case. * gfortran.dg/c_f_pointer_shape_tests_2_driver.c: Driver for c_f_pointer_shape_tests_2. * gfortran.dg/c_f_pointer_shape_tests_2.f03: New test case. From-SVN: r126817
2007-07-19re PR fortran/32600 ([ISO Bind C] C_F_POINTER w/o SHAPE should not be a ↵Christopher D. Rickett4-19/+7
library function) 2007-07-19 Christopher D. Rickett <crickett@lanl.gov> PR fortran/32600 * trans-expr.c (gfc_conv_function_call): Inline C_LOC. 2007-07-19 Christopher D. Rickett <crickett@lanl.gov> PR fortran/32600 * libgfortran/intrinsics/iso_c_binding.c: Remove C_LOC. * libgfortran/intrinsics/iso_c_binding.h: Ditto. * libgfortran/gfortran.map: Ditto. From-SVN: r126744
2007-07-15re PR libfortran/32611 (Print sign of negative zero)Jerry DeLisle5-20/+52
2007-07-15 Jerry DeLisle <jvdelisle@gcc.gnu.org> Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> PR fortran/32611 * runtime/compile_options.c (set_std): Remove. (set_options): New function. (init_compile_options): Add initialization for -fsign-zero option. * gfortran.map (GFORTRAN_1.0): Rename _gfortran_set_std into _gfortran_set_options. * libgfortran.h (compile_options_t): Add sign_zero field. * io/write.c (output_float): Use the sign bit of the value to determine if a negative sign should be emitted for zero values. Do not emit the negative sign for zero if -fno-sign-zero was set during compile. Co-Authored-By: Francois-Xavier Coudert <fxcoudert@gcc.gnu.org> From-SVN: r126654
2007-07-15re PR libfortran/32752 (Segfault on WRITE with modified unix_stream structure)Jerry DeLisle3-8/+17
2007-07-14 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR libgfortran/32752 * io/unix.c (unix_stream): Move buffer pointer adjacent to small_buffer. * io/transfer.c (formatted_transfer_scalar): If stream I/O, set bytes_used to zero. Fix off by one error in calculation of pos and skips. Eliminate duplicate pending_spaces check. From-SVN: r126652
2007-07-14re PR fortran/32357 (MVBITS gives wrong-code on big-endian with ↵Francois-Xavier Coudert2-4/+10
-fdefault-integer-8) PR fortran/32357 * iresolve.c (gfc_resolve_mvbits): Convert FROMPOS, LEN and TOPOS to C int. * intrinsics/mvbits.c: Change prototype so that FROMPOS, LEN and TOPOS arguments are C int. * gfortran.dg/mvbits_2.f90: New test. From-SVN: r126646
2007-07-10re PR libfortran/32702 (crash when printing big character variable)Jerry DeLisle2-6/+41
2007-07-09 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR libgfortran/32702 * io/unix.c (unix_stream): Restore buffer pointer and small_buffer. (fd_alloc): If the number of bytes needed is greater than the default BUFFER_SIZE, allocate a new buffer large enough. Free the old buffer if necessary. (fd_sfree): Restore use of buffer pointer. (fd_close): Likewise. (fd_open): Likewise. (init_error_stream): Likewise. From-SVN: r126510
2007-07-09re PR libfortran/32336 (matmul: flag runtime- instead of assertation error)Thomas Koenig15-14/+43
2007-07-09 Thomas Koenig <tkoenig@gcc.gnu.org> PR libfortran/32336 * m4/matmul.m4: When the dimension of b is incorrect, raise a runtime error instead of a failed assertion. * generated/matmul_i1.c: Regenerated. * generated/matmul_i2.c: Regenerated. * generated/matmul_i4.c: Regenerated. * generated/matmul_i8.c: Regenerated. * generated/matmul_i16.c: Regenerated. * generated/matmul_r4.c: Regenerated. * generated/matmul_r8.c: Regenerated. * generated/matmul_r10.c: Regenerated. * generated/matmul_r16.c: Regenerated. 2007-07-09 Thomas Koenig <tkoenig@gcc.gnu.org> PR libfortran/32336 * gfortran.dg/matmul_5.f90: New test case. From-SVN: r126498
2007-07-09re PR fortran/32678 ([4.2, 4.1]GFortan works incorrectly when writing with ↵Jerry DeLisle2-0/+8
FORMAT Tx) 2007-07-08 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR libgfortran/32678 * io/transfer.c (formatted_transfer_scalar): Don't allow pending_spaces to go negative. From-SVN: r126473
2007-07-08re PR fortran/32217 (segfaults (at runtime) on UNPACK with zero-sized arrays)Thomas Koenig2-0/+15
2007-07-08 Thomas Koenig <tkoenig@gcc.gnu.org> PR libfortran/32217 * intrinsics/unpack_generic.c: If the destination array is empty, return early. 2007-07-08 Thomas Koenig <tkoenig@gcc.gnu.org> PR libfortran/32217 * gfortran.dg/unpack_zerosize_1.f90: New test case. From-SVN: r126469
2007-07-05Regenerate aclocal.m4 in boehm-gc, libffi, libgfortran, libgomp,H.J. Lu2-6378/+6
libjava, libmudflap, libobjc, libssp and zlib. From-SVN: r126373
2007-07-04configure.ac: SUBST CFLAGS.David Edelsohn3-1/+8
* configure.ac: SUBST CFLAGS. * configure: Regenerate. From-SVN: r126324
2007-07-03Fortran frontend:Janne Blomqvist3-47/+39
2007-07-03 Janne Blomqvist <jb@gcc.gnu.org> * trans-decl.c (gfc_build_builtin_function_decls): Mark internal_realloc as a malloc function. libgfortran: 2007-07-03 Janne Blomqvist <jb@gcc.gnu.org> * libgfortran.h: Mark internal_malloc_size as a malloc function. * runtime/memory.c (internal_realloc_size): Remove. (internal_realloc): Call realloc directly instead of internal_realloc_size. (allocate_size): Remove. (allocate): Call malloc directly instead of allocate_size, mark as malloc function. From-SVN: r126264
2007-07-02[multiple changes]Steven G. Kargl2-4/+31
2007-07-02 Steven G. Kargl <kargl@gcc.gnu.org> Restore collateral damage from ISO C Binding merge. 2007-06-29 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR libgfortran/32456 * io/unit.c (filename_from_unit): Don't use find_unit, instead search for unit directly. From-SVN: r126238
2007-07-02Makefile.in: Regenerated with automake 1.9.6.Steven G. Kargl2-18/+36
2007-07-02 Steven G. Kargl <kargl@gcc.gnu.org> * Makefile.in: Regenerated with automake 1.9.6. From-SVN: r126232
2007-07-02Makefile.in: Remove extraneous kill.lo rule.Steven G. Kargl2-3/+4
2007-07-02 Steven G. Kargl <kargl@gcc.gnu.org> * Makefile.in: Remove extraneous kill.lo rule. From-SVN: r126220
2007-07-02Forgot to delete these during yesterdays commit.Janne Blomqvist5-320/+5
2007-07-02 Janne Blomqvist <jb@gcc.gnu.org> PR fortran/32239 * generated/pow_r*_i4.c: Removed. From-SVN: r126215
2007-07-02[multiple changes]Christopher D. Rickett9-23/+636
2007-07-01 Christopher D. Rickett <crickett@lanl.gov> * interface.c (gfc_compare_derived_types): Special case for comparing derived types across namespaces. (gfc_compare_types): Deal with BT_VOID. (compare_parameter): Use BT_VOID to accept ISO C Binding pointers. * trans-expr.c (gfc_conv_function_call): Remove setting parm_kind to SCALAR (gfc_conv_initializer): Deal with ISO C Binding NULL_PTR and NULL_FUNPTR. (gfc_conv_expr): Convert expressions for ISO C Binding derived types. * symbol.c (gfc_set_default_type): BIND(C) variables should not be implicitly declared. (check_conflict): Add BIND(C) and check for conflicts. (gfc_add_explicit_interface): Whitespace. (gfc_add_is_bind_c): New function. (gfc_copy_attr): Use it. (gfc_new_symbol): Initialize ISO C Binding objects. (get_iso_c_binding_dt): New function. (verify_bind_c_derived_type): Ditto. (gen_special_c_interop_ptr): Ditto. (add_formal_arg): Ditto. (gen_cptr_param): Ditto. (gen_fptr_param): Ditto. (gen_shape_param): Ditto. (add_proc_interface): Ditto. (build_formal_args): Ditto. (generate_isocbinding_symbol): Ditto. (get_iso_c_sym): Ditto. * decl.c (num_idents_on_line, has_name_equals): New variables. (verify_c_interop_param): New function. (build_sym): Finish binding labels and deal with COMMON blocks. (add_init_expr_to_sym): Check if the initialized expression is an iso_c_binding named constants (variable_decl): Set ISO C Binding type_spec components. (gfc_match_kind_spec): Check match for C interoperable kind. (match_char_spec): Fix comment. Chnage gfc_match_small_int to gfc_match_small_int_expr. Check for C interoperable kind. (match_type_spec): Clear the current binding label. (match_attr_spec): Add DECL_IS_BIND_C. If BIND(C) is found, use it to set attributes. (set_binding_label): New function. (set_com_block_bind_c): Ditto. (verify_c_interop): Ditto. (verify_com_block_vars_c_interop): Ditto. (verify_bind_c_sym): Ditto. (set_verify_bind_c_sym): Ditto. (set_verify_bind_c_com_block): Ditto. (get_bind_c_idents): Ditto. (gfc_match_bind_c_stmt): Ditto. (gfc_match_data_decl): Use num_idents_on_line. (match_result): Deal with right paren in BIND(C). (gfc_match_suffix): New function. (gfc_match_function_decl): Use it. Code is re-arranged to deal with ISO C Binding result clauses. (gfc_match_subroutine): Deal with BIND(C). (gfc_match_bind_c): New function. (gfc_get_type_attr_spec): New function. Code is re-arranged in and taken from gfc_match_derived_decl. (gfc_match_derived_decl): Add check for BIND(C). * trans-common.c: Forward declare gfc_get_common. (gfc_sym_mangled_common_id): Change arg from 'const char *name' to 'gfc_common_head *com'. Check for ISO C Binding of the common block. (build_common_decl): 'com->name' to 'com in SET_DECL_ASSEMBLER_NAME. * gfortran.h: Add GFC_MAX_BINDING_LABEL_LEN (bt): Add BT_VOID (sym_flavor): Add FL_VOID. (iso_fortran_env_symbol, iso_c_binding_symbol, intmod_id): New enum (CInteropKind_t): New struct. (c_interop_kinds_table): Use it. Declare an array of structs. (symbol_attribute): Add is_bind_c, is_c_interop, and is_iso_c bitfields. (gfc_typespec): Add is_c_interop; is_iso_c, and f90_type members. (gfc_symbol): Add from_intmod, intmod_sym_id, binding_label, and common_block members. (gfc_common_head): Add binding_label and is_bind_c members. (gfc_gsymbol): Add sym_name, mod_name, and binding_label members. Add prototypes for get_c_kind, gfc_validate_c_kind, gfc_check_any_c_kind, gfc_add_is_bind_c, gfc_add_value, verify_c_interop, verify_c_interop_param, verify_bind_c_sym, verify_bind_c_derived_type, verify_com_block_vars_c_interop, generate_isocbinding_symbol, get_iso_c_sym, gfc_iso_c_sub_interface * iso-c-binding.def: New file. This file contains the definitions of the types provided by the Fortran 2003 ISO_C_BINDING intrinsic module. * trans-const.c (gfc_conv_constant_to_tree): Deal with C_NULL_PTR or C_NULL_FUNPTR expressions. * expr.c (gfc_copy_expr): Add BT_VOID case. For BT_CHARACTER, the ISO C Binding requires a minimum string length of 1 for '\0'. * module.c (intmod_sym): New struct. (pointer_info): Add binding_label member. (write_atom): Set len to 0 for NULL pointers. Check for NULL p and *p. (ab_attribute): Add AB_IS_BIND_C, AB_IS_C_INTEROP and AB_IS_ISO_C. (attr_bits): Add "IS_BIND_C", "IS_C_INTEROP", and "IS_ISO_C". (mio_symbol_attribute): Deal with ISO C Binding attributes. (bt_types): Add "VOID". (mio_typespec): Deal with ISO C Binding components. (mio_namespace_ref): Add intmod variable. (mio_symbol): Check for symbols from an intrinsic module. (load_commons): Check for BIND(C) common block. (read_module): Read binding_label and use it. (write_common): Add label. Write BIND(C) info. (write_blank_common): Blank commons are not BIND(C). Explicitly set is_bind_c=0. (write_symbol): Deal with binding_label. (sort_iso_c_rename_list): New function. (import_iso_c_binding_module): Ditto. (create_int_parameter): Add to args. (use_iso_fortran_env_module): Adjust to deal with iso_c_binding intrinsic module. * trans-types.c (c_interop_kinds_table): new array of structs. (gfc_validate_c_kind): New function. (gfc_check_any_c_kind): Ditto. (get_real_kind_from_node): Ditto. (get_int_kind_from_node): Ditto. (get_int_kind_from_width): Ditto. (get_int_kind_from_minimal_width): Ditto. (init_c_interop_kinds): Ditto. (gfc_init_kinds): call init_c_interop_kinds. (gfc_typenode_for_spec): Adjust for BT_VOID and ISO C Binding pointers. Adjust handling of BT_DERIVED. (gfc_sym_type): Whitespace. (gfc_get_derived_type): Account for iso_c_binding derived types * resolve.c (is_scalar_expr_ptr): New function. (gfc_iso_c_func_interface): Ditto. (resolve_function): Use gfc_iso_c_func_interface. (set_name_and_label): New function. (gfc_iso_c_sub_interface): Ditto. (resolve_specific_s0): Use gfc_iso_c_sub_interface. (resolve_bind_c_comms): New function. (resolve_bind_c_derived_types): Ditto. (gfc_verify_binding_labels): Ditto. (resolve_fl_procedure): Check for ISO C interoperability. (resolve_symbol): Check C interoperability. (resolve_types): Walk the namespace. Check COMMON blocks. * trans-decl.c (gfc_sym_mangled_identifier): Prevent the mangling of identifiers that have an assigned binding label. (gfc_sym_mangled_function_id): Use the binding label rather than the mangled name. (gfc_finish_var_decl): Put variables that are BIND(C) into a common segment of the object file, because this is what C would do. (gfc_create_module_variable): Conver to proper types (set_tree_decl_type_code): New function. (generate_local_decl): Check dummy variables and derived types for ISO C Binding attributes. * match.c (gfc_match_small_int_expr): New function. (gfc_match_name_C): Ditto. (match_common_name): Deal with ISO C Binding in COMMON blocks * trans-io.c (transfer_expr): Deal with C_NULL_PTR or C_NULL_FUNPTR expressions * match.h: Add prototypes for gfc_match_small_int_expr, gfc_match_name_C, match_common_name, set_com_block_bind_c, set_binding_label, set_verify_bind_c_sym, set_verify_bind_c_com_block, get_bind_c_idents, gfc_match_bind_c_stmt, gfc_match_suffix, gfc_match_bind_c, gfc_get_type_attr_spec * parse.c (decode_statement): Use gfc_match_bind_c_stmt (parse_derived): Init *derived_sym = NULL, and gfc_current_block later for valiadation. * primary.c (got_delim): Set ISO C Binding components of ts. (match_logical_constant): Ditto. (match_complex_constant): Ditto. (match_complex_constant): Ditto. (gfc_match_rvalue): Check for existence of at least one arg for C_LOC, C_FUNLOC, and C_ASSOCIATED. * misc.c (gfc_clear_ts): Clear ISO C Bindoing components in ts. (get_c_kind): New function. 2007-07-01 Christopher D. Rickett <crickett@lanl.gov> * Makefile.in: Add support for iso_c_generated_procs.c and iso_c_binding.c. * Makefile.am: Ditto. * intrinsics/iso_c_generated_procs.c: New file containing helper functions. * intrinsics/iso_c_binding.c: Ditto. * intrinsics/iso_c_binding.h: New file * gfortran.map: Include the __iso_c_binding_c_* functions. * libgfortran.h: define GFC_NUM_RANK_BITS. 2007-06-23 Christopher D. Rickett <crickett@lanl.gov> * bind_c_array_params.f03: New files for Fortran 2003 ISO C Binding. * bind_c_coms.f90: Ditto. * bind_c_coms_driver.c: Ditto. * bind_c_dts.f90: Ditto. * bind_c_dts_2.f03: Ditto. * bind_c_dts_2_driver.c: Ditto. * bind_c_dts_3.f03: Ditto. * bind_c_dts_4.f03: Ditto. * bind_c_dts_driver.c: Ditto. * bind_c_implicit_vars.f03: Ditto. * bind_c_procs.f03: Ditto. * bind_c_usage_2.f03: Ditto. * bind_c_usage_3.f03: Ditto. * bind_c_usage_5.f03: Ditto. * bind_c_usage_6.f03: Ditto. * bind_c_usage_7.f03: Ditto. * bind_c_vars.f90: Ditto. * bind_c_vars_driver.c: Ditto. * binding_c_table_15_1.f03: Ditto. * binding_label_tests.f03: Ditto. * binding_label_tests_10.f03: Ditto. * binding_label_tests_10_main.f03: Ditto. * binding_label_tests_11.f03: Ditto. * binding_label_tests_11_main.f03: Ditto. * binding_label_tests_12.f03: Ditto. * binding_label_tests_13.f03: Ditto. * binding_label_tests_13_main.f03: Ditto. * binding_label_tests_14.f03: Ditto. * binding_label_tests_2.f03: Ditto. * binding_label_tests_3.f03: Ditto. * binding_label_tests_4.f03: Ditto. * binding_label_tests_5.f03: Ditto. * binding_label_tests_6.f03: Ditto. * binding_label_tests_7.f03: Ditto. * binding_label_tests_8.f03: Ditto. * binding_label_tests_9.f03: Ditto. * c_assoc.f90: Ditto. * c_assoc_2.f03: Ditto. * c_f_pointer_shape_test.f90: Ditto. * c_f_pointer_tests.f90: Ditto. * c_f_tests_driver.c: Ditto. * c_funloc_tests.f03: Ditto. * c_funloc_tests_2.f03: Ditto. * c_funloc_tests_3.f03: Ditto. * c_funloc_tests_3_funcs.c: Ditto. * c_kind_params.f90: Ditto. * c_kind_tests_2.f03: Ditto. * c_kinds.c: Ditto. * c_loc_driver.c: Ditto. * c_loc_test.f90: Ditto. * c_loc_tests_2.f03: Ditto. * c_loc_tests_2_funcs.c: Ditto. * c_loc_tests_3.f03: Ditto. * c_loc_tests_4.f03: Ditto. * c_loc_tests_5.f03: Ditto. * c_loc_tests_6.f03: Ditto. * c_loc_tests_7.f03: Ditto. * c_loc_tests_8.f03: Ditto. * c_ptr_tests.f03: Ditto. * c_ptr_tests_10.f03: Ditto. * c_ptr_tests_5.f03: Ditto. * c_ptr_tests_7.f03: Ditto. * c_ptr_tests_7_driver.c: Ditto. * c_ptr_tests_8.f03: Ditto. * c_ptr_tests_8_funcs.c: Ditto. * c_ptr_tests_9.f03: Ditto. * c_ptr_tests_driver.c: Ditto. * c_size_t_driver.c: Ditto. * c_size_t_test.f03: Ditto. * com_block_driver.f90: Ditto. * global_vars_c_init.f90: Ditto. * global_vars_c_init_driver.c: Ditto. * global_vars_f90_init.f90: Ditto. * global_vars_f90_init_driver.c: Ditto. * interop_params.f03: Ditto. * iso_c_binding_only.f03: Ditto. * iso_c_binding_rename_1.f03: Ditto. * iso_c_binding_rename_1_driver.c: Ditto. * iso_c_binding_rename_2.f03: Ditto. * iso_c_binding_rename_2_driver.c: Ditto. * kind_tests_2.f03: Ditto. * kind_tests_3.f03: Ditto. * module_md5_1.f90: Ditto. * only_clause_main.c: Ditto. * print_c_kinds.f90: Ditto. * test_bind_c_parens.f03: Ditto. * test_c_assoc.c: Ditto. * test_com_block.f90: Ditto. * test_common_binding_labels.f03: Ditto. * test_common_binding_labels_2.f03: Ditto. * test_common_binding_labels_2_main.f03: Ditto. * test_common_binding_labels_3.f03: Ditto. * test_common_binding_labels_3_main.f03: Ditto. * test_only_clause.f90: Ditto. * use_iso_c_binding.f90: Ditto. * value_5.f90: Ditto. * value_test.f90: Ditto. * value_tests_f03.f90: Ditto. From-SVN: r126185
2007-07-01re PR fortran/32239 (optimize power in loops, use __builtin_powi instead of ↵Janne Blomqvist4-54/+16
_gfortran_pow_r4_i4) gcc/fortran: 2007-07-01 Janne Blomqvist <jb@gcc.gnu.org> PR fortran/32239 * trans-expr.c (gfc_conv_power_op): Use builtin_powi for real**int4 powers. * f95-lang.c (gfc_init_builtin_functions): Add builtin_powi to the builtins table. libgfortran: 2007-07-01 Janne Blomqvist <jb@gcc.gnu.org> PR fortran/32239 * Makefile.am: Don't generate real**int4 pow functions. * gfortran.map: Remove real**int4 pow symbols. * Makefile.in: Regenerated. testsuite 2007-07-01 Janne Blomqvist <jb@gcc.gnu.org> PR fortran/32239 * gfortran.fortran-torture/execute/intrinsic_fraction_exponent.f90 (test_4): Use proper test for floating point equality. (test_8): Likewise. From-SVN: r126175
2007-07-01re PR fortran/32554 ([4.2 Only] Bug in P formatting)Jerry DeLisle2-16/+9
2007-07-01 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR libgfortran/32554 * io/write.c (output_float): Set edigits to a fixed size, avoiding variation in field width calculation and eliminate buffer overrun. From-SVN: r126173
2007-07-01fortran frontend:Janne Blomqvist3-70/+23
2007-07-01 Janne Blomqvist <jb@gcc.gnu.org> * trans.h: Remove decls for 64-bit allocation functions. * trans-array.c (gfc_grow_array): Always pick the standard realloc function decl. (gfc_array_allocate): Likewise. * trans-decl.c: Remove trees for 64-bit allocation functions. (gfc_build_builtin_function_decls): Don't build fndecls for 64-bit allocations functions, use index_int_type for normal allocation functions. libgfortran changelog: 2007-07-01 Janne Blomqvist <jb@gcc.gnu.org> * runtime/memory.c (internal_realloc): Use index_type for size argument instead of GFC_INTEGER_4. (allocate_array): Likewise. (allocate): Likewise, add ifdef around unnecessary check. (internal_reallo64): Remove. (allocate_array64): Remove. (allocate64): Remove. * gfortran.map: Remove symbols for 64-bit allocation functions. From-SVN: r126166
2007-06-29re PR libfortran/32456 (IO error message should show Unit/Filename)Jerry DeLisle2-4/+26
2007-06-29 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR libgfortran/32456 * io/unit.c (filename_from_unit): Don't use find_unit, instead search for unit directly. From-SVN: r126119
2007-06-25re PR libfortran/32495 (static declaration of 'strcasestr' follows ↵Adam Nemet2-7/+15
non-static declaration) PR libfortran/32495 * runtime/backtrace.c (local_strcasestr): Rename from strcasestr. (show_backtrace): Rename strcasestr to local_strcasestr. From-SVN: r125998
2007-06-24re PR libfortran/32456 (IO error message should show Unit/Filename)Jerry DeLisle4-0/+67
2007-06-24 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR libgfortran/32456 * runtime/error.c (show_locus): Update to emit the unit number and file name involved with the error. Use new function filename_from_unit. * libgfortran.h (filename_from_unit): Declare new function. * io/unit.c (init_units): Set the unit file name for stdin, stdout, and stderr for use later in error reporting. (filename_from_unit): Add this new function. From-SVN: r125989
2007-06-24re PR fortran/32446 (F0.n output format fails with large numbers)Jerry DeLisle2-7/+18
2007-06-24 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR libgfortran/32446 * io/write.c (output_float): Calculate ndigits correctly for large numbered formats that must pad zeros before the decimal point. From-SVN: r125985
2007-06-15re PR libfortran/32345 (Unconditional snprintf use breaks all gfortran exec ↵Rainer Orth2-1/+11
tests on Tru64 UNIX V4.0F) PR libfortran/32345 * runtime/backtrace.c (show_backtrace): Only use snprintf if available. From-SVN: r125739
2007-06-10re PR fortran/32235 (incorrectly position text file after backspace)Jerry DeLisle2-3/+14
2007-06-10 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR libgfortran/32235 * io/transfer.c (st_read): Remove test for end of file condition. (next_record_r): Add test for end of file condition. From-SVN: r125606
2007-06-02configure: Regenerate.Paolo Bonzini2-42/+52
boehm-gc: 2007-06-02 Paolo Bonzini <bonzini@gnu.org> * configure: Regenerate. libffi: 2007-06-02 Paolo Bonzini <bonzini@gnu.org> * configure: Regenerate. libgfortran: 2007-06-02 Paolo Bonzini <bonzini@gnu.org> * configure: Regenerate. libgomp: 2007-06-02 Paolo Bonzini <bonzini@gnu.org> * configure: Regenerate. libjava: 2007-06-02 Paolo Bonzini <bonzini@gnu.org> * configure: Regenerate. libmudflap: 2007-06-02 Paolo Bonzini <bonzini@gnu.org> * configure: Regenerate. libobjc: 2007-06-02 Paolo Bonzini <bonzini@gnu.org> * configure: Regenerate. libssp: 2007-06-02 Paolo Bonzini <bonzini@gnu.org> * configure: Regenerate. libstdc++-v3: 2007-06-02 Paolo Bonzini <bonzini@gnu.org> * configure: Regenerate. zlib: 2007-06-02 Paolo Bonzini <bonzini@gnu.org> * configure: Regenerate. From-SVN: r125278
2007-05-28re PR fortran/32124 (Execution stops with stat= in ALLOCATE)Tobias Burnus2-5/+27
2007-05-28 Tobias Burnus <burnus@net-b.de> PR fortran/32124 * runtime/memory.c (allocate_size): Use ERROR_ALLOCATION. (allocate,allocate64): Use stat variable if present. From-SVN: r125133
2007-05-27string.c (compare0): Use gfc_charlen_type instead of int.Janne Blomqvist7-41/+97
2007-05-27 Janne Blomqvist <jb@gcc.gnu.org> * runtime/string.c (compare0): Use gfc_charlen_type instead of int. (fstrlen): Likewise. (find_option): Likewise. (fstrcpy): Use gfc_charlen_type instead of int, return length. (cf_strcpy): Likewise. * libgfortran.h: Change string prototypes to use gfc_charlen_type. * io/open.c (new_unit): Use snprintf if available. * io/list_read.c (nml_touch_nodes): Use memcpy instead of strcpy/strcat. (nml_read_obj): Likewise. * io/transfer.c (st_set_nml_var): Likewise. * io/write.c (output_float): Use snprintf if available. (nml_write_obj) Use memcpy instead of strcpy/strcat. From-SVN: r125100
2007-05-26unix.c (unix_stream): Rearrange struct members, remove small_buffer.Janne Blomqvist2-46/+69
2007-05-26 Janne Blomqvist <jb@gcc.gnu.org> * io/unix.c (unix_stream): Rearrange struct members, remove small_buffer. (int_stream): New struct. (fd_alloc): Always use existing buffer, never reallocate. (fd_sfree): Remove check for buffer != small_buffer. (fd_close): Likewise. (mem_alloc_r_at): Change to use int_stream. (mem_alloc_w_at): Likewise. (mem_read): Likewise. (mem_write): Likewise. (mem_set): Likewise. (mem_truncate): Likewise. (mem_close): Likewise. (mem_sfree): Likewise. (empty_internal_buffer): Likewise. (open_internal): Likewise. From-SVN: r125099
2007-05-25transfer.c (unformatted_read): Use size from front end eliminating use of ↵Jerry DeLisle2-17/+15
size_from_real_kind. 2007-05-25 Jerry DeLisle <jvdelisle@gcc.gnu.org> * io/transfer.c (unformatted_read): Use size from front end eliminating use of size_from_real_kind. (unformatted_write): Ditto. From-SVN: r125064
2007-05-24ltmain.sh: Update from ToT Libtool.Steve Ellcey4-1933/+17265
* ltmain.sh: Update from ToT Libtool. * libtool.m4: Update from ToT Libtool. * ltsugar.m4: New. Update from ToT Libtool. * ltversion.m4: New. Update from ToT Libtool. * ltoptions.m4: New. Update from ToT Libtool. * ltconfig: Remove. * ltcf-c.sh: Remove. * ltcf-cxx.sh: Remove. * ltcf-gcj.sh: Remove. * Regenerate all subdirs From-SVN: r125032
2007-05-22libgfortran.h: Mark stop_numeric as noreturn.Tobias Burnus2-1/+5
2007-05-22 Tobias Burnus <burnus@net-b.de> * libgfortran.h: Mark stop_numeric as noreturn. From-SVN: r124962
2007-05-22re PR libfortran/31295 (Uninitialized variable in libgfortran's ↵Tobias Burnus3-0/+11
_gfortran_eoshift0_4) 2007-05-22 Tobias Burnus <burnus@net-b.de> PR libgfortran/31295 * intrinsics/eoshift0.c (eoshift0): Silence uninitialized warning. * intrinsics/eoshift2.c (eoshift2): Ditto. From-SVN: r124948
2007-05-19re PR fortran/31964 ([4.2, 4.1 only]ishftc fails with certain thrid argument)Jerry DeLisle2-15/+33
2007-05-18 Jerry DeLisle <jvdelisle@gcc.gnu.org> PR libfortran/31964 * intrinsics/ishftc.c (ishftc4, ishftc8, ishftc16): Fix mask to handle shift of bit-size number of bits. From-SVN: r124846
2007-05-17re PR fortran/31917 ([4.1 only] GFORTRAN_CONVERT_UNIT is ignored)Tobias Burnus2-2/+19
2007-05-14 Tobias Burnus <burnus@net-b.de> PR fortran/31917 * runtime/environ.c (mark_range): Fix setting default convert unit. From-SVN: r124787