OSDN Git Service

* libgfortran.h (GFC_ITOA_BUF_SIZE, GFC_XTOA_BUF_SIZE,
[pf3gnuchains/gcc-fork.git] / libgfortran / ChangeLog
index d36e500..3b5abd2 100644 (file)
@@ -1,3 +1,223 @@
+2005-10-01  Jakub Jelinek  <jakub@redhat.com>
+
+       * libgfortran.h (GFC_ITOA_BUF_SIZE, GFC_XTOA_BUF_SIZE,
+       GFC_OTOA_BUF_SIZE, GFC_BTOA_BUF_SIZE): Define.
+       (gfc_itoa, xtoa): Add 2 extra arguments.
+       * runtime/environ.c: Include stdio.h.
+       (check_buffered): Use sprintf.
+       * runtime/error.c: Include assert.h.
+       (gfc_itoa, xtoa): Add 2 extra arguments, avoid using static
+       buffers.
+       (st_printf, st_sprintf): Adjust callers.
+       * io/write.c (otoa, btoa): Add 2 extra arguments, avoid using
+       static buffers.
+       (write_int, write_decimal): Add 2 extra arguments to conv
+       function pointer, adjust caller.
+       (write_integer): Adjust gfc_itoa caller.
+
+       * io/unit.c (get_array_unit_len): Return 0 rather than NULL.
+
+       * io/read.c (read_f): Remove spurious pointer dereference.
+
+2005-09-30  Janne Blomqvist <jblomqvi@cc.hut.fi>
+
+       PR 24112
+       * io/open.c (edit_modes): Check for correct flag.
+
+2005-09-29  Jakub Jelinek  <jakub@redhat.com>
+
+       * runtime/string.c (find_option): Change 3rd argument to
+       const st_option *.
+       * libgfortran.h (find_option): Likewise.
+       * runtime/environ.c (rounding, precision, signal_choices): Constify.
+       (init_choice, show_choice): Change 2nd argument to const choice *.
+       * io/open.c (access_opt, action_opt, blank_opt, delim_opt, form_opt,
+       position_opt, status_opt, pad_opt): Constify.
+       * io/transfer.c (advance_opt): Likewise.
+       * io/inquire.c (undefined): Likewise.
+       * io/close.c (status_opt): Likewise.
+       * io/format.c (posint_required, period_required, nonneg_required,
+       unexpected_element, unexpected_end, bad_string, bad_hollerith,
+       reversion_error): Likewise.
+       * io/unix.c (yes, no, unknown): Change from const char *
+       into const char [].
+
+2005-09-27  Steve Ellcey  <sje@cup.hp.com>
+
+       PR target/23552
+       * acinclude.m4 (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE): New.
+       (LIBGFOR_CHECK_FOR_BROKEN_ISNAN): New.
+       (LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): New.
+       * configure.ac (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE): Add use.
+       (LIBGFOR_CHECK_FOR_BROKEN_ISNAN): Add use.
+       (LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): Add use.
+       * configure: Regenerate.
+       * config.h.in: Regenerate.
+       * libgfortan.h (isfinite): undef if broken, set if needed.
+       (isnan): undef if broken, set if needed.
+        (fpclassify): undef if broken, set if needed.
+       * io/write.c: Remove TODO comment about working isfinite.
+       * intrinsics/c99_functions.c (round): Use isfinite instead
+       of fpclassify.
+       * intrinsics/c99_functions.c (roundf): Ditto.
+
+2005-09-24  Janne Blomqvist <jblomqvi@cc.hut.fi>
+
+       * io.h: Changed prototypes of list_formatted_{read|write}.
+       * list_read.c (list_formatted_read): Renamed to
+       list_formatted_read_scalar and made static.
+       (list_formatted_read): New function.
+       * transfer.c: Prototype for transfer_array. Changed transfer
+       function pointer.
+       (unformatted_read): Add nelems argument, use it.
+       (unformatted_write): Likewise.
+       (formatted_transfer): Changed name to formatted_transfer_scalar.
+       (formatted_transfer): New function.
+       (transfer_integer): Add nelems argument to transfer call, move
+       updating item count to transfer functions.
+       (transfer_real): Likewise.
+       (transfer_logical): Likewise.
+       (transfer_character): Likewise.
+       (transfer_complex): Likewise.
+       (transfer_array): New function.
+       (data_transfer_init): Call formatted_transfer with new argument.
+       (iolength_transfer): New argument, use it.
+       * write.c (list_formatted_write): Renamed to
+       list_formatted_write_scalar, made static.
+       (list_formatted_write): New function.
+
+2005-09-26  David Edelsohn  <edelsohn@gnu.org>
+
+       * configure.ac: Add check for __clog.
+       * configure: Regenerate.
+
+2005-09-25  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
+
+       * c99_protos.h: Add prototypes for C99 complex functions.
+       * libgfortran.h: Include complex.h before c99_protos.h.
+       * intrinsics/c99_functions.c: Define HAVE_ macros for the
+       fallback functions we provide.
+       (cabsf, cabs, cabsl, cargf, carg, cargl, cexpf, cexp, cexpl,
+       clogf, clog, clogl, clog10f, clog10, clog10l, cpowf, cpow, cpowl,
+       cqsrtf, csqrt, csqrtl, csinhf, csinh, csinhl, ccoshf, ccosh,
+       ccoshl, ctanhf, ctanh, ctanhl, csinf, csin, csinl, ccosf, ccos,
+       ccosl, ctanf, ctan, ctanl): New fallback functions.
+       * Makefile.am (gfor_math_trig_c, gfor_math_trig_obj,
+       gfor_specific_c, gfor_cmath_src, gfor_cmath_obj): Remove.
+       * Makefile.in: Regenerate.
+       * configure.ac: Remove checks for csin. Add checks for all C99
+       complex functions.
+       * config.h.in: Regenerate.
+       * configure: Regenerate.
+       * aclocal.m4: Regenerate.
+
+2005-09-25  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
+           Danny Smith  <dannysmith@users.sourceforge.net>
+
+       PR libfortran/23803
+       * intrinsics/getXid.c: Add getpid wrapper for MinGW.
+       * intrinsics/getlog.c: Add getlogin wrapper for MinGW.
+       * intrinsics/hostnm.c: Add gethostname wrapper for MinGW.
+
+2005-09-24  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
+
+       PR libfortran/23802
+       * intrinsics/sleep.c: Add correct sleep macro for MinGW.
+
+2005-09-24  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
+
+       PR libfortran/23380
+       * intrinsics/cpu_time.c (__cpu_time_1): Provide a MS Windows
+       version.
+
+2005-09-14  Jerry DeLisle  <jvdelisle@verizon.net
+
+       PR fortran/21875 Internal Unit Array I/O, NIST
+       * libgfortran.h: Add run time error code for array stride.
+       * runtime/error.c (translate_error): Add error message for
+       array stride.
+       * io/io.h: Add array descriptor pointer to IOPARM structure.
+       Add prtotypes for two new functions.
+       * io/transfer.c (data_transfer_init): Removed initialization and
+       moved to unit.c (get_unit)
+       * io/transfer.c (next_record_r): Include internal unit read
+       functionality.
+       * io/transfer.c (next_record_w): Include internal unit write
+       functionality, including padding of character array records.
+       * io/unit.c (get_array_unit_len): New function to return the number
+       of records in the character array 'file' from the array descriptor.
+       * io/unit.c (get_unit): Gathered initialization code from
+       init_data_transfer for internal units and added initialization of
+       character array unit.
+       * io/unit.c (is_array_io): New function to determine if internal unit
+       is an array.
+       * io/unix.c (mem_alloc_w_at): Add error checks for bad record length
+       and end of file.
+
+2005-09-13  Richard Sandiford  <richard@codesourcery.com>
+
+       PR target/19269
+       * intrinsics/cshift0.c (cshift0): Add an extra size argument.
+       (cshift0_1, cshift0_2, cshift0_4, cshift0_8): Replace explicit
+       implementations with...
+       (DEFINE_CSHIFT): ...this new macro.  Define character versions too.
+       * intrinsics/eoshift0.c (zeros): Delete.
+       (eoshift0): Add extra size and filler arguments.  Use memset if no
+       bound is provided.
+       (eoshift0_1, eoshift0_2, eoshift0_4, eoshift0_8): Replace explicit
+       implementations with...
+       (DEFINE_EOSHIFT): ...this new macro.  Define character versions too.
+       * intrinsics/eoshift2.c (zeros): Delete.
+       (eoshift2): Add extra size and filler arguments.  Use memset if no
+       bound is provided.
+       (eoshift2_1, eoshift2_2, eoshift2_4, eoshift2_8): Replace explicit
+       implementations with...
+       (DEFINE_EOSHIFT): ...this new macro.  Define character versions too.
+       * intrinsics/pack.c (pack_internal): New static function, reusing
+       the contents of pack and adding an extra size argument.  Change
+       "mptr" rather than "m" when calculating the array size.
+       (pack): Redefine as a forwarder to pack_internal.
+       (pack_s_internal): New static function, reusing the contents of
+       pack_s and adding an extra size argument.
+       (pack_s): Redefine as a forwarder to pack_s_internal.
+       (pack_char, pack_s_char): New functions.
+       * intrinsics/reshape.c (reshape_internal): New static function,
+       reusing the contents of reshape and adding an extra size argument.
+       (reshape): Redefine as a forwarder to reshape_internal.
+       (reshape_char): New function.
+       * intrinsics/spread.c (spread_internal): New static function,
+       reusing the contents of spread and adding an extra size argument.
+       (spread): Redefine as a forwarder to spread_internal.
+       (spread_char): New function.
+       * intrinsics/transpose.c (transpose_internal): New static function,
+       reusing the contents of transpose and adding an extra size argument.
+       (transpose): Redefine as a forwarder to transpose_internal.
+       (transpose_char): New function.
+       * intrinsics/unpack.c (unpack_internal): New static function, reusing
+       the contents of unpack1 and adding extra size and fsize arguments.
+       (unpack1): Redefine as a forwarder to unpack_internal.
+       (unpack0): Call unpack_internal instead of unpack1.
+       (unpack1_char, unpack0_char): New functions.
+       * m4/cshift1.m4 (cshift1): New static function, reusing the contents
+       of cshift1_<kind> and adding an extra size argument.
+       (cshift1_<kind>): Redefine as a forwarder to cshift1.
+       (cshift1_<kind>_char): New function.
+       * m4/eoshift1.m4 (zeros): Delete.
+       (eoshift1): New static function, reusing the contents of
+       eoshift1_<kind> and adding extra size and filler arguments.
+       Fix calculation of hstride.  Use memset if no bound is provided.
+       (eoshift1_<kind>): Redefine as a forwarder to eoshift1.
+       (eoshift1_<kind>_char): New function.
+       * m4/eoshift3.m4 (zeros): Delete.
+       (eoshift3): New static function, reusing the contents of
+       eoshift3_<kind> and adding extra size and filler arguments.
+       Use memset if no bound is provided.
+       (eoshift3_<kind>): Redefine as a forwarder to eoshift3.
+       (eoshift3_<kind>_char): New function.
+       * generated/cshift1_4.c, generated/cshift1_8.c,
+       * generated/eoshift1_4.c, generated/eoshift1_8.c,
+       * generated/eoshift3_4.c, generated/eoshift3_8.c: Regenerate.
+
 2005-09-11  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
 
        PR libfortran/20179