libgfortran/ChangeLog

   1 2010-07-14  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
   2
   3         PR libfortran/44934
   4         * io/file_pos.c (st_endfile): Correctly set unit flags for form.
   5         * io/transfer.c (data_transfer_init): Fix indentation of whitespace.
   6
   7 2010-07-12  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
   8
   9         PR libfortran/37077
  10         * io/read.c: Fix comment.
  11         * io/io.h (is_char4_unit): New macro.
  12         * io/unit.c (get_internal_unit): Call new function open_internal4.
  13         * io/unix.c (mem_alloc_r4): New function. (mem_alloc_w4): New function.
  14         (mem_read4): New function, temporary stub. (mem_write4): New function.
  15         (open_internal4): New function to set stream pointers to use the new
  16         mem functions.
  17         * io/transfer.c (write_block): Use new mem_alloc_w4 to access internal
  18         units of kind=4.
  19         * io/unix.h: Add prototypes for open_internal4, mem_alloc_w4, and
  20         mem_alloc_r4.
  21         * io/write.c (memset4): New helper function. (memcpy4): New helper
  22         function. (write_default_char4): Use new helper functions.
  23         (write_a): Likewise. (write_l): Likewise. (write_boz): Likewise.
  24         (write_decimal): Likewise. (write_x): Likewise.
  25         (write_integer): Likewise.
  26         * io/write_float.def (output_float): Add code blocks to handle internal
  27         unit kind=4 output utilizing gfc_char4_t pointers. (write_infnan): Use
  28         new helper functions. (OUTPUT_FLOAT_FMT_G): Update this macro likewise.
  29
  30 2010-07-12  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
  31
  32         * config/fpu-387.h [__sun__ && __svr4__] Include <signal.h>,
  33         <ucontext.h>.
  34         (sigill_caught): New.
  35         (sigill_hdlr): New function
  36         (has_sse) [__sun__ && __svr4__]: Check if SSE instruction causes
  37         SIGILL.
  38
  39 2010-07-11  Kai Tietz  <kai.tietz@onevision.com>
  40
  41         PR libfortran/44698
  42         * io/unix.c (flush_buf): Add _commit for WIN32.
  43
  44 2010-06-28  Tobias Burnus  <burnus@net-b.de>
  45
  46         PR fortran/43298
  47         * list_read.c (parse_real): Do not pass (..) on for NAN(..).
  48         * read.c (convert_real): Fix comment about NAN/INF.
  49
  50 2010-07-02  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
  51
  52         * configure.ac (gfortran_use_symver): Only check for Sun-style symbol
  53         versioning on Solaris 2.
  54         * configure: Regenerate.
  55
  56 2010-07-02  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
  57
  58         * configure.ac: Check for Sun symbol versioning.
  59         * configure: Regenerate.
  60
  61         * Makefile.am [LIBGFOR_USE_SYMVER]: Protect version_arg with
  62         LIBGFOR_USE_SYMVER_GNU.
  63         Add version_dep.
  64         [LIBGFOR_USE_SYMVER_SUN]: Handle Sun symbol versioning.
  65         [!LIBGFOR_USE_SYMVER]: Add version_dep.
  66         (libgfortran_la_DEPENDENCIES): Set to $(version_dep).
  67         * Makefile.in: Regenerate.
  68
  69 2010-06-29  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
  70
  71         PR libfortran/43298
  72         * io/read.c: Add code to parse and read Inf, Infinity, NaN, and Nan with
  73         optional parenthesis.
  74
  75 2010-06-28  Tobias Burnus  <burnus@net-b.de>
  76
  77         PR fortran/43298
  78         * list_read.c (parse_real, read_real): Support NAN(alphanum).
  79
  80 2010-06-25  Tobias Burnus  <burnus@net-b.de>
  81
  82         * intrinsics/selected_real_kind.f90
  83         (_gfortran_selected_real_kind2008): Add function.
  84         (_gfortran_selected_real_kind): Stub which calls
  85         _gfortran_selected_real_kind2008.
  86         * gfortran.map (GFORTRAN_1.4): Add
  87         _gfortran_selected_real_kind2008.
  88         * mk-srk-inc.sh: Save also RADIX.
  89
  90 2010-06-25  Tobias Burnus  <burnus@net-b.de>
  91
  92         * runtime/compile_options.c (init_compile_options): Update
  93         compile_options.allow_std for GFC_STD_F2008_OBS.
  94         * io/transfer.c (formatted_transfer_scalar_read,
  95         formatted_transfer_scalar_write): Fix allow_std check.
  96         * io/list_read.c (nml_parse_qualifier): Ditto.
  97
  98 2010-06-18  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
  99
 100         PR libfortran/44477
 101         * io/file_pos.c (st_endfile): Add check for ENDFILE when file is
 102         already positioned after the EOF marker. Use find_or_create_unit
 103         instead of find_unit. If unit is not connected, connect it and create
 104         the file with default settings.
 105         * io/transfer.c (data_transfer_init):  Add check for attempted READ or
 106         WRITE when file is already positioned after the EOF marker.
 107
 108 2010-06-10  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
 109
 110         * intrinsics/selected_char_kind.c (selected_char_kind): Fix
 111         return value for ISO_10646.
 112
 113 2010-06-09  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
 114
 115         * mk-kinds-h.sh: Define GFC_REAL_*_LITERAL_SUFFIX and
 116         GFC_REAL_*_LITERAL macros for each kind.
 117         * intrinsics/cpu_time.c (cpu_time_4, cpu_time_8, cpu_time_10,
 118         cpu_time_16): Use them.
 119         * intrinsics/random.c (rnumber_4, rnumber_8, rnumber_10,
 120         rnumber_16): Likewise.
 121
 122 2010-06-09  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
 123
 124         * intrinsics/system_clock.c (system_clock_4, system_clock_8):
 125         Undefine TCK.
 126
 127 2010-06-04  Thomas Koenig  <tkoenig@gcc.gnu.org>
 128
 129         PR libfortran/34670
 130         * intrinsics/date_and_time.c:  Replace assert with runtime_error
 131         when VALUE is too small.
 132
 133 2010-05-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
 134
 135         PR fortran/43851
 136         * runtime/stop.c (stop_string): Make sure nothing is emitted for
 137         blank stop.
 138
 139 2010-05-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
 140
 141         PR fortran/43851
 142         * runtime/stop.c (error_stop_numeric): New function and updated comment.
 143         Add declaration for stop_numeric and remove declaration for stop_string.
 144         (stop_string): Use for blank STOP.
 145         (stop_numeric): Remove use of special -1 stop code.
 146         * runtime/pause.c (do_pause): Use stop_string for blank stop.
 147         (pause_numeric): Remove use of special -1 pause code.
 148         * gfortran.map: Add new symbol to run-time library.
 149         * libgfortran.h: Move declaration for stop_string to here to make
 150         function visible for do_pause. Remove declaration for stop_numeric.
 151
 152 2010-05-08  Janne Blomqvist  <jb@gcc.gnu.org>
 153
 154         * io/unix.h (mem_alloc_r): Fix typo to reduce visibility.
 155
 156 2010-05-07  Janne Blomqvist  <jb@gcc.gnu.org>
 157
 158         * libgfortran.h (free_mem): Remove prototype.
 159         * runtime/memory.c (free_mem): Remove function.
 160         * intrinsics/date_and_time.c (secnds): Replace free_mem() with
 161         free().
 162         * io/fbuf.c (fbuf_destroy): Likewise.
 163         * io/format.c (free_format_hash_table): Likewise.
 164         (save_parsed_format): Likewise.
 165         (free_format_data): Likewise.
 166         * io/list_read.c (free_saved): Likewise.
 167         (free_line): Likewise.
 168         (nml_touch_nodes): Likewise.
 169         (nml_read_obj): Likewise
 170         * io/lock.c (free_ionml): Likewise.
 171         * io/open.c (new_unit): Likewise.
 172         (already_open): Likewise.
 173         * io/unit.c (destroy_unit_mutex): Likewise.
 174         (free_internal_unit): Likewise.
 175         (close_unit_1): Likewise.
 176         * io/unix.c (raw_close): Likewise.
 177         (buf_close): Likewise.
 178         (mem_close): Likewise.
 179         (tempfile): Likewise.
 180         * io/write.c (nml_write_obj): Likewise.
 181         * io/write_float.def (output_float_FMT_G_##): Likewise.
 182         * runtime/error.c (show_locus): Likewise.
 183
 184 2010-05-04  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
 185
 186         PR other/43620
 187         * configure.ac (AM_INIT_AUTOMAKE): Add no-dist.
 188         * configure: Regenerate.
 189         * Makefile.in: Regenerate.
 190
 191 2010-04-30  Kai Tietz  <kai.tietz@onevision.com>
 192
 193         PR/43844
 194         * io/unix.c (raw_truncate): Explicit cast from integer-scalar
 195         to pointer.
 196         (tempfile): Use for mingw GetTempPath and avoid double slash
 197         for path.
 198
 199 2010-04-24  Kai Tietz  <kai.tietz@onevision.com>
 200
 201         PR/43844
 202         * io/unix.c (tempfile): Correct logic for mktemp case.
 203
 204 2010-04-06  Tobias Burnus  <burnus@net-b.de>
 205
 206         PR fortran/39997
 207         * runtime/stop.c (error_stop_string): New function.
 208         * gfortran.map (_gfortran_error_stop_string): Add.
 209
 210 2010-04-02  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
 211
 212         * Makefile.in: Regenerate.
 213         * aclocal.m4: Regenerate.
 214
 215 2010-04-01  Janne Blomqvist  <jb@gcc.gnu.org>
 216
 217         PR libfortran/43605
 218         * io/intrinsics.c (gf_ftell): New function, seek to correct offset.
 219         (ftell): Call gf_ftell.
 220         (FTELL_SUB): Likewise.
 221
 222 2010-04-01  Paul Thomas  <pault@gcc.gnu.org>
 223
 224         * io/transfer.c : Update copyright.
 225         * io/unix.c : ditto
 226         * io/read.c : ditto
 227         * io/io.h : ditto
 228         * io/unix.h : ditto
 229         * io/inquire.c : ditto
 230         * io/format.c : ditto
 231         * io/list_read.c : ditto
 232         * runtime/error.c : ditto
 233         * libgfortran.h : ditto
 234         * intrinsics/date_and_time.c: ditto
 235         * intrinsics/args.c : ditto
 236
 237 2010-04-01  Janne Blomqvist  <jb@gcc.gnu.org>
 238
 239         PR libfortran/43605
 240         * io/intrinsics.c (ftell): Reset fbuf, correct offset.
 241         (FTELL_SUB): Likewise.
 242
 243 2010-03-29  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 244
 245         PR libfortran/43265
 246         * io/transfer.c (next_record_r): Only call hit_eof for specific
 247         conditions when an EOF is encountered.
 248
 249 2010-03-29  Tobias Burnus  <burnus@net-b.de>
 250
 251         PR fortran/43551
 252         * io/unix.c (buf_write): Set physical_offset after lseek.
 253
 254 2010-03-25  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 255
 256         PR libfortran/43517
 257         * io/read.c (read_x): Return if seen EOR condition.
 258
 259 2010-03-21  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 260
 261         PR fortran/43409
 262         * io/io.h: Fix type of size in st_parameter_inquire structure.
 263
 264 2010-03-20  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 265
 266         PR fortran/43409
 267         * io/unix.h: Add prototype for new function to return file size.
 268         * io/unix.c (file_size): New function.
 269         * io/inquire.c (inquire_via_unit): Use new function.
 270         (inquire_via_filename): Use new function.
 271
 272 2010-03-17  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 273
 274         * io/transfer.c (read_sf_internal): Remove stray function declaration
 275         used during debugging.
 276
 277 2010-03-17  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 278
 279         PR libfortran/43265
 280         * io/io.h: Delete prototype for read_sf, making it static.
 281         * io/read.c (read_x): Modify to call hit_eof if PAD="no".
 282         * io/transfer.c (read_sf_internal): New static function extracted from
 283         read_sf for use on internal units only. Handle empty string case.
 284         (read_sf): New factoring of this function, make it static.  Add special
 285         conditions for EOF based on ADVANCE="no", PAD="no", and whether any
 286         bytes have been previously read from the record.
 287         (read_block_form): Modify to call read_sf or read_sf_internal.
 288         (next_record_r): Add a done flag similar to next_record_w. Call hit_eof
 289         if internal array unit next record returns finished, meaning an EOF was
 290         found and not done, ie not the last record expected.  For external
 291         units call hit_eof if item_count is 1 or there are no pending spaces.
 292         (next_record): Update call to next_record_r.
 293
 294 2010-03-12  Kai Tietz  <kai.tietz@onevision.com>
 295
 296         PR/42950
 297         * io/format.c (parse_format_list): Add to ERROR, WARNING,
 298         SILENT enumerators NOTIFICATION_ prefix.
 299         * runtime/error.c (notification_std): Likewise.
 300         * libgfortran.h (notification): Likewise.
 301         (GFC_LARGEST_BUF): Check for HAVE_GFC_INTEGER_16.
 302
 303 2010-03-11  Tobias Burnus  <burnus@net-b.de>
 304
 305         PR fortran/43228
 306         * io/list_read.c (nml_parse_qualifier): Disable expanded_read
 307         for array sections.
 308
 309 2010-03-10  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 310
 311         PR libfortran/43320
 312         * io/transfer.c (next_record_r): Add hit_eof based on item_count
 313         condition.
 314
 315 2010-03-09  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 316
 317         PR libfortran/43265
 318         * io/read.c: Include fbuf.h and unix.h to enable lower level I/O for
 319         read_x. (read_x): Replace the use of read_sf with equivalent lower level
 320         I/O, eliminating unneeded code and handling EOF and EOR conditions.
 321         * io/io.h: Revise prototype for read_sf.
 322         * io/transfer.c (read_sf): Delete no_error parameter and all uses of it.
 323         (read_block_form): Likewise.
 324         (next_record_r): Delete wrong code call to hit_eof.
 325
 326 2010-03-08  Kai TIetz  <kai.tietz@onevision.com>
 327
 328         PR/42950
 329         * libgfortran.h (_POSIX): Define if __MINGW32__ is defined.
 330         (gfc_printf): Define to gnu_printf for __MINGW32__ case,
 331         otherwise to __printf__.
 332         (gfc_strtof,gfc_strtod,gfc_strtold): Define for mingw case
 333         to POSIX compatible converter functions.
 334         (runtime_error): Use instead gfc_printf as formatter
 335         attribute name.
 336         (runtime_error_at): Likewise.
 337         (runtime_warning_at): Likewise.
 338         (st_printf): Likewise.
 339         * intrinsics/date_and_time.c (localtime_r): Undefine
 340         possible defined macro.
 341         (gmtime_r): Likewise.
 342         * io/read.c (convert_real): Use gfc_strtof, gfc_strtod,
 343         and gfc_strtold.
 344
 345 2010-02-24  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 346
 347         PR libfortran/43155
 348         * io/transfer.c (require_type): Subtract one from item_count for output
 349         of error message.  Add comment before formatted_transfer function
 350         explaining why the item_count is off by one.
 351
 352 2010-02-24  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
 353
 354         * io/write_float.def (WRITE_FLOAT): Use __builtin_signbit.
 355
 356 2010-02-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 357
 358         * io/list_read.c (list_formatted_read_scalar): Remove duplicate code.
 359
 360 2010-02-09  Tobias Burnus  <burnus@net-b.de>
 361
 362         PR fortran/42996
 363         * intrinsics/args.c (get_command_argument_i4): Always return
 364         commandline-argument length for length parameter.
 365
 366 2010-02-06  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 367
 368         PR libfortran/42742
 369         * io/format.c (reset_fnode_counters): Use the correct pointer to the
 370         head of the fnode list. (parse_format): Remove previous hack that set
 371         limit on size of format string for caching.
 372
 373 2010-02-06  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 374
 375         PR libfortran
 376         * io/transfer.c (read_sf): Handle EOR and EOF conditions for
 377         ADVANCE="no" with PAD="yes" or PAD="no".
 378
 379 2010-02-03  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 380
 381         PR libfortran/42901
 382         * io/list_read.c (nml_get_obj_data): Add new qualifier flag, clean up
 383         code, and adjust logic to set namelist info pointer correctly for array
 384         qualifiers of derived type components.
 385
 386 2010-01-15  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 387
 388         PR libfortran/42742
 389         * io/format.c (parse_format): Set limit on size of format strings that
 390         will be cached.
 391
 392 2010-01-05  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
 393
 394         * configure: Regenerate.
 395
 396 2010-01-03  Janne Blomqvist  <jb@gcc.gnu.org>
 397
 398         PR libfortran/42420
 399         * io/unix.c: Defines for MINGW stat and fstat.
 400         (gfstat_t): New typedef.
 401         (id_from_fd): Use gfstat_t instead of struct stat.
 402         (fd_to_stream): Likewise.
 403         (compare_file_filename): Likewise.
 404         (find_file): Likewise.
 405         (file_exists): Likewise.
 406         (inquire_sequential): Likewise.
 407         (inquire_direct): Likewise.
 408         (inquire_formatted): Likewise.
 409
 410 \f
 411 Copyright (C) 2010 Free Software Foundation, Inc.
 412
 413 Copying and distribution of this file, with or without modification,
 414 are permitted in any medium without royalty provided the copyright
 415 notice and this notice are preserved.