summaryrefslogtreecommitdiffstats
path: root/gcc/testsuite/gfortran.fortran-torture/execute
Commit message (Collapse)AuthorAgeFilesLines
...
* PR fortran/18518jakub2005-09-271-0/+23
| | | | | | | | | | | | * trans-common.c (build_equiv_decl): Add IS_SAVED argument. If it is true, set TREE_STATIC on the decl. (create_common): If any symbol in equivalence has SAVE attribute, pass true as last argument to build_equiv_decl. * gfortran.fortran-torture/execute/save_2.f90: New decl. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@104712 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/23677jakub2005-09-261-0/+29
| | | | | | | | | | | | | | | * symbol.c (gfc_is_var_automatic): Return true if character length is non-constant rather than constant. * resolve.c (gfc_resolve): Don't handle !gfc_option.flag_automatic here. * options.c (gfc_post_options): Set gfc_option.flag_max_stack_var_size to 0 for -fno-automatic. * gfortran.fortran-torture/execute/save_1.f90: New test. * gfortran.dg/save_1.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@104661 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/23663jakub2005-09-201-0/+16
| | | | | | | | | | * primary.c (match_actual_arg): Handle ENTRY the same way as FUNCTION. * gfortran.fortran-torture/execute/entry_11.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@104453 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/23373rsandifo2005-09-082-0/+30
| | | | | | | | * trans-expr.c (gfc_trans_pointer_assignment): Assign to a temporary descriptor if the rhs is not a null pointer or variable. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@104029 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/19269rsandifo2005-09-071-0/+16
| | | | | | | | * simplify.c (gfc_simplify_transpose): Set the result's typespec from the source, not the first element of the return value. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103982 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-08-29 Jerry DeLisle <jvdelisle@verizon.net>jvdelisle2005-08-301-1/+1
| | | | | | | | * gfortran.fortran-torture/execute/intrinsic_count.f90: Fix array dimension to avoid correct end-of-file error. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103626 138bc75d-0d04-0410-961f-82ee72b054a4
* 005-08-12 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-08-121-1/+1
| | | | | | | | * gfortran.fortran-torture/execute/character_passing.f90: Fix comment typo. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103042 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-08-09 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-08-091-1/+2
| | | | | | | | * gfortran/fortran.torture/execute/character_passing.f90: Fix types for LSAME. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102925 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/18833jakub2005-08-063-0/+113
| | | | | | | | | | | | | | | | | | | PR fortran/20850 * primary.c (match_varspec): If equiv_flag, don't look at sym's attributes, call gfc_match_array_ref up to twice and don't do any substring or component processing. * resolve.c (resolve_equivalence): Transform REF_ARRAY into REF_SUBSTRING or nothing if needed. Check that substrings don't have zero length. * gfortran.dg/equiv_1.f90: New test. * gfortran.dg/equiv_2.f90: New test. * gfortran.fortran-torture/execute/equiv_2.f90: New test. * gfortran.fortran-torture/execute/equiv_3.f90: New test. * gfortran.fortran-torture/execute/equiv_4.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102801 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/20063jakub2005-07-251-0/+6
| | | | | | | | | | * data.c (gfc_assign_data_value_range): Call create_character_initializer if last_ts is a character type. * gfortran.fortran-torture/execute/data_4.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102349 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-07-23 Jerry DeLisle <jvdelisle@verizon.net>jvdelisle2005-07-241-1/+9
| | | | | | | | * gfortran.fortran-torture/execute/nan_inf_fmt.f90: Revise test to include case of field width of zero. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102325 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-07-17 Jerry DeLisle <jvdelisle@verizon.net>jvdelisle2005-07-181-2/+2
| | | | | | | | * gfortran.fortran-torture/execute/nan_inf_fmt.f90: Change case of field width of 8 to +Inf and -Inf. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102124 138bc75d-0d04-0410-961f-82ee72b054a4
* * trans-stmt.c (gfc_trans_forall_loop): Clear maskindex beforejakub2005-07-111-0/+88
| | | | | | | | | | | | the outermost loop. (gfc_trans_assign_need_temp, gfc_trans_pointer_assign_need_temp, gfc_trans_forall_1, gfc_evaluate_where_mask, gfc_trans_where_2): Don't clear maskindexes here. * gfortran.fortran-torture/execute/forall_7.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101865 138bc75d-0d04-0410-961f-82ee72b054a4
* * primary.c (gfc_match_rvalue): Handle ENTRY the same wayjakub2005-07-081-0/+13
| | | | | | | | | as FUNCTION. * gfortran.fortran-torture/execute/entry_10.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101758 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-07-07 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-07-071-0/+28
| | | | | | | | | | | | | | | | | | | | | | | PR libfortran/21594 * intrinsics/eoshift0.c: If abs(shift) > len, fill the the whole array with the boundary value, but don't overrun it. * intrinsics/eoshift2.c: Likewise. * m4/eoshift1.m4: Likewise. * m4/eoshift3.m4: Likewise. * generated/eoshift1_4.c: Regenerated. * generated/eoshift1_8.c: Regenerated. * generated/eoshift3_4.c: Regenerated. * generated/eoshift3_8.c: Regenerated. 2005-07-07 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/21594 * gfortran.fortran-torture/execute/intrinsic_eoshift.f90: Add test cases where the shift length is greater than the array length. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101738 138bc75d-0d04-0410-961f-82ee72b054a4
* * decl.c (gfc_match_entry): Allow ENTRY without parenthesesjakub2005-07-061-0/+24
| | | | | | | | | even in FUNCTIONs. * gfortran.fortran-torture/execute/entry_9.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101672 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-06-28 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-06-281-0/+6
| | | | | | | | | | | | | | | | | PR libfortran/22142 * m4/eoshift1.m4: Correct bstride (it needs to be multiplied by size since it's a char pointer). * m4/eoshift1_4.c: Regenerated. * m4/eoshift1_8.c: Regenerated. 2005-06-28 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/22142 * gfortran.fortran-torture/execute/intrinsic_eoshift.f90: Add testcase also testing eoshift1 for PR 22142. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101398 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-06-28 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-06-281-0/+8
| | | | | | | | | | | | | | | | | PR libfortran/22142 * m4/eoshift3.m4: Correct bstride (it needs to be multiplied by size since it's a char pointer). * m4/eoshift3_4.c: Regenerated. * m4/eoshift3_8.c: Regenerated. 2005-06-28 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/22142 * gfortran.fortran-torture/execute/intrinsic_eoshift.f90: Add testcase for PR 22142. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101392 138bc75d-0d04-0410-961f-82ee72b054a4
* Update FSF address.kcook2005-06-251-1/+1
| | | | git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101316 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-06-11 Thomas Koenig <Thomas.Koenig@onlinde.de>tkoenig2005-06-111-0/+92
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | PR libfortran/21333 * Makefile.am: Add in_pack_c4.c, in_pack_c8.c, in_unpack_c4.c and in_unpack_c8.c. * Makefile.in: Regenerate. * libgfortran.h: Declare internal_pack_c4, internal_pack_c8, internal_unpack_c4 and internal_unpack_c8. * m4/in_pack.m4: Use rtype_ccode insteald of rtype_kind in function name. Use sizeof (rtype_name) as size for memory allocation. * m4/in_unpack.m4: Use rtype_ccode insteald of rtype_kind in function name. Use sizeof (rtype_name) for calculation of sizes for memcpy. * runtime/in_pack_generic.c: For real, integer and logical call internal_pack_4 if size==4 and internal_pack_8 if size==8. For complex, call internal_pack_c4 if size==8 and internal_pack_c8 if size==16. * runtime/in_unpack_generic.c: For real, integer and logical call internal_unpack_4 if size==4 and internal_unpack_8 if size==8. For complex, call internal_unpack_c4 if size==8 and internal_unpack_c8 if size==16. * generated/in_pack_i4.c: Regenerated. * generated/in_pack_i8.c: Regenerated. * generated/in_unpack_i4.c: Regenerated. * generated/in_unpack_i8.c: Regenerated. * generated/in_pack_c4.c: New file. * generated/in_pack_c8.c: New file. * generated/in_unpack_c4.c: New file. * generated/in_unpack_c8.c: New file. 2005-05-11 Thomas Koenig <Thomas.Koenig@online.de> * gfortran.fortran-torture/execute/in-pack.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@100842 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-06-07 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-06-071-0/+8
| | | | | | | | | | | | | | | | | | | | | | PR libfortran/21926 * m4/matmul.m4: Correct zeroing of result for non-packed arrays with lowest stride is one. * generated/matmul_c4.c: Regenerated. * generated/matmul_c8.c: Regenerated. * generated/matmul_i4.c: Regenerated. * generated/matmul_i8.c: Regenerated. * generated/matmul_r4.c: Regenerated. * generated/matmul_r8.c: Regenerated. 2005-06-07 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/21926 * gfortran.fortran-torture/execute/intrinsic_matmul.f90: Test case where the return array has lowest stride one, but isn't packed. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@100721 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-05-26 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-05-261-0/+4
| | | | | | | | | | | | | | | | | | PR libfortran/17283 * gfortran.fortran-torture/execute/intrinsic_unpack.f90: Test callee-allocated memory with write statements. 2005-05-26 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/17283 * intrinsics/unpack_generic.c: Fix name of routine on top. Update copyright years. (unpack1): Remove const from return array descriptor. rs: New variable, for calculating return sizes. Populate return array descriptor if ret->data is NULL. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@100189 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/15080jakub2005-05-173-2/+82
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | * trans-stmt.c (generate_loop_for_temp_to_lhs): Remove SIZE and COUNT2 arguments. If LSS is gfc_ss_terminator, increment COUNT1 by 1, instead of incrementing COUNT2 and using COUNT1+COUNT2 increment COUNT1 and use just that as index. (generate_loop_for_rhs_to_temp): Likewise. (compute_overall_iter_number): Add INNER_SIZE_BODY argument. It non-NULL, add it to body. (allocate_temp_for_forall_nest_1): New function, split from allocate_temp_for_forall_nest. (allocate_temp_for_forall_nest): Add INNER_SIZE_BODY argument, propagate it down to compute_overall_iter_number. Use allocate_temp_for_forall_nest_1. (gfc_trans_assign_need_temp): Remove COUNT2. Call compute_inner_temp_size into a new stmtblock_t. Adjust calls to allocate_temp_for_forall_nest, generate_loop_for_rhs_to_temp and generate_loop_for_temp_to_lhs. (gfc_trans_pointer_assign_need_temp): Adjust calls to allocate_temp_for_forall_nest. (gfc_evaluate_where_mask): Call compute_inner_temp_size into a new stmtblock_t. Call compute_overall_iter_number just once, then allocate_temp_for_forall_nest_1 twice with the same size. Initialize mask indexes if nested_forall_info != NULL. (gfc_trans_where_2): Initialize mask indexes before calling gfc_trans_nested_forall_loop. * gfortran.fortran-torture/execute/forall_3.f90: Remove comment about the test failing. * gfortran.fortran-torture/execute/where_7.f90: New test. * gfortran.fortran-torture/execute/where_8.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@99812 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-04-29 Jakub Jelinek <jakub@redhat.com>jakub2005-04-298-0/+519
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | PR fortran/13082 PR fortran/18824 * trans-expr.c (gfc_conv_variable): Handle return values in functions with alternate entry points. * resolve.c (resolve_entries): Remove unnecessary string termination after snprintf. Set result of entry master. If all entries have the same type, set entry master's type to that common type, otherwise set mixed_entry_master attribute. * trans-types.c (gfc_get_mixed_entry_union): New function. (gfc_get_function_type): Use it for mixed_entry_master functions. * gfortran.h (symbol_attribute): Add mixed_entry_master bit. * decl.c (gfc_match_entry): Set entry->result properly for function ENTRY. * trans-decl.c (gfc_get_symbol_decl): For entry_master, skip over __entry argument. (build_entry_thunks): Handle return values in entry thunks. Clear BT_CHARACTER's ts.cl->backend_decl, so that it is not shared between multiple contexts. (gfc_get_fake_result_decl): Use DECL_ARGUMENTS from current_function_decl instead of sym->backend_decl. Skip over entry master's entry id argument. For mixed_entry_master entries or their results, return a COMPONENT_REF of the fake result. (gfc_trans_deferred_vars): Don't warn about missing return value if at least one entry point uses RESULT. (gfc_generate_function_code): For entry master returning CHARACTER, copy ts.cl->backend_decl to all entry result syms. * trans-array.c (gfc_trans_dummy_array_bias): Don't consider return values optional just because they are in entry master. * gfortran.dg/entry_4.f90: New test. * gfortran.fortran-torture/execute/entry_1.f90: New test. * gfortran.fortran-torture/execute/entry_2.f90: New test. * gfortran.fortran-torture/execute/entry_3.f90: New test. * gfortran.fortran-torture/execute/entry_4.f90: New test. * gfortran.fortran-torture/execute/entry_5.f90: New test. * gfortran.fortran-torture/execute/entry_6.f90: New test. * gfortran.fortran-torture/execute/entry_7.f90: New test. 2005-04-29 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de> * gfortran.fortran-torture/execute/entry_8.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@98993 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-04-15 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-04-151-1/+1
| | | | | | | | * gfortran.fortran-torture/execute/intrinsic_spread.f90: corrected typo where the wrong variables had been compared. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@98209 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-04-15 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-04-151-0/+7
| | | | | | | | | | | | | | | | | | | | | | | | | | | | PR libfortran/18495 * intrinsics/spread_generic.c (spread): Remove const from return array descriptor. New variables: rrank (rank of return array), rs (for calculating the size of the return array), srank (rank of the source array). Generate runtime error if the dim= argument is larger than the rank of the return array. Generate runtime error if the needed rank of the return array is larger than 7. If ret->data is null, populate the return array descriptor and initialize the variables for the actual operation. Otherwise, set ret->dim[0].stride to one if it is zero. Change second, independent use of variable dim to srank. 2005-04-15 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/18495 * gfortran.fortran-torture/execute/intrinsic_spread.f90: Test callee-allocated version of return array with a write statement. Test spread with a temporary with another write statement. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@98208 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-04-13 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-04-124-4/+40
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | PR libfortran/19106 * m4/iforeach.c (name`'rtype_qual`_'atype_code): Add TODO that setting correct strides is a front end job. (`m'name`'rtype_qual`_'atype_code): Likewise. If mask has a lowest stride of 0, adjust to 1. * m4/ifunction.c (name`'rtype_qual`_'atype_code): Add TODO that setting correct strides is a front end job. (`m'name`'rtype_qual`_'atype_code): Likewise. If mask has a lowest stride of 0, adjust to 1. * maxloc0_4_i4.c: Regenerated * maxloc0_4_i8.c: Regenerated * maxloc0_4_r4.c: Regenerated * maxloc0_4_r8.c: Regenerated * maxloc0_8_i4.c: Regenerated * maxloc0_8_i8.c: Regenerated * maxloc0_8_r4.c: Regenerated * maxloc0_8_r8.c: Regenerated * maxloc1_4_i4.c: Regenerated * maxloc1_4_i8.c: Regenerated * maxloc1_4_r4.c: Regenerated * maxloc1_4_r8.c: Regenerated * maxloc1_8_i4.c: Regenerated * maxloc1_8_i8.c: Regenerated * maxloc1_8_r4.c: Regenerated * maxloc1_8_r8.c: Regenerated * maxval_i4.c: Regenerated * maxval_i8.c: Regenerated * maxval_r4.c: Regenerated * maxval_r8.c: Regenerated * minloc0_4_i4.c: Regenerated * minloc0_4_i8.c: Regenerated * minloc0_4_r4.c: Regenerated * minloc0_4_r8.c: Regenerated * minloc0_8_i4.c: Regenerated * minloc0_8_i8.c: Regenerated * minloc0_8_r4.c: Regenerated * minloc0_8_r8.c: Regenerated * minloc1_4_i4.c: Regenerated * minloc1_4_i8.c: Regenerated * minloc1_4_r4.c: Regenerated * minloc1_4_r8.c: Regenerated * minloc1_8_i4.c: Regenerated * minloc1_8_i8.c: Regenerated * minloc1_8_r4.c: Regenerated * minloc1_8_r8.c: Regenerated * minval_i4.c: Regenerated * minval_i8.c: Regenerated * minval_r4.c: Regenerated * minval_r8.c: Regenerated * product_c4.c: Regenerated * product_c8.c: Regenerated * product_i4.c: Regenerated * product_i8.c: Regenerated * product_r4.c: Regenerated * product_r8.c: Regenerated * sum_c4.c: Regenerated * sum_c8.c: Regenerated * sum_i4.c: Regenerated * sum_i8.c: Regenerated * sum_r4.c: Regenerated * sum_r8.c: Regenerated 2005-04-13 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/19016 * gfortran.fortran-torture/execute/intrinsic_mmloc.f90: Add tests with mask generated by expression. * gfortran.fortran-torture/execute/intrinsic_mmval.f90: Likewise. * gfortran.fortran-torture/execute/intrinsic_product.f90: Likewise. * gfortran.fortran-torture/execute/intrinsic_sum.f90: Likewise. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@98052 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-04-09 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-04-096-0/+117
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | PR libfortran/19106 PR libfortran/19014 * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): ditto. If retarray->data is NULL (i.e. the front end does not know the rank and dimenson of the array), fill in its properties and allocate memory. Change the assertions about rank and dimension of retarray into runtime errors and only check them for retarray->data != NULL. Do the same for correcting the stride from 0 to 1 in retarray. (`m'name`'rtype_qual`_'atype_code): Likewise. * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Likewise. Change assertion about rank of array to runtime error. (`m'name`'rtype_qual`_'atype_code): Likewise. * generated/all_l4.c: Regenerated. * generated/all_l8.c: Regenerated. * generated/any_l4.c: Regenerated. * generated/any_l8.c: Regenerated. * generated/count_4_l4.c: Regenerated. * generated/count_4_l8.c: Regenerated. * generated/count_8_l4.c: Regenerated. * generated/count_8_l8.c: Regenerated. * generated/maxloc0_4_i4.c: Regenerated. * generated/maxloc0_4_i8.c: Regenerated. * generated/maxloc0_4_r4.c: Regenerated. * generated/maxloc0_4_r8.c: Regenerated. * generated/maxloc0_8_i4.c: Regenerated. * generated/maxloc0_8_i8.c: Regenerated. * generated/maxloc0_8_r4.c: Regenerated. * generated/maxloc0_8_r8.c: Regenerated. * generated/maxloc1_4_i4.c: Regenerated. * generated/maxloc1_4_i8.c: Regenerated. * generated/maxloc1_4_r4.c: Regenerated. * generated/maxloc1_4_r8.c: Regenerated. * generated/maxloc1_8_i4.c: Regenerated. * generated/maxloc1_8_i8.c: Regenerated. * generated/maxloc1_8_r4.c: Regenerated. * generated/maxloc1_8_r8.c: Regenerated. * generated/maxval_i4.c: Regenerated. * generated/maxval_i8.c: Regenerated. * generated/maxval_r4.c: Regenerated. * generated/maxval_r8.c: Regenerated. * generated/minloc0_4_i4.c: Regenerated. * generated/minloc0_4_i8.c: Regenerated. * generated/minloc0_4_r4.c: Regenerated. * generated/minloc0_4_r8.c: Regenerated. * generated/minloc0_8_i4.c: Regenerated. * generated/minloc0_8_i8.c: Regenerated. * generated/minloc0_8_r4.c: Regenerated. * generated/minloc0_8_r8.c: Regenerated. * generated/minloc1_4_i4.c: Regenerated. * generated/minloc1_4_i8.c: Regenerated. * generated/minloc1_4_r4.c: Regenerated. * generated/minloc1_4_r8.c: Regenerated. * generated/minloc1_8_i4.c: Regenerated. * generated/minloc1_8_i8.c: Regenerated. * generated/minloc1_8_r4.c: Regenerated. * generated/minloc1_8_r8.c: Regenerated. * generated/minval_i4.c: Regenerated. * generated/minval_i8.c: Regenerated. * generated/minval_r4.c: Regenerated. * generated/minval_r8.c: Regenerated. * generated/product_c4.c: Regenerated. * generated/product_c8.c: Regenerated. * generated/product_i4.c: Regenerated. * generated/product_i8.c: Regenerated. * generated/product_r4.c: Regenerated. * generated/product_r8.c: Regenerated. * generated/sum_c4.c: Regenerated. * generated/sum_c8.c: Regenerated. * generated/sum_i4.c: Regenerated. * generated/sum_i8.c: Regenerated. * generated/sum_r4.c: Regenerated. * generated/sum_r8.c: Regenerated. 2005-04-09 Thomas Koenig <Thomas.Koenig@online.de> * gfortran.fortran-torture/execute/intrinsic_anyall.f90: Added test for callee-allocated arrays with write statements. * gfortran.fortran-torture/execute/intrinsic_count.f90: Likewise. * gfortran.fortran-torture/execute/intrinsic_mmloc.f90: Likewise. * gfortran.fortran-torture/execute/intrinsic_mmval.f90: Likewise. * gfortran.fortran-torture/execute/intrinsic_product.f90: Likewise. * gfortran.fortran-torture/execute/intrinsic_sum.f90: Likewise. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@97929 138bc75d-0d04-0410-961f-82ee72b054a4
* * gfortran.fortran-torture/execute/backspace.f90: Checkfxcoudert2005-04-011-1/+1
| | | | | | | after backspace and read was incorrect. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@97397 138bc75d-0d04-0410-961f-82ee72b054a4
* * Replace tabs with spaces.kargl2005-03-073-24/+24
| | | | git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@96009 138bc75d-0d04-0410-961f-82ee72b054a4
* * gfortran.dg/ishft.f90: Remove kind suffix from BOZ constantkargl2005-02-281-4/+5
| | | | | | | * gfortran.fortran-torture/execute/intrinsic_mvbits.f90: ditto git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@95644 138bc75d-0d04-0410-961f-82ee72b054a4
* 2004-02-18 Andrew Pinski <pinskia@physics.uc.edu>pinskia2005-02-181-0/+21
| | | | | | | | PR middle-end/20030 * gfortran.fortran-torture/execute/character_passing.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@95227 138bc75d-0d04-0410-961f-82ee72b054a4
* * gfortran.fortran-torture/execute/read_eof.f90: Open scratchdje2004-12-301-1/+2
| | | | | | | file, not /dev/null. Abort on error. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@92737 138bc75d-0d04-0410-961f-82ee72b054a4
* fortran/tobi2004-12-271-0/+3
| | | | | | | | | | | | | | | | PR fortran/19032 * trans-intrinsic.c (gfc_conv_intrinsic_mod): Update comment in front of function to match the standard. Correct handling of MODULO. testsuite/ PR fortran/19032 * gfortran.dg/intrinsic_modulo_1.f90: New. * gfortran.fortran-torture/execute/intrinsic_mod_ulo.f90: Add tests with divisor -1. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@92645 138bc75d-0d04-0410-961f-82ee72b054a4
* * gfortran.fortran-torture/execute/intrinsic_mvbits.f90,tobi2004-10-071-2/+2
| | | | | | | | gfortran.dg/ishft.f90: Add more tests. Add dg-warning in followup commit. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@88695 138bc75d-0d04-0410-961f-82ee72b054a4
* fortran/tobi2004-10-071-0/+5
| | | | | | | | | | | | * primary.c (match_boz_constant): Allow kind parameter suffixes. Move standard warning further to the front. testsuite/ * gfortran.fortran-torture/execute/intrinsic_mvbits.f90, gfortran.dg/ishft.f90: Add more tests. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@88690 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/17283tobi2004-10-061-2/+1
| | | | | | | | * gfortran.fortran-torture/execute/intrinsic_pack.f90: Enable new tests. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@88610 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/17631tobi2004-10-041-0/+10
| | | | | | | | | | | | | | | | | | fortran/ * intrinsic.c (add_sym_5): Remove. (add_subroutines): Add resolution function for MVBITS. * intrinsic.h (gfc_resolve_mvbits): Declare resolution function for MVBITS * iresolve.c (gfc_resolve_mvbits): New function. (gfc_resolve_random_number): Remove empty line at end of function. libgfortran/ * Makefile.am (gfor_helper_src): Add intrinsics/mvbits.h. * intrinsics/mvbits.h: New file. testsuite/ * gfortran.fortran-torture/execute/intrinsic_mvbits.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@88527 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/17283tobi2004-10-041-1/+14
| | | | | | | | | | | | | | | | | fortran/ * iresolve.c (gfc_resolve_pack): Choose function depending if mask is scalar. libgfortran/ * intrinsics/pack_generic.c (__pack): Allocate memory for return array if not done by caller. (__pack_s): New function. * runtime/memory.c (internal_malloc, internal_malloc64): Allow allocating zero memory. testsuite/ * gfortran.fortran-torture/execute/intrinsic_pack.f90: Add more tests. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@88526 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/15750tobi2004-09-201-0/+24
| | | | | | | * gfortran.fortran-torture/execute/iolength_2.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@87752 138bc75d-0d04-0410-961f-82ee72b054a4
* * lib/fortran-torture.exp (add-ieee-options): Replace ieee-options;rth2004-09-124-4/+4
| | | | | | | | | | | do the uplevel thing and update additional_flags directly. * gfortran.fortran-torture/execute/intrinsic_fraction_exponent.x, gfortran.fortran-torture/execute/intrinsic_nearest.x, gfortran.fortran-torture/execute/intrinsic_set_exponent.x, gfortran.fortran-torture/execute/nan_inf_fmt.x: Update to match. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@87399 138bc75d-0d04-0410-961f-82ee72b054a4
* 2004-09-03 David Billinghurst <David.Billinghurst@riotinto.com>billingd2004-09-031-6/+0
| | | | | | | | | PR fortran/16579 * gfortran.fortran-torture/execute/intrinsic_i_char.f90: Delete. Duplicate of gfortran.dg/g77/20010610.f git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@87024 138bc75d-0d04-0410-961f-82ee72b054a4
* fortran/tobi2004-08-311-0/+6
| | | | | | | | | | | | | PR fortran/16579 * trans-types.c (gfc_init_types): Make gfc_character1_type_node an unsigned char. testsuite/ PR fortran/16579 * gfortran.fortran-torture/execute/intrinsic_i_char.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@86846 138bc75d-0d04-0410-961f-82ee72b054a4
* * lib/fortran-torture.exp (fortran-torture-execute): Honorrth2004-08-304-0/+8
| | | | | | | | | | | | additional_flags set by alternate driver. (ieee-options): New procedure. * gfortran.fortran-torture/execute/intrinsic_fraction_exponent.x: New. * gfortran.fortran-torture/execute/intrinsic_nearest.x: New. * gfortran.fortran-torture/execute/intrinsic_set_exponent.x: New. * gfortran.fortran-torture/execute/nan_inf_fmt.x: New. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@86761 138bc75d-0d04-0410-961f-82ee72b054a4
* * gfortran.fortran-torture/execute/intrinsic_sr_kind.f90: Disablerth2004-08-261-14/+15
| | | | | | | the bits that expect kind=8 to be the largest real kind. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@86604 138bc75d-0d04-0410-961f-82ee72b054a4
* * gimplify.c (gimplify_expr) <case CONST_DECL>: Don't replacerth2004-07-302-8/+12
| | | | | | | | | | | | | | | | | | with DECL_INITIAL if fb_lvalue. * tree-gimple.c (is_gimple_id): Add CONST_DECL. * tree-pretty-print.c (dump_decl_name): Dump unnamed CONST_DECL with <Cxxx>. * tree-ssa-ccp.c (maybe_fold_stmt_indirect): Fold CONST_DECL. fortran/ * trans-expr.c (gfc_conv_expr_reference): Create a CONST_DECL for TREE_CONSTANTs. testsuite/ * gfortran.fortran-torture/execute/intrinsic_rrspacing.f90: Fix write to constant argument. * gfortran.fortran-torture/execute/intrinsic_scale.f90: Likewise. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@85365 138bc75d-0d04-0410-961f-82ee72b054a4
* * gfortran.fortran-torture/execute/intrinsic_nearest.f90: Disablerth2004-07-301-7/+14
| | | | | | | tests of nearest around zero. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@85361 138bc75d-0d04-0410-961f-82ee72b054a4
* * gfortran.fortran-torture/execute/intrinsic_spacing.f90: Passrth2004-07-281-6/+8
| | | | | | | arguments in the correct type. Don't write to constant arguments. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@85272 138bc75d-0d04-0410-961f-82ee72b054a4
* fortran/tobi2004-07-151-0/+3
| | | | | | | | | | | | | PR fortran/13792 * simplify.c (gfc_simplify_bound): Copy the bound expression. testsuite/ PR fortran/13792 * gfortran.fortran-torture/execute/bounds.f90: Add check for compile-time simplification. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@84773 138bc75d-0d04-0410-961f-82ee72b054a4
* fortran/tobi2004-07-101-0/+6
| | | | | | | | | | | | | * trans-decl.c (gfc_create_module_variable): Nothing to do if symbol is in common, because we ... (gfc_generate_module_vars): Call gfc_trans_common. testsuite/ * gfortran.fortran-torture/execute/common_2.f90: Add check for access to common var from module. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@84479 138bc75d-0d04-0410-961f-82ee72b054a4
OpenPOWER on IntegriCloud