2008-02-10 19:06:34 +01:00
|
|
|
2008-02-10 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35063
|
|
|
|
|
* io/unit.c (destroy_unit_mutex): New function that uses
|
|
|
|
|
__gthread_mutex_destroy_function or pthread_mutex_destroy after
|
|
|
|
|
unlocking and before free_mem for final closure of I/O unit.
|
|
|
|
|
(delete_root): Use new function.
|
|
|
|
|
(free_internal_unit): Likewise.
|
|
|
|
|
(close_unit_1): Likewise.
|
|
|
|
|
|
2008-02-02 14:50:55 +01:00
|
|
|
2008-02-02 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/35001
|
|
|
|
|
* m4/shape.m4: Return 0 for extents <= 0.
|
|
|
|
|
* generated/shape_i4.c: Regenerated.
|
|
|
|
|
* generated/shape_i8.c: Regenerated.
|
|
|
|
|
* generated/shape_i16.c: Regenerated.
|
|
|
|
|
|
2008-01-28 20:02:47 +01:00
|
|
|
2008-01-27 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/34980
|
|
|
|
|
* m4/shape.m4: If return array is empty, return early.
|
|
|
|
|
* generated/shape_i4.c: Regenerated.
|
|
|
|
|
* generated/shape_i8.c: Regenerated.
|
|
|
|
|
* generated/shape_i16.c: Regenerated.
|
|
|
|
|
|
2008-01-26 16:22:59 +01:00
|
|
|
2008-01-26 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfofortran/34887
|
|
|
|
|
* io/transfer.c (next_record_w): Always move to the farthest
|
|
|
|
|
position when completing the record (also when we are
|
|
|
|
|
processing a slash edit descriptor).
|
|
|
|
|
|
2008-01-26 00:36:39 +01:00
|
|
|
2008-01-25 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
2008-01-26 00:34:53 +01:00
|
|
|
|
|
|
|
|
PR libfortran/34876
|
|
|
|
|
* io/transfer.c (write_buf): Handle case of zero sized array.
|
|
|
|
|
(transfer_array): Set data pointer to NULL and size to zero. Then
|
|
|
|
|
make a data transfer and return.
|
|
|
|
|
|
2008-01-24 17:29:16 +01:00
|
|
|
2008-01-24 David Edelsohn <edelsohn@gnu.org>
|
|
|
|
|
|
|
|
|
|
* configure: Regenerate.
|
|
|
|
|
|
2008-01-20 07:33:49 +01:00
|
|
|
2008-01-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
2008-01-20 07:55:46 +01:00
|
|
|
PR libfortran/34795
|
2008-01-20 07:33:49 +01:00
|
|
|
* io/inquire.c (inquire_via_unit): If a unit is opened, return values
|
|
|
|
|
according to the open action for DIRECT, FORMATTED, and UNFORMATTED.
|
|
|
|
|
(inquire_via_filename): Return "UNKNOWN" for SEQUENTIAL, DIRECT,
|
|
|
|
|
FORAMATTED, and UNFORMATTED inquiries.
|
|
|
|
|
* io/unix.c (inquire_sequential): Return "UNKNOWN" when appropriate
|
|
|
|
|
for files that are not opened. (inquire_direct): Same.
|
|
|
|
|
(inquire_formatted): Same.
|
|
|
|
|
|
2008-01-18 23:19:15 +01:00
|
|
|
2008-01-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
2008-01-20 07:55:46 +01:00
|
|
|
PR libfortran/34782
|
2008-01-18 23:19:15 +01:00
|
|
|
* io/transfer.c (formatted_transfer_scalar): Set max_pos to the greater
|
|
|
|
|
of the current max_pos or the newly calculated position.
|
|
|
|
|
|
2008-01-18 22:43:08 +01:00
|
|
|
2008-01-18 Tobias Burnus <burnus@net-b.de>
|
|
|
|
|
|
|
|
|
|
* io/write.c (write_real): Increase default precision
|
|
|
|
|
for REAL(16) by one.
|
|
|
|
|
|
2008-01-16 10:13:39 +01:00
|
|
|
2008-01-16 Steven Bosscher <steven@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/34669
|
|
|
|
|
* mk-kinds-h.sh: Compile with -S to avoid calling the assembler,
|
|
|
|
|
to avoid piping the -fdump-parse-tree output to the assembler
|
|
|
|
|
when configuring with -pipe.
|
|
|
|
|
* mk-sik-inc.sh: Likewise.
|
|
|
|
|
* mk-srk-inc.sh: Likewise.
|
|
|
|
|
|
re PR libfortran/34671 (any(kind=1) and all(kind=1))
2008-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/34671
* gfortran.am: Added _gfortran_all_l1, _gfortran_all_l2,
_gfortran_any_l1, _gfortran_any_l2, -28,15 _gfortran_count_1_l,
_gfortran_count_16_l, _gfortran_count_2_l, _gfortran_count_4_l and
_gfortran_count_8_l Removed _gfortran_count_16_l16,
_gfortran_count_16_l4, _gfortran_count_16_l8,
_gfortran_count_4_l16, _gfortran_count_4_l4, _gfortran_count_4_l8,
_gfortran_count_8_l16, _gfortran_count_8_l4 and
_gfortran_count_8_l8.
* Makefile.am: Added generated/any_l1.c and generated/any_l2.c to
i_any_c. Added generated/all_l1. and generated/all_l2.c to
i_all_c. Removed generated/count_4_l4.c, generated/count_8_l4.c,
generated/count_16_l4.c, generated/count_4_l8.c,
generated/count_8_l8.c, generated/count_16_l8.c,
generated/count_4_l16.c, generated/count_8_l16.c, and
generated/count_16_l16.c from i_count_c. Added count_1_l.c,
count_2_l.c, count_4_l.c, count_8_l.c and count_16_l.c to
i_count_c. I_M4_DEPS2 depends on ifunction_logical.m4, for
any of the files generated from all.m4, any.m4 and count.m4.
* Makefile.in: Regenerated.
* m4/ifunction_logical.m4: New file. Use
GFC_LOGICAL_1 pointer for access to source arrays.
* m4/any.m4: Include ifunction_logical.m4 instead of
ifunction.m4. Don't check atype_name.
* m4/all.m4: Likewise.
* m4/count.m4: Likewise.
* generated/any_l1.c: New file.
* generated/any_l2.c: New file.
* generated/all_l1.c: New file.
* generated/count_1_l.c: New file.
* generated/count_2_l.c: New file.
* generated/count_4_l.c: New file.
* generated/count_8_l.c: New file.
* generated/count_16_l.c: New file.
* generated/any_l4.c: Regenerated.
* generated/any_l8.c: Regenerated.
* generated/any_l16.c: Regenerated.
* generated/all_l4.c: Regenerated.
* generated/all_l8.c: Regenerated.
* generated/all_l16.c: Regenerated.
* generated/count_4_l4.c: Removed.
* generated/count_4_l8.c: Removed.
* generated/count_4_l16.c: Removed.
* generated/count_8_l4.c: Removed.
* generated/count_8_l8.c: Removed.
* generated/count_8_l16.c: Removed.
* generated/count_16_l4.c: Removed.
* generated/count_16_l8.c: Removed.
* generated/count_16_l16.c: Removed.
2008-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/34671
* iresolve.c (gfc_resolve_all): Call resolve_mask_arg.
(gfc_resolve_any): Likewise.
(gfc_resolve_count): Likewise. Don't append kind of
argument to function name.
2008-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/34671
* gfortran.dg/anyallcount_1.f90: New test.
From-SVN: r131553
2008-01-15 22:22:07 +01:00
|
|
|
2008-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/34671
|
|
|
|
|
* gfortran.am: Added _gfortran_all_l1, _gfortran_all_l2,
|
|
|
|
|
_gfortran_any_l1, _gfortran_any_l2, -28,15 _gfortran_count_1_l,
|
|
|
|
|
_gfortran_count_16_l, _gfortran_count_2_l, _gfortran_count_4_l and
|
|
|
|
|
_gfortran_count_8_l Removed _gfortran_count_16_l16,
|
|
|
|
|
_gfortran_count_16_l4, _gfortran_count_16_l8,
|
|
|
|
|
_gfortran_count_4_l16, _gfortran_count_4_l4, _gfortran_count_4_l8,
|
|
|
|
|
_gfortran_count_8_l16, _gfortran_count_8_l4 and
|
|
|
|
|
_gfortran_count_8_l8.
|
|
|
|
|
* Makefile.am: Added generated/any_l1.c and generated/any_l2.c to
|
|
|
|
|
i_any_c. Added generated/all_l1. and generated/all_l2.c to
|
|
|
|
|
i_all_c. Removed generated/count_4_l4.c, generated/count_8_l4.c,
|
|
|
|
|
generated/count_16_l4.c, generated/count_4_l8.c,
|
|
|
|
|
generated/count_8_l8.c, generated/count_16_l8.c,
|
|
|
|
|
generated/count_4_l16.c, generated/count_8_l16.c, and
|
|
|
|
|
generated/count_16_l16.c from i_count_c. Added count_1_l.c,
|
|
|
|
|
count_2_l.c, count_4_l.c, count_8_l.c and count_16_l.c to
|
|
|
|
|
i_count_c. I_M4_DEPS2 depends on ifunction_logical.m4, for
|
|
|
|
|
any of the files generated from all.m4, any.m4 and count.m4.
|
|
|
|
|
* Makefile.in: Regenerated.
|
|
|
|
|
* m4/ifunction_logical.m4: New file. Use
|
|
|
|
|
GFC_LOGICAL_1 pointer for access to source arrays.
|
|
|
|
|
* m4/any.m4: Include ifunction_logical.m4 instead of
|
|
|
|
|
ifunction.m4. Don't check atype_name.
|
|
|
|
|
* m4/all.m4: Likewise.
|
|
|
|
|
* m4/count.m4: Likewise.
|
|
|
|
|
* generated/any_l1.c: New file.
|
|
|
|
|
* generated/any_l2.c: New file.
|
|
|
|
|
* generated/all_l1.c: New file.
|
|
|
|
|
* generated/count_1_l.c: New file.
|
|
|
|
|
* generated/count_2_l.c: New file.
|
|
|
|
|
* generated/count_4_l.c: New file.
|
|
|
|
|
* generated/count_8_l.c: New file.
|
|
|
|
|
* generated/count_16_l.c: New file.
|
|
|
|
|
* generated/any_l4.c: Regenerated.
|
|
|
|
|
* generated/any_l8.c: Regenerated.
|
|
|
|
|
* generated/any_l16.c: Regenerated.
|
|
|
|
|
* generated/all_l4.c: Regenerated.
|
|
|
|
|
* generated/all_l8.c: Regenerated.
|
|
|
|
|
* generated/all_l16.c: Regenerated.
|
|
|
|
|
* generated/count_4_l4.c: Removed.
|
|
|
|
|
* generated/count_4_l8.c: Removed.
|
|
|
|
|
* generated/count_4_l16.c: Removed.
|
|
|
|
|
* generated/count_8_l4.c: Removed.
|
|
|
|
|
* generated/count_8_l8.c: Removed.
|
|
|
|
|
* generated/count_8_l16.c: Removed.
|
|
|
|
|
* generated/count_16_l4.c: Removed.
|
|
|
|
|
* generated/count_16_l8.c: Removed.
|
|
|
|
|
* generated/count_16_l16.c: Removed.
|
|
|
|
|
|
2008-01-13 23:13:52 +01:00
|
|
|
2008-01-13 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/34746
|
|
|
|
|
* m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Use %ld
|
|
|
|
|
in printf format for all bounds checking; cast all
|
|
|
|
|
integer-like arguments to runtime_error() to long int.
|
|
|
|
|
(`m'name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
(`s'name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
* m4/ifunction.m4 (name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
(`m'name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
(`s'name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
* generated/all_l16.c: Regenerated.
|
|
|
|
|
* generated/all_l4.c: Regenerated.
|
|
|
|
|
* generated/all_l8.c: Regenerated.
|
|
|
|
|
* generated/any_l16.c: Regenerated.
|
|
|
|
|
* generated/any_l4.c: Regenerated.
|
|
|
|
|
* generated/any_l8.c: Regenerated.
|
|
|
|
|
* generated/count_16_l16.c: Regenerated.
|
|
|
|
|
* generated/count_16_l4.c: Regenerated.
|
|
|
|
|
* generated/count_16_l8.c: Regenerated.
|
|
|
|
|
* generated/count_4_l16.c: Regenerated.
|
|
|
|
|
* generated/count_4_l4.c: Regenerated.
|
|
|
|
|
* generated/count_4_l8.c: Regenerated.
|
|
|
|
|
* generated/count_8_l16.c: Regenerated.
|
|
|
|
|
* generated/count_8_l4.c: Regenerated.
|
|
|
|
|
* generated/count_8_l8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r8.c: Regenerated.
|
|
|
|
|
* generated/maxval_i1.c: Regenerated.
|
|
|
|
|
* generated/maxval_i16.c: Regenerated.
|
|
|
|
|
* generated/maxval_i2.c: Regenerated.
|
|
|
|
|
* generated/maxval_i4.c: Regenerated.
|
|
|
|
|
* generated/maxval_i8.c: Regenerated.
|
|
|
|
|
* generated/maxval_r10.c: Regenerated.
|
|
|
|
|
* generated/maxval_r16.c: Regenerated.
|
|
|
|
|
* generated/maxval_r4.c: Regenerated.
|
|
|
|
|
* generated/maxval_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r8.c: Regenerated.
|
|
|
|
|
* generated/minval_i1.c: Regenerated.
|
|
|
|
|
* generated/minval_i16.c: Regenerated.
|
|
|
|
|
* generated/minval_i2.c: Regenerated.
|
|
|
|
|
* generated/minval_i4.c: Regenerated.
|
|
|
|
|
* generated/minval_i8.c: Regenerated.
|
|
|
|
|
* generated/minval_r10.c: Regenerated.
|
|
|
|
|
* generated/minval_r16.c: Regenerated.
|
|
|
|
|
* generated/minval_r4.c: Regenerated.
|
|
|
|
|
* generated/minval_r8.c: Regenerated.
|
|
|
|
|
* generated/product_c10.c: Regenerated.
|
|
|
|
|
* generated/product_c16.c: Regenerated.
|
|
|
|
|
* generated/product_c4.c: Regenerated.
|
|
|
|
|
* generated/product_c8.c: Regenerated.
|
|
|
|
|
* generated/product_i1.c: Regenerated.
|
|
|
|
|
* generated/product_i16.c: Regenerated.
|
|
|
|
|
* generated/product_i2.c: Regenerated.
|
|
|
|
|
* generated/product_i4.c: Regenerated.
|
|
|
|
|
* generated/product_i8.c: Regenerated.
|
|
|
|
|
* generated/product_r10.c: Regenerated.
|
|
|
|
|
* generated/product_r16.c: Regenerated.
|
|
|
|
|
* generated/product_r4.c: Regenerated.
|
|
|
|
|
* generated/product_r8.c: Regenerated.
|
|
|
|
|
* generated/sum_c10.c: Regenerated.
|
|
|
|
|
* generated/sum_c16.c: Regenerated.
|
|
|
|
|
* generated/sum_c4.c: Regenerated.
|
|
|
|
|
* generated/sum_c8.c: Regenerated.
|
|
|
|
|
* generated/sum_i1.c: Regenerated.
|
|
|
|
|
* generated/sum_i16.c: Regenerated.
|
|
|
|
|
* generated/sum_i2.c: Regenerated.
|
|
|
|
|
* generated/sum_i4.c: Regenerated.
|
|
|
|
|
* generated/sum_i8.c: Regenerated.
|
|
|
|
|
* generated/sum_r10.c: Regenerated.
|
|
|
|
|
* generated/sum_r16.c: Regenerated.
|
|
|
|
|
* generated/sum_r4.c: Regenerated.
|
|
|
|
|
* generated/sum_r8.c: Regenerated.
|
|
|
|
|
|
2008-01-11 21:21:05 +01:00
|
|
|
2008-01-11 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/34670
|
|
|
|
|
* m4/iparm.m4 (upcase): New macro (copied from the m4 manual).
|
|
|
|
|
(u_name): New macro for the upper case name of the intrinsic.
|
|
|
|
|
* m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Add
|
|
|
|
|
bounds checking and rank check, depending on
|
|
|
|
|
compile_options.bounds_check.
|
|
|
|
|
(`m'name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
(`s'name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
* m4/ifunction.m4 (name`'rtype_qual`_'atype_code): Add
|
|
|
|
|
bounds checking and rank check, depending on
|
|
|
|
|
compile_options.bounds_check.
|
|
|
|
|
(`m'name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
(`s'name`'rtype_qual`_'atype_code): Likewise.
|
|
|
|
|
* generated/all_l16.c: Regenerated.
|
|
|
|
|
* generated/all_l4.c: Regenerated.
|
|
|
|
|
* generated/all_l8.c: Regenerated.
|
|
|
|
|
* generated/any_l16.c: Regenerated.
|
|
|
|
|
* generated/any_l4.c: Regenerated.
|
|
|
|
|
* generated/any_l8.c: Regenerated.
|
|
|
|
|
* generated/count_16_l16.c: Regenerated.
|
|
|
|
|
* generated/count_16_l4.c: Regenerated.
|
|
|
|
|
* generated/count_16_l8.c: Regenerated.
|
|
|
|
|
* generated/count_4_l16.c: Regenerated.
|
|
|
|
|
* generated/count_4_l4.c: Regenerated.
|
|
|
|
|
* generated/count_4_l8.c: Regenerated.
|
|
|
|
|
* generated/count_8_l16.c: Regenerated.
|
|
|
|
|
* generated/count_8_l4.c: Regenerated.
|
|
|
|
|
* generated/count_8_l8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_16_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_4_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc0_8_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_16_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_4_r8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i1.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i2.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_i8.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r10.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r16.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r4.c: Regenerated.
|
|
|
|
|
* generated/maxloc1_8_r8.c: Regenerated.
|
|
|
|
|
* generated/maxval_i1.c: Regenerated.
|
|
|
|
|
* generated/maxval_i16.c: Regenerated.
|
|
|
|
|
* generated/maxval_i2.c: Regenerated.
|
|
|
|
|
* generated/maxval_i4.c: Regenerated.
|
|
|
|
|
* generated/maxval_i8.c: Regenerated.
|
|
|
|
|
* generated/maxval_r10.c: Regenerated.
|
|
|
|
|
* generated/maxval_r16.c: Regenerated.
|
|
|
|
|
* generated/maxval_r4.c: Regenerated.
|
|
|
|
|
* generated/maxval_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_16_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_4_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc0_8_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_16_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_4_r8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i1.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i2.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_i8.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r10.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r16.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r4.c: Regenerated.
|
|
|
|
|
* generated/minloc1_8_r8.c: Regenerated.
|
|
|
|
|
* generated/minval_i1.c: Regenerated.
|
|
|
|
|
* generated/minval_i16.c: Regenerated.
|
|
|
|
|
* generated/minval_i2.c: Regenerated.
|
|
|
|
|
* generated/minval_i4.c: Regenerated.
|
|
|
|
|
* generated/minval_i8.c: Regenerated.
|
|
|
|
|
* generated/minval_r10.c: Regenerated.
|
|
|
|
|
* generated/minval_r16.c: Regenerated.
|
|
|
|
|
* generated/minval_r4.c: Regenerated.
|
|
|
|
|
* generated/minval_r8.c: Regenerated.
|
|
|
|
|
* generated/product_c10.c: Regenerated.
|
|
|
|
|
* generated/product_c16.c: Regenerated.
|
|
|
|
|
* generated/product_c4.c: Regenerated.
|
|
|
|
|
* generated/product_c8.c: Regenerated.
|
|
|
|
|
* generated/product_i1.c: Regenerated.
|
|
|
|
|
* generated/product_i16.c: Regenerated.
|
|
|
|
|
* generated/product_i2.c: Regenerated.
|
|
|
|
|
* generated/product_i4.c: Regenerated.
|
|
|
|
|
* generated/product_i8.c: Regenerated.
|
|
|
|
|
* generated/product_r10.c: Regenerated.
|
|
|
|
|
* generated/product_r16.c: Regenerated.
|
|
|
|
|
* generated/product_r4.c: Regenerated.
|
|
|
|
|
* generated/product_r8.c: Regenerated.
|
|
|
|
|
* generated/sum_c10.c: Regenerated.
|
|
|
|
|
* generated/sum_c16.c: Regenerated.
|
|
|
|
|
* generated/sum_c4.c: Regenerated.
|
|
|
|
|
* generated/sum_c8.c: Regenerated.
|
|
|
|
|
* generated/sum_i1.c: Regenerated.
|
|
|
|
|
* generated/sum_i16.c: Regenerated.
|
|
|
|
|
* generated/sum_i2.c: Regenerated.
|
|
|
|
|
* generated/sum_i4.c: Regenerated.
|
|
|
|
|
* generated/sum_i8.c: Regenerated.
|
|
|
|
|
* generated/sum_r10.c: Regenerated.
|
|
|
|
|
* generated/sum_r16.c: Regenerated.
|
|
|
|
|
* generated/sum_r4.c: Regenerated.
|
|
|
|
|
* generated/sum_r8.c: Regenerated.
|
|
|
|
|
|
2008-01-05 17:00:40 +01:00
|
|
|
2008-01-05 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/34676
|
|
|
|
|
* io/list_read.c (next_char): Only save the EOF condition for later if
|
|
|
|
|
advance="no".
|
|
|
|
|
|
2008-01-03 20:49:38 +01:00
|
|
|
2008-01-03 Thomas Koenig <tkoenig@gcc.gnu.org>
|
|
|
|
|
|
|
|
|
|
PR libfortran/34565
|
|
|
|
|
* io/io.h: Adjust protoypes for open_internal(),
|
|
|
|
|
next_array_record() and init_loop_spec().
|
|
|
|
|
* io/list_read.c (next_char): Use argument "finished"
|
|
|
|
|
of next_array_record to check for end on internal file.
|
|
|
|
|
* io/unit.c: Calculate the offset for an array
|
|
|
|
|
internal file and supply this informatin to open_internal().
|
|
|
|
|
* io/unix.c (open_internal): Set the offset for the internal
|
|
|
|
|
file on open.
|
|
|
|
|
* io/transfer.c (init_loop_spec): Calculate the starting
|
|
|
|
|
record in case of negative strides. Return size of 0 for
|
|
|
|
|
an empty array.
|
|
|
|
|
(next_array_record): Use an extra flag to signal that the
|
|
|
|
|
array is finished.
|
|
|
|
|
(next_record_r): Use the new flag to next_array_record().
|
|
|
|
|
(next_record_w): Likewise.
|