8a92685e53
2016-09-09 Steven G. Kargl <kargl@gcc.gnu.org> PR fortran/77507 * intrinsic.c (add_functions): Use correct keyword. 2016-09-09 Steven G. Kargl <kargl@gcc.gnu.org> PR fortran/77507 * ieee/ieee_arithmetic.F90 (IEEE_VALUE_4,IEEE_VALUE_8,IEEE_VALULE_10, IEEE_VALUE_16): Use correct keyword. 2016-09-09 Steven G. Kargl <kargl@gcc.gnu.org> PR fortran/77507 * gfortran.dg/pr77507.f90: New test. From-SVN: r240050
220 lines
8.3 KiB
Plaintext
220 lines
8.3 KiB
Plaintext
2016-09-09 Steven G. Kargl <kargl@gcc.gnu.org>
|
||
|
||
PR fortran/77507
|
||
* ieee/ieee_arithmetic.F90 (IEEE_VALUE_4,IEEE_VALUE_8,IEEE_VALULE_10,
|
||
IEEE_VALUE_16): Use correct keyword.
|
||
|
||
2016-09-06 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libgfortran/77393
|
||
* io/write_float.def (build_float_string): Recognize when the
|
||
result will not fit in the user provided, star fill, and exit
|
||
early.
|
||
|
||
2016-08-31 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libgfortran/77393
|
||
* io/write.c (kind_from_size): New function to calculate required buffer
|
||
size based on kind type. (select_buffer, select_string): Use new
|
||
function. (write_float_0, write_real, write_real_g0, write_complex):
|
||
Adjust calls to pass parameters needed by new function.
|
||
|
||
2016-08-31 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
Paul Thomas <pault@gcc.gnu.org>
|
||
|
||
PR libgfortran/48298
|
||
* gfortran.map : Flag _st_set_nml_dtio_var and
|
||
_gfortran_transfer_derived.
|
||
* io/format.c (format_lex): Detect DTIO formatting.
|
||
(parse_format_list): Parse the DTIO format.
|
||
(next_format): Include FMT_DT.
|
||
* io/format.h : Likewise. Add structure 'udf' to structure
|
||
'fnode' to carry the IOTYPE string and the 'vlist'.
|
||
* io/io.h : Add prototypes for the two types of DTIO subroutine
|
||
and a typedef for gfc_class. Also, add to 'namelist_type'
|
||
fields for the pointer to the DTIO procedure and the vtable.
|
||
Add fields to struct st_parameter_dt for pointers to the two
|
||
types of DTIO subroutine. Add to gfc_unit DTIO specific fields.
|
||
(internal_proto): Add prototype for 'read_user_defined' and
|
||
'write_user_defined'.
|
||
* io/list_read.c (check_buffers): Use the 'current_unit' field.
|
||
(unget_char): Likewise.
|
||
(eat_spaces): Likewise.
|
||
(list_formatted_read_scalar): For case BT_CLASS, call the DTIO
|
||
procedure.
|
||
(nml_get_obj_data): Likewise when DTIO procedure is present,.
|
||
* io/transfer.c : Export prototypes for 'transfer_derived' and
|
||
'transfer_derived_write'.
|
||
(unformatted_read): For case BT_CLASS, call the DTIO procedure.
|
||
(unformatted_write): Likewise.
|
||
(formatted_transfer_scalar_read): Likewise.
|
||
(formatted_transfer_scalar_write: Likewise.
|
||
(transfer_derived): New function.
|
||
(data_transfer_init): Set last_char if no child_dtio.
|
||
(finalize_transfer): Return if child_dtio set.
|
||
(st_write_done): Add condition for child_dtio not set.
|
||
Add extra arguments for st_set_nml_var prototype.
|
||
(set_nml_var): New function that contains the contents of the
|
||
old version of st_set_nml_var. Also sets the 'dtio_sub' and
|
||
'vtable' fields of the 'nml' structure.
|
||
(st_set_nml_var): Now just calls set_nml_var with 'dtio_sub'
|
||
and 'vtable' NULL.
|
||
(st_set_nml_dtio_var): New function that calls set_nml_var.
|
||
* io/unit.c (get_external_unit): If the found unit child_dtio
|
||
is non zero, don't do any mutex locking/unlocking. Just
|
||
return the unit.
|
||
* io/unix.c (tempfile_open): Revert to C style comment.
|
||
* io/write.c (list_formatted_write_scalar): Do the DTIO call.
|
||
(nml_write_obj): Add BT_CLASS and do the DTIO call.
|
||
|
||
2016-08-29 Nathan Sidwell <nathan@acm.org>
|
||
|
||
* configure.ac (nvptx-*): Hardwire newlib.
|
||
* configure: Rebuilt.
|
||
|
||
2016-08-19 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
* intrinsics/random.c (xor_keys): New array with "secret" keys.
|
||
(scramble_seed): XOR given seed with xor_keys array rather than
|
||
shuffling bytes.
|
||
(unscramble_seed): Remove function.
|
||
(random_seed_i4): Use new scramble_seed.
|
||
(random_seed_i8): Likewise.
|
||
|
||
2016-08-19 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
* intrinsics/random.c (master_init): New variable.
|
||
(init_rand_state): Move below getosrandom (), maybe initialize
|
||
master_state.
|
||
(random_seed_i4): If called with no arguments, set master_init to
|
||
false, and reinitialize. If called with PUT=, set master_init to
|
||
true.
|
||
(random_seed_i8): Likewise.
|
||
|
||
2016-08-11 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
|
||
|
||
* intrinsics/random.c: Include <stdlib.h>.
|
||
|
||
2016-08-11 Janne Blomqvist <jb@gcc.gnu.org>
|
||
|
||
* intrinsics/random.c: Replace KISS with xorshift1024* using
|
||
per-thread state.
|
||
* runtime/main.c (init): Don't call random_seed_i4.
|
||
|
||
2016-07-22 Andre Vehreschild <vehre@gcc.gnu.org>
|
||
|
||
* caf/libcaf.h: Add parameter stat to caf_get() and
|
||
caf_send()'s function prototypes.
|
||
* caf/single.c (_gfortran_caf_get): Implement reporting
|
||
error using stat instead of abort().
|
||
(_gfortran_caf_send): Same.
|
||
(_gfortran_caf_sendget): Use NULL for stat when calling
|
||
caf_send().
|
||
|
||
2016-06-23 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libgfortran/48852
|
||
* io/write.c: Cleaned up whitespace.
|
||
(write_d, write_e, write_f, write_es, write_en): Use new helper
|
||
function write_float_0.
|
||
(write_float_0): New helper function.
|
||
(get_precision, select_buffer, select_string, write_float_string): New
|
||
helper functions used in remaining float writing functions.
|
||
Helper function write_float_string now contains code for writing
|
||
to kind=4 character internal units.
|
||
(write_real): Modified to establish working buffers at this level
|
||
and to use new helper functions.
|
||
(write_real_g0): Likewise modified.
|
||
(write_complex): Likewise modified. Gets both float strings before
|
||
output so that final lengths can be determined which allows right
|
||
justifying the complex number with no intervening spaces.
|
||
* io/write_float.def (build_float_string): Renamed from previosly
|
||
output_float, modified to use buffers passed in from higher functions,
|
||
builds a null terminated string of the floating point value. Character
|
||
kind=4 code eliminated.
|
||
(write_infnan): Likewise modified to use incoming buffers and eliminate
|
||
kind=4 related code.
|
||
(OUTPUT_FLOAT_FMT_G): Deleted, functionality moved into FORMAT_FLOAT.
|
||
(FORMAT_FLOAT): Renamed macro from WRITE_FLOAT. Use build_float_string.
|
||
(get_float_string): Renamed from write_float, uses FORMAT_FLOAT macro.
|
||
Buffer allocation removed, now at higher level.
|
||
|
||
2016-05-23 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libgfortran/71123
|
||
* io/list_read (eat_spaces): Eat '\r' as part of spaces.
|
||
|
||
2016-04-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libgfortran/70684
|
||
* io/list_read (check_buffers): Add '\r' to check for end of line.
|
||
|
||
2016-03-30 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
Dominique d'Humieres <dominiq@lps.ens.fr>
|
||
|
||
PR libgfortran/70235
|
||
* io/write_float.def: Fix PF format for negative values of the scale
|
||
factor.
|
||
|
||
2016-03-28 Alessandro Fanfarillo <fanfarillo.gcc@gmail.com>
|
||
|
||
* caf/libcaf.h: caf_stop_numeric and caf_stop_str prototype.
|
||
* caf/single.c: _gfortran_caf_stop_numeric and
|
||
_gfortran_caf_stop_str implementation.
|
||
|
||
2016-02-23 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libgfortran/69456
|
||
* io/list_read.c (read_real): If digit is missing from exponent issue
|
||
an error. (parse_real): Likewise and adjusted error message to clarify
|
||
it is part of a complex number.
|
||
(nml_read_obj): Bump item count and add comment that this is used to
|
||
identify which item in a namelist read has a problem.
|
||
|
||
2016-02-17 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libgfortran/69651
|
||
* io/list_read.c (push_char4): Fix the pointer usage for xrealloc.
|
||
|
||
2016-02-15 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libgfortran/69651
|
||
* io/list_read.c: Entire file trailing spaces removed.
|
||
(CASE_SEPARATORS): Remove '!'.
|
||
(is_separator): Add namelist mode as condition with '!'.
|
||
(push_char): Remove un-needed memset. (push_char4): Likewise and remove
|
||
'new' pointer. (eat_separator): Remove un-needed use of notify_std.
|
||
(read_logical): If '!' bang encountered when not in namelist mode got
|
||
bad_logical to give an error. (read_integer): Likewise reject '!'.
|
||
(read_character): Remove condition testing c = '!' which is now inside
|
||
the is_separator macro. (parse_real): Reject '!' unless in namelist mode.
|
||
(read_complex): Reject '!' unless in namelist mode. (read_real): Likewise
|
||
reject '!'.
|
||
|
||
2016-02-12 Jerry DeLisle <jvdelisle@gcc.gnu.org>
|
||
|
||
PR libgfortran/69668
|
||
* io/list_read.c (read_character): Remove code related to DELIM_NONE.
|
||
|
||
2016-01-23 John David Anglin <danglin@gcc.gnu.org>
|
||
|
||
PR libfortran/68744
|
||
* runtime/backtrace.c: Include gthr.h.
|
||
(show_backtrace): Use __gthread_active_p() to determine whether threads
|
||
are active. Return if lbstate is NULL.
|
||
|
||
2016-01-15 Jakub Jelinek <jakub@redhat.com>
|
||
|
||
* intrinsics/execute_command_line.c (set_cmdstat): Use "%s", msg
|
||
instead of msg to avoid -Wformat-security warning.
|
||
|
||
2016-01-04 Jakub Jelinek <jakub@redhat.com>
|
||
|
||
Update copyright years.
|
||
|
||
Copyright (C) 2016 Free Software Foundation, Inc.
|
||
|
||
Copying and distribution of this file, with or without modification,
|
||
are permitted in any medium without royalty provided the copyright
|
||
notice and this notice are preserved.
|