summaryrefslogtreecommitdiffstats
path: root/gcc/fortran
Commit message (Collapse)AuthorAgeFilesLines
...
* 2011-11-25 Tobias Burnus <burnus@net-b.de>burnus2011-11-253-1/+19
| | | | | | | | | | | | | | | | | | | PR fortran/50408 * trans-decl.c (gfc_get_module_backend_decl): Also copy ts.u.derived from the gsym if the ts.type is BT_CLASS. (gfc_get_extern_function_decl): Copy also the backend_decl for the symbol's ts.u.{derived,cl} from the gsym. * trans-types.c (gfc_copy_dt_decls_ifequal): Directly return if "from" and "to" are the same. 2011-11-25 Tobias Burnus <burnus@net-b.de> PR fortran/50408 * gfortran.dg/whole_file_35.f90: New. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181725 138bc75d-0d04-0410-961f-82ee72b054a4
* 2011-11-25 Tobias Burnus <burnus@net-b.de>burnus2011-11-252-1/+7
| | | | | | | | | | | | | | PR fortran/51302 * trans-stmt.c (gfc_trans_simple_do): Add a fold_convert. 2011-11-25 Tobias Burnus <burnus@net-b.de> PR fortran/51302 * gfortran.dg/volatile13.f90: New. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181724 138bc75d-0d04-0410-961f-82ee72b054a4
* 2011-11-24 Tobias Burnus <burnus@net-b.de>burnus2011-11-242-3/+13
| | | | | | | | | | | | | | | | PR fortran/51218 * resolve.c (pure_subroutine): If called subroutine is impure, unset implicit_pure. (resolve_function): Move impure check to simplify code. 2011-11-24 Tobias Burnus <burnus@net-b.de> PR fortran/51218 * gfortran.dg/implicit_pure_1.f90: New. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181698 138bc75d-0d04-0410-961f-82ee72b054a4
* 2011-11-19 Tobias Burnus <burnus@net-b.de>burnus2011-11-194-3/+27
| | | | | | | | | | | | | | | | | | PR fortran/51207 * class.c (gfc_find_derived_vtab): Mark __def_init as PARAMETER and hence as TREE_READONLY; add subroutine attribute to __copy_ procedure. PR fortran/50640 * trans.h (GFC_DECL_PUSH_TOPLEVEL): New DECL_LANG_FLAG_7. * trans-decl.c (gfc_get_symbol_decl): Mark __def_init and vtab as GFC_DECL_PUSH_TOPLEVEL. (gfc_generate_function_code): If GFC_DECL_PUSH_TOPLEVEL, push it there. (build_function_decl): Push __copy_ procedure to the toplevel. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181505 138bc75d-0d04-0410-961f-82ee72b054a4
* gcc/fortranburnus2011-11-1614-304/+802
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | 2011-11-16 Tobias Burnus <burnus@net-b.de> PR fortran/39427 PR fortran/37829 * decl.c (match_data_constant, match_data_constant, * variable_decl, gfc_match_decl_type_spec, access_attr_decl, check_extended_derived_type, gfc_match_derived_decl, gfc_match_derived_decl, gfc_match_derived_decl) Modified to deal with DT constructors. * gfortran.h (gfc_find_dt_in_generic, gfc_convert_to_structure_constructor): New function prototypes. * interface.c (check_interface0, check_interface1, gfc_search_interface): Ignore DT constructors in generic list. * match.h (gfc_match_structure_constructor): Update prototype. * match.c (match_derived_type_spec): Ensure that one uses the DT not the generic function. * module.c (MOD_VERSION): Bump. (dt_lower_string, dt_upper_string): New functions. (find_use_name_n, find_use_operator, compare_true_names, find_true_name, add_true_name, fix_mio_expr, load_needed, read_module, write_dt_extensions, write_symbol): Changes to deal with different symtree vs. sym names. (create_derived_type): Create also generic procedure. * parse.c (gfc_fixup_sibling_symbols): Don't regard DT and * generic function as the same. * primary.c (gfc_convert_to_structure_constructor): New * function. (gfc_match_structure_constructor): Restructured; calls gfc_convert_to_structure_constructor. (build_actual_constructor, gfc_match_rvalue): Update for DT generic functions. * resolve.c (resolve_formal_arglist, resolve_structure_cons, is_illegal_recursion, resolve_generic_f, resolve_variable, resolve_fl_variable_derived, resolve_fl_derived0, resolve_symbol): Handle DT and DT generic constructors. * symbol.c (gfc_use_derived, gfc_undo_symbols, gen_special_c_interop_ptr, gen_cptr_param, generate_isocbinding_symbol, gfc_get_derived_super_type): Handle derived-types, which are hidden in the generic type. (gfc_find_dt_in_generic): New function * trans-array.c (gfc_conv_array_initializer): Replace * FL_PARAMETER expr by actual value. * trans-decl.c (gfc_get_module_backend_decl, * gfc_trans_use_stmts): Ensure that we use the DT and not the generic function. * trans-types.c (gfc_get_derived_type): Ensure that we use the * DT and not the generic procedure. gcc/testsuite/ 2011-11-16 Tobias Burnus <burnus@net-b.de> PR fortran/39427 PR fortran/37829 * gfortran.dg/constructor_1.f90: New. * gfortran.dg/constructor_2.f90: New. * gfortran.dg/constructor_3.f90: New. * gfortran.dg/constructor_4.f90: New. * gfortran.dg/constructor_5.f90: New. * gfortran.dg/constructor_6.f90: New. * gfortran.dg/use_only_5.f90: New. * gfortran.dg/c_ptr_tests_17.f90: New. * gfortran.dg/c_ptr_tests_18.f90: New. * gfortran.dg/used_types_25.f90: New. * gfortran.dg/used_types_26.f90: New * gfortran.dg/type_decl_3.f90: New. * gfortran.dg/function_types_3.f90: Update dg-error. * gfortran.dg/result_1.f90: Ditto. * gfortran.dg/structure_constructor_3.f03: Ditto. * gfortran.dg/structure_constructor_4.f03: Ditto. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181425 138bc75d-0d04-0410-961f-82ee72b054a4
* 2011-11-14 Tobias Burnus <burnus@net-b.de>burnus2011-11-142-2/+11
| | | | | | | | | | PR fortran/51073 * trans-decl.c (generate_coarray_sym_init): Handle zero-sized * arrays. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181348 138bc75d-0d04-0410-961f-82ee72b054a4
* 2011-11-09 Tobias Burnus <burnus@net-b.de>burnus2011-11-092-28/+66
| | | | | | | | | | * symbol.c (clear_sym_mark, traverse_ns): Remove functions. (count_st_nodes, do_traverse_symtree, fill_st_vector): New functions. (gfc_traverse_symtree, gfc_traverse_ns): Call do_traverse_symtree. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181232 138bc75d-0d04-0410-961f-82ee72b054a4
* PR 50016 Slow I/O on MingW due to _commitjb2011-11-092-0/+81
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | frontend ChangeLog: 2011-11-09 Janne Blomqvist <jb@gcc.gnu.org> PR libfortran/50016 * gfortran.texi (Data consistency and durability): New section. testsuite ChangeLog: 2011-11-09 Janne Blomqvist <jb@gcc.gnu.org> PR libfortran/50016 * gfortran.dg/inquire_size.f90: Don't flush the unit. libgfortran ChangeLog: 2011-11-09 Janne Blomqvist <jb@gcc.gnu.org> PR libfortran/50016 * io/inquire.c (inquire_via_unit): Flush the unit and use ssize. * io/unix.c (buf_flush): Don't call _commit. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181207 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/50540fxcoudert2011-11-092-4/+10
| | | | | | | | | * resolve.c (resolve_forall_iterators): Transform internal errors to normal errors. * gfortran.dg/forall_16.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181200 138bc75d-0d04-0410-961f-82ee72b054a4
* 2011-11-09 Janus Weil <janus@gcc.gnu.org>janus2011-11-094-4/+15
| | | | | | | | | | | | | PR fortran/50960 * class.c (gfc_find_derived_vtab): Make the vtab symbols FL_PARAMETER. * expr.c (gfc_simplify_expr): Prevent vtabs from being replaced with their value. * resolve.c (resolve_values): Use-associated symbols do not need to be resolved again. (resolve_fl_parameter): Make sure the symbol has a value. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181199 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/38718fxcoudert2011-11-094-2/+25
| | | | | | | | | | | * intrinsic.c (add_functions): Add gfc_simplify_dreal. * intrinsic.h (gfc_simplify_dreal): New proto. * simplify.c (gfc_simplify_dreal): New function. * gfortran.dg/initialization_29.f90: Expand test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181198 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/21881fxcoudert2011-11-092-1/+7
| | | | | | | | * trans-types.c (gfc_get_dtype): Issue a fatal error instead of an internal error. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181192 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/50404fxcoudert2011-11-082-0/+23
| | | | | | | | * io.c (gfc_resolve_close): CLOSE requires a UNIT. * gfortran.dg/io_constraints_3.f90: Improve testcase. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181183 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/50409fxcoudert2011-11-082-2/+8
| | | | | | | | | * expr.c (gfc_simplify_expr): Substrings can't have negative length. * gcc/testsuite/gfortran.dg/string_5.f90: Improve testcase. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181181 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/50334fxcoudert2011-11-082-0/+10
| | | | | | | | * invoke.texi (-finit-*): Document interaction with -Wuninitialized. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181150 138bc75d-0d04-0410-961f-82ee72b054a4
* PR libfortran/49188fxcoudert2011-11-074-28/+40
| | | | | | | | | | | | PR libfortran/49336 * invoke.texi: Fix documentation of fsign-zero option. Remove contractions. * intrinsic.texi: Fix ATAN2 documentation for signed zeros. Remove contractions. * gfortran.texi: Remove contractions. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181127 138bc75d-0d04-0410-961f-82ee72b054a4
* 2011-11-07 Janus Weil <janus@gcc.gnu.org>janus2011-11-073-26/+50
| | | | | | | | | | | | | | | | PR fortran/50919 * class.c (add_proc_comp): Don't add non-overridable procedures to the vtable. * resolve.c (resolve_typebound_function,resolve_typebound_subroutine): Don't generate a dynamic _vptr call for non-overridable procedures. 2011-11-07 Janus Weil <janus@gcc.gnu.org> PR fortran/50919 * gfortran.dg/typebound_call_21.f03: New. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181107 138bc75d-0d04-0410-961f-82ee72b054a4
* clock and time are part of the C standard library.jb2011-11-072-6/+11
| | | | | | | | | | | 2011-11-07 Janne Blomqvist <jb@gcc.gnu.org> * intrinsic.texi (MCLOCK, MCLOCK8, TIME, TIME8): Functions clock and time are part of the C standard library. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181087 138bc75d-0d04-0410-961f-82ee72b054a4
* 2011-11-06 Janus Weil <janus@gcc.gnu.org>janus2011-11-064-19/+20
| | | | | | | | | | * gfortran.h (gfc_extend_expr): Modified prototype. * interface.c (gfc_extend_expr): Return 'match' instead of 'gfc_try'. Remove argument 'real_error'. * resolve.c (resolve_operator): Modified call to 'gfc_extend_expr'. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181044 138bc75d-0d04-0410-961f-82ee72b054a4
* Check in patch/merge from cxx-mem-model Branchamacleod2011-11-062-1/+68
| | | | git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@181031 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/43829mikael2011-11-044-34/+217
| | | | | | | | | | | | | | | * trans-array.c (gfc_conv_expr_descriptor): Accept the inline intrinsic case in the assertion. * trans-intrinsic (enter_nested_loop): New function. (gfc_conv_intrinsic_arith): Support non-scalar cases. (nest_loop_dimension, walk_inline_intrinsic_arith): New functions. (walk_inline_intrinsic_function): Handle sum and product. (gfc_inline_intrinsic_function_p): Ditto. * trans.h (gfc_get_loopinfo): New macro. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180920 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-intrinsic.c (gfc_conv_intrinsic_arith): Introduce parentmikael2011-11-042-2/+10
| | | | | | | | expression variable. Use it. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180919 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-intrinsic.c (gfc_conv_intrinsic.c): Introduce current loopmikael2011-11-042-10/+17
| | | | | | | | pointer. Use it. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180918 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-intrinsic.c (gfc_conv_intrinsic_arith): Small argument handlingmikael2011-11-042-6/+12
| | | | | | | | cleanup. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180917 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-intrinsic.c (gfc_conv_intrinsic_arith): Update conditions.mikael2011-11-042-6/+10
| | | | git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180913 138bc75d-0d04-0410-961f-82ee72b054a4
* * frontend-passes.c (cfe_register_funcs): Return early in the casemikael2011-11-042-3/+11
| | | | | | | | | | of an inline intrinsic function. (optimize_binop_array_assignment): Skip optimization in the case of an inline intrinsic function. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180911 138bc75d-0d04-0410-961f-82ee72b054a4
* * array.c (match_subscript): Skip whitespaces before setting locus.mikael2011-11-043-0/+7
| | | | | | | | * matchexp.c (match_level_1): Ditto. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180910 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-intrinsic.c (gfc_conv_intrinsic_minmaxval): Set loop'smikael2011-11-042-5/+26
| | | | | | | | | | temporary rank to the loop rank. Mark ss chains for multiple loop if necessary. Use gfc_trans_scalarized_loop_boundary to end one loop and start another. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180909 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc): Set loop'smikael2011-11-042-4/+27
| | | | | | | | | | temporary rank to the loop rank. Mark ss chains for multiple loop if necessary. Use gfc_trans_scalarized_loop_boundary to end one loop and start another. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180908 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-intrinsic.c (gfc_conv_intrinsic_minmaxloc): Don't calculatemikael2011-11-042-20/+13
| | | | | | | | offset twice in generated code. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180907 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-expr.c (gfc_conv_procedure_call): Handle temporaries formikael2011-11-043-67/+67
| | | | | | | | | | | | arguments to elemental calls. * trans-stmt.c (replace_ss): New function. (gfc_conv_elemental_dependencies): Remove temporary loop handling. Create a new ss for the temporary and replace the original one with it. Remove fake array references. Recalculate all offsets. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180906 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-array.h (gfc_free_ss, gfc_set_delta): New prototypes.mikael2011-11-043-14/+19
| | | | | | | | | | | * trans-array.c (gfc_free_ss): Remove forward declaration. Make non-static. (set_delta, gfc_set_delta): Remove forward declaration. Make non-static and rename the former to the later. Update uses. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180905 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans.h (gfc_inline_intrinsic_function_p): Move prototype...mikael2011-11-034-3/+21
| | | | | | | | | | * gfortran.h (gfc_inline_intrinsic_function_p): ... here. * dependency.c (gfc_check_argument_var_dependency): Check dependencies of inline intrinsics' arguments. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180904 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-array.c (gfc_trans_preloop_setup): New pointers to outermikael2011-11-032-7/+32
| | | | | | | | dimension's ss and loop. Use them. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180903 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-array.c (outermost_loop): New function.mikael2011-11-032-25/+47
| | | | | | | | | (gfc_trans_array_constructor, gfc_set_vector_loop_bounds, gfc_add_loop_ss_code): Put generated code out of the outermost loop. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180902 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-array.c (constant_array_constructor_loop_size):mikael2011-11-032-18/+29
| | | | | | | | Handle multiple loops. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180901 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-array.c (get_rank, get_loop_upper_bound_for_array):mikael2011-11-032-7/+46
| | | | | | | | | New functions. (gfc_trans_array_constructor): Handle multiple loops. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180900 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans.h (struct gfc_loopinfo): New field parent.mikael2011-11-033-0/+36
| | | | | | | | | | | * trans-array.c (gfc_cleanup_loop): Free nested loops. (gfc_add_ss_to_loop): Set nested_loop's parent loop. (gfc_trans_array_constructor): Update assertion. (gfc_conv_loop_setup): Ditto. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180899 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-array.c (gfc_add_loop_ss_code): Skip non-nestedmost ss.mikael2011-11-032-3/+39
| | | | | | | | | | | | Call recursively gfc_add_loop_ss_code for all the nested loops. (gfc_conv_ss_startstride): Only get the descriptor for the outermost ss. Call recursively gfc_conv_ss_startstride for all the nested loops. (set_loop_bounds): Call recursively for all the nested loops. (set_delta): Ditto. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180898 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans.h (struct gfc_loopinfo): New fields nested and next.mikael2011-11-033-0/+25
| | | | | | | | | * trans-array.c (gfc_add_ss_to_loop): Update list of nested list if ss has non-null nested_ss field. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180897 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-array.c (gfc_trans_create_temp_array): Loop over the parents.mikael2011-11-032-32/+43
| | | | git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180895 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-array.c (get_array_ref_dim, get_scalarizer_dim_for_array_dim): mikael2011-11-032-14/+57
| | | | | | | | | | | | Rename the former to the latter and loop over the parents. (innermost_ss): New function. (get_array_ref_dim_for_loop_dim): New function. (gfc_trans_create_temp_array): Use get_scalarizer_dim_for_array_dim. (set_loop_bounds): Use get_array_dim_for_loop_dim). git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180894 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans.h (struct gfc_ss): New field nested_ss.mikael2011-11-033-1/+12
| | | | | | | | * trans-expr.c (gfc_advance_se_ss_chain): Update assertion. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180893 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-array.c (set_vector_loop_bounds): Loop over the parents.mikael2011-11-032-5/+13
| | | | git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180892 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-array.c (gfc_trans_array_constructor): Loop over the parents.mikael2011-11-032-10/+20
| | | | git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180891 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-array.c (gfc_set_loop_bounds_from_array_spec): Loop over themikael2011-11-032-30/+48
| | | | | | | | parents. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180890 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans.h (struct gfc_ss): New field parent.mikael2011-11-034-2/+23
| | | | | | | | | | | * trans-array.c (gfc_trans_scalarizing_loops): Skip clearing if a parent exists. * trans-expr.c (gfc_advance_se_ss_chain): Move to parent ss at the end of the chain. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180889 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-array.h (gfc_trans_create_temp_array): Remove loop argument.mikael2011-11-036-25/+33
| | | | | | | | | | | | | | | * trans-array.c (gfc_trans_create_temp_array): Ditto. Get loop from ss. Update reference to loop. Remove loop argument. (gfc_trans_array_constructor, gfc_conv_loop_setup): Update calls to gfc_trans_create_temp_array. * trans-expr.c (gfc_conv_procedure_call): Ditto. * trans-intrinsic.c (gfc_conv_intrinsic_transfer): Ditto. * trans-stmt.c (gfc_conv_elemental_dependencies): Ditto. Set loop before calling gfc_trans_create_temp_array. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180888 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-array.c (gfc_trans_create_temp_array): New variable total_dim.mikael2011-11-032-4/+11
| | | | | | | | Set total_dim to loop's rank. Replace usages of loop's rank. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180887 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-array.c (gfc_trans_array_constructor, trans_array_constructor):mikael2011-11-032-2/+11
| | | | | | | | | | Rename the former to the later. Get loop from ss. Remove loop argument. (gfc_add_loop_ss_code): Update call. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@180886 138bc75d-0d04-0410-961f-82ee72b054a4
OpenPOWER on IntegriCloud