libgfortran/ChangeLog

   1 2010-08-27  Tobias Burnus  <burnus@net-b.de>
   2
   3         PR fortran/33197
   4         * libgfortran/m4/ifunction.m4 (FINISH_ARRAY_FUNCTION,
   5         ARRAY_FUNCTION): Allow expression after loop.
   6         * libgfortran/m4/norm2.m4: New for _gfortran_norm2_r{4,8,10,16}.
   7         * libgfortran/m4/parity.m4: New for _gfortran_parity_l{1,2,4,8,16}.
   8         * libgfortran/gfortran.map: Add new functions.
   9         * libgfortran/Makefile.am: Ditto.
  10         * libgfortran/m4/minloc1.m4: Add empty argument for ARRAY_FUNCTION.
  11         * libgfortran/m4/maxloc1.m4: Ditto.
  12         * libgfortran/m4/all.m4: Ditto.
  13         * libgfortran/m4/minval.m4: Ditto.
  14         * libgfortran/m4/maxval.m4: Ditto.
  15         * libgfortran/m4/count.m4: Ditto.
  16         * libgfortran/m4/product.m4: Ditto.
  17         * libgfortran/m4/any.m4: Ditto.
  18         * Makefile.in: Regenerated.
  19         * generated/minval_r8.c: Regenerated.
  20         * generated/maxloc1_4_r8.c: Regenerated.
  21         * generated/minloc1_16_r16.c: Regenerated.
  22         * generated/norm2_r4.c: Regenerated.
  23         * generated/sum_i8.c: Regenerated.
  24         * generated/parity_l2.c: Regenerated.
  25         * generated/any_l16.c: Regenerated.
  26         * generated/maxval_i2.c: Regenerated.
  27         * generated/any_l2.c: Regenerated.
  28         * generated/product_r4.c: Regenerated.
  29         * generated/maxloc1_8_i4.c: Regenerated.
  30         * generated/parity_l16.c: Regenerated.
  31         * generated/all_l1.c: Regenerated.
  32         * generated/product_i2.c: Regenerated.
  33         * generated/minloc1_8_r16.c: Regenerated.
  34         * generated/maxloc1_8_r16.c: Regenerated.
  35         * generated/sum_r16.c: Regenerated.
  36         * generated/sum_i1.c: Regenerated.
  37         * generated/minloc1_4_r8.c: Regenerated.
  38         * generated/maxloc1_16_r16.c: Regenerated.
  39         * generated/minloc1_16_i4.c: Regenerated.
  40         * generated/maxloc1_16_i4.c: Regenerated.
  41         * generated/maxval_r16.c: Regenerated.
  42         * generated/product_c10.c: Regenerated.
  43         * generated/minloc1_8_i4.c: Regenerated.
  44         * generated/all_l2.c: Regenerated.
  45         * generated/product_c4.c: Regenerated.
  46         * generated/sum_r4.c: Regenerated.
  47         * generated/all_l16.c: Regenerated.
  48         * generated/minloc1_16_r10.c: Regenerated.
  49         * generated/sum_i2.c: Regenerated.
  50         * generated/maxloc1_8_r8.c: Regenerated.
  51         * generated/minval_i16.c: Regenerated.
  52         * generated/parity_l4.c: Regenerated.
  53         * generated/maxval_i4.c: Regenerated.
  54         * generated/any_l4.c: Regenerated.
  55         * generated/minval_i8.c: Regenerated.
  56         * generated/maxloc1_4_i8.c: Regenerated.
  57         * generated/minloc1_4_i16.c: Regenerated.
  58         * generated/maxloc1_4_i16.c: Regenerated.
  59         * generated/minloc1_8_r10.c: Regenerated.
  60         * generated/product_i4.c: Regenerated.
  61         * generated/maxloc1_8_r10.c: Regenerated.
  62         * generated/sum_c16.c: Regenerated.
  63         * generated/minloc1_16_r8.c: Regenerated.
  64         * generated/maxloc1_16_r8.c: Regenerated.
  65         * generated/count_4_l.c: Regenerated.
  66         * generated/sum_r10.c: Regenerated.
  67         * generated/count_8_l.c: Regenerated.
  68         * generated/sum_c4.c: Regenerated.
  69         * generated/maxloc1_16_r10.c: Regenerated.
  70         * generated/minloc1_8_r8.c: Regenerated.
  71         * generated/maxval_r10.c: Regenerated.
  72         * generated/minval_i1.c: Regenerated.
  73         * generated/maxloc1_4_i1.c: Regenerated.
  74         * generated/minloc1_4_i8.c: Regenerated.
  75         * generated/product_i16.c: Regenerated.
  76         * generated/all_l4.c: Regenerated.
  77         * generated/norm2_r16.c: Regenerated.
  78         * generated/minval_r4.c: Regenerated.
  79         * generated/maxloc1_4_r4.c: Regenerated.
  80         * generated/sum_i4.c: Regenerated.
  81         * generated/maxval_r8.c: Regenerated.
  82         * generated/norm2_r8.c: Regenerated.
  83         * generated/minloc1_4_i1.c: Regenerated.
  84         * generated/minval_r16.c: Regenerated.
  85         * generated/minval_i2.c: Regenerated.
  86         * generated/maxloc1_4_i2.c: Regenerated.
  87         * generated/product_r8.c: Regenerated.
  88         * generated/maxloc1_8_i8.c: Regenerated.
  89         * generated/sum_c10.c: Regenerated.
  90         * generated/minloc1_4_r16.c: Regenerated.
  91         * generated/maxloc1_4_r16.c: Regenerated.
  92         * generated/count_1_l.c: Regenerated.
  93         * generated/minloc1_4_r4.c: Regenerated.
  94         * generated/minloc1_16_i8.c: Regenerated.
  95         * generated/maxloc1_16_i8.c: Regenerated.
  96         * generated/minloc1_4_i2.c: Regenerated.
  97         * generated/maxloc1_8_i1.c: Regenerated.
  98         * generated/minloc1_8_i8.c: Regenerated.
  99         * generated/product_r16.c: Regenerated.
 100         * generated/product_c8.c: Regenerated.
 101         * generated/sum_r8.c: Regenerated.
 102         * generated/norm2_r10.c: Regenerated.
 103         * generated/minloc1_16_i16.c: Regenerated.
 104         * generated/maxloc1_8_r4.c: Regenerated.
 105         * generated/minloc1_16_i1.c: Regenerated.
 106         * generated/maxloc1_16_i1.c: Regenerated.
 107         * generated/minval_r10.c: Regenerated.
 108         * generated/count_16_l.c: Regenerated.
 109         * generated/parity_l8.c: Regenerated.
 110         * generated/minloc1_8_i1.c: Regenerated.
 111         * generated/minval_i4.c: Regenerated.
 112         * generated/maxloc1_4_i4.c: Regenerated.
 113         * generated/maxloc1_8_i2.c: Regenerated.
 114         * generated/maxval_i8.c: Regenerated.
 115         * generated/any_l8.c: Regenerated.
 116         * generated/minloc1_4_r10.c: Regenerated.
 117         * generated/minloc1_8_i16.c: Regenerated.
 118         * generated/maxloc1_4_r10.c: Regenerated.
 119         * generated/maxloc1_8_i16.c: Regenerated.
 120         * generated/minloc1_16_r4.c: Regenerated.
 121         * generated/maxloc1_16_r4.c: Regenerated.
 122         * generated/product_i8.c: Regenerated.
 123         * generated/sum_i16.c: Regenerated.
 124         * generated/count_2_l.c: Regenerated.
 125         * generated/maxloc1_16_i16.c: Regenerated.
 126         * generated/minloc1_8_r4.c: Regenerated.
 127         * generated/sum_c8.c: Regenerated.
 128         * generated/minloc1_16_i2.c: Regenerated.
 129         * generated/maxloc1_16_i2.c: Regenerated.
 130         * generated/parity_l1.c: Regenerated.
 131         * generated/maxval_i16.c: Regenerated.
 132         * generated/maxval_i1.c: Regenerated.
 133         * generated/minloc1_4_i4.c: Regenerated.
 134         * generated/any_l1.c: Regenerated.
 135         * generated/minloc1_8_i2.c: Regenerated.
 136         * generated/product_c16.c: Regenerated.
 137         * generated/product_r10.c: Regenerated.
 138         * generated/product_i1.c: Regenerated.
 139         * generated/all_l8.c: Regenerated.
 140         * generated/maxval_r4.c: Regenerated.
 141
 142 2010-08-26  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
 143
 144         * config/fpu-387.h (has_sse): Remove cw_sse, unused.
 145         Use fixed-length asm.
 146
 147 2010-08-23  Tobias Burnus  <burnus@net-b.de>
 148
 149         PR fortran/45323
 150         * io/write.c (nml_write_obj, namelist_write): Cast argument
 151         of toupper to int.
 152
 153 2010-08-21  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
 154
 155         * configure: Regenerate.
 156
 157 2010-08-19  Tobias Burnus  <burnus@net-b.de>
 158
 159         PR fortran/36158
 160         PR fortran/33197
 161         * m4/bessel.m4: Implement bessel_jn and bessel_yn.
 162         * gfortran.map: Add the generated bessel_jn_r{4,8,10,16}
 163         and bessel_yn_r{4,8,10,16}.
 164         * Makefile.am: Add bessel.m4.
 165         * Makefile.in: Regenerated.
 166         * generated/bessel_r4.c: Generated.
 167         * generated/bessel_r16.c: Generated.
 168         * generated/bessel_r8.c: Generated.
 169         * generated/bessel_r10.c: Generated.
 170
 171 2010-08-19  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 172
 173         PR libfortran/45108
 174         * io/list_read.c (namelist_read): If namelist reading fails, use
 175         generate_error and then continue the read loop.
 176
 177 2010-08-17  Jakub Jelinek  <jakub@redhat.com>
 178
 179         PR fortran/45308
 180         * intrinsics/date_and_time.c (date_and_time): Pass __{zone,time,date}_len
 181         instead of {ZONE,TIME,DATE}_LEN as second argument to fstrcpy.  Drop
 182         asserts.  Adjust comment to the F2003 wording from the F95 wording.
 183
 184 2010-08-14  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 185
 186         PR libfortran/44931
 187         * io/inquire.c (inquire_via_unit): Add special case for __MINGW32__ to
 188         return special file names CONIN$, CONOUT$, and CONERR$.
 189
 190 2010-08-07  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 191
 192         PR libfortran/45143
 193         * io/format.c: Remove fnode storage structure definitions, moving these
 194         to format.h. (parse_format_list): Add check for data descriptors,
 195         taking care of nested formats. Adjust calling parameters to pass a
 196         check flag. (parse_format): Likewise.
 197         * io/format.h: Add structures moved from format.c.
 198
 199 2010-08-02  Janne Blomqvist  <jb@gcc.gnu.org>
 200
 201         * io/unit.c (update_position): Don't update the position flag for
 202         non-seekable files, check for stell() error.
 203
 204 2010-08-01  Janne Blomqvist  <jb@gcc.gnu.org>
 205
 206         * io/unix.c (file_exists): Use access(2) instead of stat(2) to
 207         test file existence.
 208         (fallback_access): Move up in file, implement F_OK.
 209
 210 2010-07-31  David Edelsohn  <edelsohn@gnu.org>
 211
 212         * io/inquire.c: Include io.h before string.h.
 213
 214 2010-07-28  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 215
 216         PR libfortran/44931
 217         * io/inquire.c (inquire_via_unit): Use ttyname to return actual device
 218         file name for stdin, stdout, and stderr.  If ttyname does not succeed
 219         fall back to default names for these units. Include string.h to allow
 220         using strlen function.
 221         * unix.c: Remove typedef of unix_stream structure, move to unix.h.
 222         * unix.h: Add typedef of unix_stream structure so that it is
 223         accessible to inquire.c.
 224
 225 2010-07-19  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 226
 227         PR libfortran/44953
 228         * io/unix.c (mem_alloc_w4): Return gfc_char4_t instead of char type
 229         pointer. (mem_write4): Remove cast to gfc_char4_t.
 230         * io/transfer.c (write_block): Use a gfc_char4_t pointer.
 231         (memset4): New helper function. (next_record_w): Use new helper
 232         function rather than sset for internal units.  Don't attempt to pad
 233         with spaces if it is not needed.
 234         * io/unix.h: Update prototype for mem_alloc_w4.
 235         * io/write.c (memset4): Use gfc_char4_t pointer and chracter type.
 236         Don't use multiply by 4 to compute offset. (memcpy4): Likewise.
 237         (write_default_char4): Use a gfc_char4_t pointer and update memset4
 238         and memcpy calls. (write_a): Likewise. (write_l): Likewise.
 239         (write_boz): Likewise. (write_decimal): Likewise. (write_x): Likewise.
 240         (write_char): Add support for character(kind=4) internal units that
 241         was previously missed. (write_integer): Use a gfc_char4_t pointer and
 242         update memset4 and memcpy calls. (write_character): Likewise.
 243         (write_separator): Add support for character(kind=4) internal units
 244         that was previously missed.
 245         * write_float.def (output_float): Use a gfc_char4_t pointer and
 246         update memset4 and memcpy calls. (write_infnan): Likewise.
 247         (output_float_FMT_G_): Likewise.
 248
 249 2010-07-16  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 250
 251         PR libfortran/37077
 252         * io/read.c (read_default_char4): Add support for reading into a
 253         kind-4 character variable from a character(kind=4) internal unit.
 254         * io/io.h (read_block_form4): Add prototype.
 255         * io/unit.c (get_internal_unit): Add call to fbuf_init.
 256         (free_internal_unit): Add call to fbuf_destroy. (get_unit): Fix
 257         whitespace.
 258         * io/transfer.c (read_sf_internal): Use fbuf_alloc to allocate a string
 259         to recieve the wide characters translated to single byte chracters.
 260         (read_block_form): Fix whitespace. (read_block_form4): New function to
 261         read from a character(kind=4) internal unit into a character(kind=4)
 262         variable. (read_block_direct): Fix whitespace. (write_block): Fix
 263         whitespace. (formatted_transfer_scalar_read): Likewise.
 264         (formatted_transfer_scalar_write): Likewise.
 265         * io/write.c (write_character): Add support for list directed write of
 266         a kind=1 character string to a character(kind=4) internal unit.
 267
 268 2010-07-14  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 269
 270         PR libfortran/44934
 271         * io/file_pos.c (st_endfile): Correctly set unit flags for form.
 272         * io/transfer.c (data_transfer_init): Fix indentation of whitespace.
 273
 274 2010-07-12  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 275
 276         PR libfortran/37077
 277         * io/read.c: Fix comment.
 278         * io/io.h (is_char4_unit): New macro.
 279         * io/unit.c (get_internal_unit): Call new function open_internal4.
 280         * io/unix.c (mem_alloc_r4): New function. (mem_alloc_w4): New function.
 281         (mem_read4): New function, temporary stub. (mem_write4): New function.
 282         (open_internal4): New function to set stream pointers to use the new
 283         mem functions.
 284         * io/transfer.c (write_block): Use new mem_alloc_w4 to access internal
 285         units of kind=4.
 286         * io/unix.h: Add prototypes for open_internal4, mem_alloc_w4, and
 287         mem_alloc_r4.
 288         * io/write.c (memset4): New helper function. (memcpy4): New helper
 289         function. (write_default_char4): Use new helper functions.
 290         (write_a): Likewise. (write_l): Likewise. (write_boz): Likewise.
 291         (write_decimal): Likewise. (write_x): Likewise.
 292         (write_integer): Likewise.
 293         * io/write_float.def (output_float): Add code blocks to handle internal
 294         unit kind=4 output utilizing gfc_char4_t pointers. (write_infnan): Use
 295         new helper functions. (OUTPUT_FLOAT_FMT_G): Update this macro likewise.
 296
 297 2010-07-12  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
 298
 299         * config/fpu-387.h [__sun__ && __svr4__] Include <signal.h>,
 300         <ucontext.h>.
 301         (sigill_caught): New.
 302         (sigill_hdlr): New function
 303         (has_sse) [__sun__ && __svr4__]: Check if SSE instruction causes
 304         SIGILL.
 305
 306 2010-07-11  Kai Tietz  <kai.tietz@onevision.com>
 307
 308         PR libfortran/44698
 309         * io/unix.c (flush_buf): Add _commit for WIN32.
 310
 311 2010-06-28  Tobias Burnus  <burnus@net-b.de>
 312
 313         PR fortran/43298
 314         * list_read.c (parse_real): Do not pass (..) on for NAN(..).
 315         * read.c (convert_real): Fix comment about NAN/INF.
 316
 317 2010-07-02  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
 318
 319         * configure.ac (gfortran_use_symver): Only check for Sun-style symbol
 320         versioning on Solaris 2.
 321         * configure: Regenerate.
 322
 323 2010-07-02  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
 324
 325         * configure.ac: Check for Sun symbol versioning.
 326         * configure: Regenerate.
 327
 328         * Makefile.am [LIBGFOR_USE_SYMVER]: Protect version_arg with
 329         LIBGFOR_USE_SYMVER_GNU.
 330         Add version_dep.
 331         [LIBGFOR_USE_SYMVER_SUN]: Handle Sun symbol versioning.
 332         [!LIBGFOR_USE_SYMVER]: Add version_dep.
 333         (libgfortran_la_DEPENDENCIES): Set to $(version_dep).
 334         * Makefile.in: Regenerate.
 335
 336 2010-06-29  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 337
 338         PR libfortran/43298
 339         * io/read.c: Add code to parse and read Inf, Infinity, NaN, and Nan with
 340         optional parenthesis.
 341
 342 2010-06-28  Tobias Burnus  <burnus@net-b.de>
 343
 344         PR fortran/43298
 345         * list_read.c (parse_real, read_real): Support NAN(alphanum).
 346
 347 2010-06-25  Tobias Burnus  <burnus@net-b.de>
 348
 349         * intrinsics/selected_real_kind.f90
 350         (_gfortran_selected_real_kind2008): Add function.
 351         (_gfortran_selected_real_kind): Stub which calls
 352         _gfortran_selected_real_kind2008.
 353         * gfortran.map (GFORTRAN_1.4): Add
 354         _gfortran_selected_real_kind2008.
 355         * mk-srk-inc.sh: Save also RADIX.
 356
 357 2010-06-25  Tobias Burnus  <burnus@net-b.de>
 358
 359         * runtime/compile_options.c (init_compile_options): Update
 360         compile_options.allow_std for GFC_STD_F2008_OBS.
 361         * io/transfer.c (formatted_transfer_scalar_read,
 362         formatted_transfer_scalar_write): Fix allow_std check.
 363         * io/list_read.c (nml_parse_qualifier): Ditto.
 364
 365 2010-06-18  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 366
 367         PR libfortran/44477
 368         * io/file_pos.c (st_endfile): Add check for ENDFILE when file is
 369         already positioned after the EOF marker. Use find_or_create_unit
 370         instead of find_unit. If unit is not connected, connect it and create
 371         the file with default settings.
 372         * io/transfer.c (data_transfer_init):  Add check for attempted READ or
 373         WRITE when file is already positioned after the EOF marker.
 374
 375 2010-06-10  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
 376
 377         * intrinsics/selected_char_kind.c (selected_char_kind): Fix
 378         return value for ISO_10646.
 379
 380 2010-06-09  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
 381
 382         * mk-kinds-h.sh: Define GFC_REAL_*_LITERAL_SUFFIX and
 383         GFC_REAL_*_LITERAL macros for each kind.
 384         * intrinsics/cpu_time.c (cpu_time_4, cpu_time_8, cpu_time_10,
 385         cpu_time_16): Use them.
 386         * intrinsics/random.c (rnumber_4, rnumber_8, rnumber_10,
 387         rnumber_16): Likewise.
 388
 389 2010-06-09  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
 390
 391         * intrinsics/system_clock.c (system_clock_4, system_clock_8):
 392         Undefine TCK.
 393
 394 2010-06-04  Thomas Koenig  <tkoenig@gcc.gnu.org>
 395
 396         PR libfortran/34670
 397         * intrinsics/date_and_time.c:  Replace assert with runtime_error
 398         when VALUE is too small.
 399
 400 2010-05-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
 401
 402         PR fortran/43851
 403         * runtime/stop.c (stop_string): Make sure nothing is emitted for
 404         blank stop.
 405
 406 2010-05-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
 407
 408         PR fortran/43851
 409         * runtime/stop.c (error_stop_numeric): New function and updated comment.
 410         Add declaration for stop_numeric and remove declaration for stop_string.
 411         (stop_string): Use for blank STOP.
 412         (stop_numeric): Remove use of special -1 stop code.
 413         * runtime/pause.c (do_pause): Use stop_string for blank stop.
 414         (pause_numeric): Remove use of special -1 pause code.
 415         * gfortran.map: Add new symbol to run-time library.
 416         * libgfortran.h: Move declaration for stop_string to here to make
 417         function visible for do_pause. Remove declaration for stop_numeric.
 418
 419 2010-05-08  Janne Blomqvist  <jb@gcc.gnu.org>
 420
 421         * io/unix.h (mem_alloc_r): Fix typo to reduce visibility.
 422
 423 2010-05-07  Janne Blomqvist  <jb@gcc.gnu.org>
 424
 425         * libgfortran.h (free_mem): Remove prototype.
 426         * runtime/memory.c (free_mem): Remove function.
 427         * intrinsics/date_and_time.c (secnds): Replace free_mem() with
 428         free().
 429         * io/fbuf.c (fbuf_destroy): Likewise.
 430         * io/format.c (free_format_hash_table): Likewise.
 431         (save_parsed_format): Likewise.
 432         (free_format_data): Likewise.
 433         * io/list_read.c (free_saved): Likewise.
 434         (free_line): Likewise.
 435         (nml_touch_nodes): Likewise.
 436         (nml_read_obj): Likewise
 437         * io/lock.c (free_ionml): Likewise.
 438         * io/open.c (new_unit): Likewise.
 439         (already_open): Likewise.
 440         * io/unit.c (destroy_unit_mutex): Likewise.
 441         (free_internal_unit): Likewise.
 442         (close_unit_1): Likewise.
 443         * io/unix.c (raw_close): Likewise.
 444         (buf_close): Likewise.
 445         (mem_close): Likewise.
 446         (tempfile): Likewise.
 447         * io/write.c (nml_write_obj): Likewise.
 448         * io/write_float.def (output_float_FMT_G_##): Likewise.
 449         * runtime/error.c (show_locus): Likewise.
 450
 451 2010-05-04  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
 452
 453         PR other/43620
 454         * configure.ac (AM_INIT_AUTOMAKE): Add no-dist.
 455         * configure: Regenerate.
 456         * Makefile.in: Regenerate.
 457
 458 2010-04-30  Kai Tietz  <kai.tietz@onevision.com>
 459
 460         PR/43844
 461         * io/unix.c (raw_truncate): Explicit cast from integer-scalar
 462         to pointer.
 463         (tempfile): Use for mingw GetTempPath and avoid double slash
 464         for path.
 465
 466 2010-04-24  Kai Tietz  <kai.tietz@onevision.com>
 467
 468         PR/43844
 469         * io/unix.c (tempfile): Correct logic for mktemp case.
 470
 471 2010-04-06  Tobias Burnus  <burnus@net-b.de>
 472
 473         PR fortran/39997
 474         * runtime/stop.c (error_stop_string): New function.
 475         * gfortran.map (_gfortran_error_stop_string): Add.
 476
 477 2010-04-02  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
 478
 479         * Makefile.in: Regenerate.
 480         * aclocal.m4: Regenerate.
 481
 482 2010-04-01  Janne Blomqvist  <jb@gcc.gnu.org>
 483
 484         PR libfortran/43605
 485         * io/intrinsics.c (gf_ftell): New function, seek to correct offset.
 486         (ftell): Call gf_ftell.
 487         (FTELL_SUB): Likewise.
 488
 489 2010-04-01  Paul Thomas  <pault@gcc.gnu.org>
 490
 491         * io/transfer.c : Update copyright.
 492         * io/unix.c : ditto
 493         * io/read.c : ditto
 494         * io/io.h : ditto
 495         * io/unix.h : ditto
 496         * io/inquire.c : ditto
 497         * io/format.c : ditto
 498         * io/list_read.c : ditto
 499         * runtime/error.c : ditto
 500         * libgfortran.h : ditto
 501         * intrinsics/date_and_time.c: ditto
 502         * intrinsics/args.c : ditto
 503
 504 2010-04-01  Janne Blomqvist  <jb@gcc.gnu.org>
 505
 506         PR libfortran/43605
 507         * io/intrinsics.c (ftell): Reset fbuf, correct offset.
 508         (FTELL_SUB): Likewise.
 509
 510 2010-03-29  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 511
 512         PR libfortran/43265
 513         * io/transfer.c (next_record_r): Only call hit_eof for specific
 514         conditions when an EOF is encountered.
 515
 516 2010-03-29  Tobias Burnus  <burnus@net-b.de>
 517
 518         PR fortran/43551
 519         * io/unix.c (buf_write): Set physical_offset after lseek.
 520
 521 2010-03-25  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 522
 523         PR libfortran/43517
 524         * io/read.c (read_x): Return if seen EOR condition.
 525
 526 2010-03-21  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 527
 528         PR fortran/43409
 529         * io/io.h: Fix type of size in st_parameter_inquire structure.
 530
 531 2010-03-20  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 532
 533         PR fortran/43409
 534         * io/unix.h: Add prototype for new function to return file size.
 535         * io/unix.c (file_size): New function.
 536         * io/inquire.c (inquire_via_unit): Use new function.
 537         (inquire_via_filename): Use new function.
 538
 539 2010-03-17  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 540
 541         * io/transfer.c (read_sf_internal): Remove stray function declaration
 542         used during debugging.
 543
 544 2010-03-17  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 545
 546         PR libfortran/43265
 547         * io/io.h: Delete prototype for read_sf, making it static.
 548         * io/read.c (read_x): Modify to call hit_eof if PAD="no".
 549         * io/transfer.c (read_sf_internal): New static function extracted from
 550         read_sf for use on internal units only. Handle empty string case.
 551         (read_sf): New factoring of this function, make it static.  Add special
 552         conditions for EOF based on ADVANCE="no", PAD="no", and whether any
 553         bytes have been previously read from the record.
 554         (read_block_form): Modify to call read_sf or read_sf_internal.
 555         (next_record_r): Add a done flag similar to next_record_w. Call hit_eof
 556         if internal array unit next record returns finished, meaning an EOF was
 557         found and not done, ie not the last record expected.  For external
 558         units call hit_eof if item_count is 1 or there are no pending spaces.
 559         (next_record): Update call to next_record_r.
 560
 561 2010-03-12  Kai Tietz  <kai.tietz@onevision.com>
 562
 563         PR/42950
 564         * io/format.c (parse_format_list): Add to ERROR, WARNING,
 565         SILENT enumerators NOTIFICATION_ prefix.
 566         * runtime/error.c (notification_std): Likewise.
 567         * libgfortran.h (notification): Likewise.
 568         (GFC_LARGEST_BUF): Check for HAVE_GFC_INTEGER_16.
 569
 570 2010-03-11  Tobias Burnus  <burnus@net-b.de>
 571
 572         PR fortran/43228
 573         * io/list_read.c (nml_parse_qualifier): Disable expanded_read
 574         for array sections.
 575
 576 2010-03-10  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 577
 578         PR libfortran/43320
 579         * io/transfer.c (next_record_r): Add hit_eof based on item_count
 580         condition.
 581
 582 2010-03-09  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 583
 584         PR libfortran/43265
 585         * io/read.c: Include fbuf.h and unix.h to enable lower level I/O for
 586         read_x. (read_x): Replace the use of read_sf with equivalent lower level
 587         I/O, eliminating unneeded code and handling EOF and EOR conditions.
 588         * io/io.h: Revise prototype for read_sf.
 589         * io/transfer.c (read_sf): Delete no_error parameter and all uses of it.
 590         (read_block_form): Likewise.
 591         (next_record_r): Delete wrong code call to hit_eof.
 592
 593 2010-03-08  Kai TIetz  <kai.tietz@onevision.com>
 594
 595         PR/42950
 596         * libgfortran.h (_POSIX): Define if __MINGW32__ is defined.
 597         (gfc_printf): Define to gnu_printf for __MINGW32__ case,
 598         otherwise to __printf__.
 599         (gfc_strtof,gfc_strtod,gfc_strtold): Define for mingw case
 600         to POSIX compatible converter functions.
 601         (runtime_error): Use instead gfc_printf as formatter
 602         attribute name.
 603         (runtime_error_at): Likewise.
 604         (runtime_warning_at): Likewise.
 605         (st_printf): Likewise.
 606         * intrinsics/date_and_time.c (localtime_r): Undefine
 607         possible defined macro.
 608         (gmtime_r): Likewise.
 609         * io/read.c (convert_real): Use gfc_strtof, gfc_strtod,
 610         and gfc_strtold.
 611
 612 2010-02-24  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 613
 614         PR libfortran/43155
 615         * io/transfer.c (require_type): Subtract one from item_count for output
 616         of error message.  Add comment before formatted_transfer function
 617         explaining why the item_count is off by one.
 618
 619 2010-02-24  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
 620
 621         * io/write_float.def (WRITE_FLOAT): Use __builtin_signbit.
 622
 623 2010-02-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 624
 625         * io/list_read.c (list_formatted_read_scalar): Remove duplicate code.
 626
 627 2010-02-09  Tobias Burnus  <burnus@net-b.de>
 628
 629         PR fortran/42996
 630         * intrinsics/args.c (get_command_argument_i4): Always return
 631         commandline-argument length for length parameter.
 632
 633 2010-02-06  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 634
 635         PR libfortran/42742
 636         * io/format.c (reset_fnode_counters): Use the correct pointer to the
 637         head of the fnode list. (parse_format): Remove previous hack that set
 638         limit on size of format string for caching.
 639
 640 2010-02-06  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 641
 642         PR libfortran
 643         * io/transfer.c (read_sf): Handle EOR and EOF conditions for
 644         ADVANCE="no" with PAD="yes" or PAD="no".
 645
 646 2010-02-03  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 647
 648         PR libfortran/42901
 649         * io/list_read.c (nml_get_obj_data): Add new qualifier flag, clean up
 650         code, and adjust logic to set namelist info pointer correctly for array
 651         qualifiers of derived type components.
 652
 653 2010-01-15  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 654
 655         PR libfortran/42742
 656         * io/format.c (parse_format): Set limit on size of format strings that
 657         will be cached.
 658
 659 2010-01-05  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
 660
 661         * configure: Regenerate.
 662
 663 2010-01-03  Janne Blomqvist  <jb@gcc.gnu.org>
 664
 665         PR libfortran/42420
 666         * io/unix.c: Defines for MINGW stat and fstat.
 667         (gfstat_t): New typedef.
 668         (id_from_fd): Use gfstat_t instead of struct stat.
 669         (fd_to_stream): Likewise.
 670         (compare_file_filename): Likewise.
 671         (find_file): Likewise.
 672         (file_exists): Likewise.
 673         (inquire_sequential): Likewise.
 674         (inquire_direct): Likewise.
 675         (inquire_formatted): Likewise.
 676
 677 \f
 678 Copyright (C) 2010 Free Software Foundation, Inc.
 679
 680 Copying and distribution of this file, with or without modification,
 681 are permitted in any medium without royalty provided the copyright
 682 notice and this notice are preserved.