1 2010-12-10 Tobias Burnus <burnus (a] net-b.de> 2 3 PR fortran/46540 4 * acinclude.m4 (LIBGFOR_CHECK_FLOAT128): Honour 5 --disable-libquadmath-support. 6 * configure.ac: Handle --disable-libquadmath-support. 7 * configure: Regenerate. 8 9 2010-12-06 Dave Korn <dave.korn.cygwin (a] gmail.com> 10 11 PR target/40125 12 PR lto/46695 13 * configure.ac: Invoke ACX_LT_HOST_FLAGS. 14 * Makefile.am (LTLDFLAGS): Use lt_host_flags. 15 * aclocal.m4: Regenerate. 16 * configure: Regenerate. 17 * Makefile.in: Regenerate. 18 19 2010-11-16 Francois-Xavier Coudert <fxcoudert (a] gcc.gnu.org> 20 Tobias Burnus <burnus (a] net-b.de> 21 22 PR fortran/32049 23 * Makefile.am: Add missing pow_r16_i4.c, add transfer128.c, 24 link libquadmath, if used. 25 * acinclude.m4 (LIBGFOR_CHECK_FLOAT128): Add. 26 * configure.ac: Use it, touch spec file. 27 * gfortran.map: Add pow_r16_i4 and 28 transfer_(real,complex)128(,write) functions. 29 * intrinsics/cshift0.c (cshift0): Handle __float128 type. 30 * intrinsics/erfc_scaled_inc.c: Ditto. 31 * intrinsics/pack_generic.c (pack): Ditto 32 * intrinsics/spread_generic.c (spread): Ditto. 33 * intrinsics/unpack_generic.c (unpack1): Ditto. 34 * io/read.c (convert_real): Ditto. 35 * io/transfer.c: Update comments. 36 * io/transfer128.c: New file. 37 * io/write_float.def (write_float): Handle __float128 type. 38 * libgfortran.h: #include quadmath_weak.h, define __builtin_infq 39 and nanq. 40 * m4/mtype.m4: Handle __float128 type. 41 * runtime/in_pack_generic.c (internal_pack): Ditto. 42 * runtime/in_unpack_generic.c (internal_unpack): Ditto. 43 * kinds-override.h: New file. 44 * libgfortran.spec.in: Ditto. 45 * generated/pow_r16_i4.c: Generated. 46 * Makefile.in: Regenerate. 47 * configure: Regenerate. 48 * config.h: Regenerate. 49 * bessel_r10.c: Regenerate. 50 * bessel_r16.c: Regenerate. 51 * bessel_r4.c: Regenerate. 52 * bessel_r8.c: Regenerate. 53 * exponent_r16.c: Regenerate. 54 * fraction_r16.c: Regenerate. 55 * nearest_r16.c: Regenerate. 56 * norm2_r10.c: Regenerate. 57 * norm2_r16.c: Regenerate. 58 * norm2_r4.c: Regenerate. 59 * norm2_r8.c: Regenerate. 60 * rrspacing_r16.c: Regenerate. 61 * set_exponent_r16.c: Regenerate. 62 * spacing_r16.c: Regenerate. 63 64 2010-11-09 Janne Blomqvist <jb (a] gcc.gnu.org> 65 66 * io/unix.c (struct unix_stream): Add st_dev and st_ino members. 67 (fd_to_stream): Avoid unnecessary lseek() call, test isatty() 68 last. Make a token effort to support block devices. 69 (compare_file_filename): Use cached stat values. 70 (find_file0): Likewise. 71 (find_file): Likewise. 72 73 2010-11-09 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 74 75 PR libgfortran/46373 76 * io/transfer.c (data_transfer_init): Do not call flush_if_preconnected 77 if this is an internal unit. 78 79 2010-11-04 Janne Blomqvist <jb (a] gcc.gnu.org> 80 81 PR libfortran/44931 82 * io/inquire.c (inquire_via_unit): Use stream_ttyname() instead of 83 calling ttyname() directly. 84 * io/unix.h (unix_stream): Move struct to unix.c. 85 * io/unix.c: Move struct unix_stream here. 86 (stream_ttyname): Don't mark the argument as unused if it is used. 87 88 2010-11-04 Janne Blomqvist <jb (a] gcc.gnu.org> 89 90 * io/unix.h (struct unix_stream): Remove prot member. 91 * io/unix.c: Remove PROT_READ and PROT_WRITE constants. 92 (fd_to_stream): Remove prot from argument list, don't set prot. 93 (open_external): Don't set prot flag. 94 (input_stream): Remove prot from argument list. 95 (output_stream): Likewise. 96 (error_stream): Likewise. 97 98 2010-11-03 Janne Blomqvist <jb (a] gcc.gnu.org> 99 100 * io/unix.h: Remove empty_internal_buffer prototype. 101 * io/unix.c (empty_internal_buffer): Remove unused function. 102 103 2010-11-03 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 104 105 PR libgfortran/43899 106 * runtime/error.c (generate_warning): New function to generate a run 107 time warning message. Fix some whitespace. 108 * libgfortran.h: Add prototype for new function. 109 * io/list_read.c (nml_read_obj): Use new function to warn when a 110 character namelist object is truncated. Only warn if compiled 111 with -fbounds-check. 112 113 2010-11-02 Janne Blomqvist <jb (a] gcc.gnu.org> 114 115 PR libfortran/45629 116 * io/io.h: Remove setjmp.h include. 117 (st_parameter_dt): Change last_char to int, remove eof_jump. 118 * io/list_read.c (next_char): Return EOF instead of jumping. 119 (unget_char): Use int to be able to handle EOF. 120 (eat_spaces): Handle EOF return from next_char. 121 (eat_line): Likewise. 122 (eat_separator): Handle EOF return from next_char, eat_spaces, 123 eat_line. 124 (finish_separator): Likewise. 125 (convert_integer): Likewise. 126 (read_logical): Likewise. 127 (read_integer): Likewise. 128 (read_character): Likewise. 129 (parse_real): Likewise. 130 (read_complex): Likewise. 131 (read_real): Likewise. 132 (list_formatted_read_scalar): Likewise. 133 (list_formatted_read): Likewise. 134 (finish_list_read): Likewise. 135 (nml_parse_qualifier): Likewise. 136 (nml_match_name): Likewise. 137 (nml_get_obj_data): Likewise. 138 (namelist_read): Likewise. 139 * io/transfer.c (data_transfer_init): Initialize last_char. 140 (finalize_transfer): Remove jmp_buf setup. 141 142 2010-10-26 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 143 144 PR libgfortran/46010 145 * io/list_read.c (nml_parse_qualifier): Add additional conditions for 146 setting the end index for loop specification. Fix some whitespace. 147 * io/write.c (write_default_char4): Const-ify the source argument. 148 149 2010-10-21 Thomas Koenig <tkoenig (a] gcc.gnu.org> 150 151 PR fortran/46007 152 * m4/shape.m4 (shape_'rtype_kind`): Use variable for rank. 153 Allocate return array if unallocated. 154 * generated/shape_i4.c: Regenerated. 155 * generated/shape_i8.c: Regenerated. 156 * generated/shape_i16.c: Regenerated. 157 158 2010-10-20 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 159 160 PR libgfortran/46079 161 * runtime/stop.c (stop_numeric_f08): New function. 162 (stop_numeric): Restore to previous behavior. 163 * gfortran.map: Add symbol _gfortran_stop_numeric_f08. 164 165 2010-10-18 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 166 167 * io/io.h: Remove definition of the BT enumerator. 168 * libgfortran.h: Replace GFC_DTYPE enumerator with BT. 169 * intrinsics/iso_c_generated_procs.c: Likewise 170 * intrinsics/date_and_time.c: Likewise. 171 * intrinsics/iso_c_binding.c: Likewise. 172 * io/list_read.c: Likewise. 173 * io/transfer.c: Likewise. 174 * io/write.c: Likewise. 175 176 2010-10-16 Thomas Koenig <tkoenig (a] gcc.gnu.org> 177 178 PR fortran/20165 179 PR fortran/31593 180 PR fortran/43665 181 * gfortran.map: Add _gfortran_transfer_array_write, 182 _gfortran_transfer_array_write, _gfortran_transfer_character_write, 183 _gfortran_transfer_character_wide_write, 184 _gfortran_transfer_complex_write, 185 _gfortran_transfer_integer_write, 186 _gfortran_transfer_logical_write and 187 _gfortran_transfer_real_write. 188 * io/transfer.c (transfer_integer_write): Add prototype and 189 function body as call to the original function, without the 190 _write. 191 (transfer_real_write): Likewise. 192 (transfer_logical_write): Likewise. 193 (transfer_character_write): Likewise. 194 (transfer_character_wide_write): Likewise. 195 (transfer_complex_write): Likewise. 196 (transfer_array_write): Likewise. 197 198 2010-09-22 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 199 200 PR libfortran/45710 201 * io/write.c (namelist_write_newline): Pad character array internal 202 unit records with spaces. 203 204 2010-09-21 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 205 206 PR libfortran/45723 207 * io/open.c (new_unit): On POSITION_APPEND don't seek if file length is 208 zero. 209 210 2010-09-14 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 211 212 PR libfortran/45532 213 * io/list_read.c (nml_get_obj_data): Set first_nl if the previous 214 is NULL. 215 216 2010-09-12 Francois-Xavier Coudert <fxcoudert (a] gcc.gnu.org> 217 218 * intrinsics/pack_generic.c (pack): Add missing return and fix 219 whitespace. 220 * intrinsics/cshift0.c (cshift0): Fix whitespace. 221 * intrinsics/unpack_generic.c (unpack1, unpack0): Fix whitespace. 222 223 2010-09-10 Francois-Xavier Coudert <fxcoudert (a] gcc.gnu.org> 224 225 * runtime/string.c (compare0): Remove. 226 (find_option): Inline string comparison 227 228 2010-09-09 Francois-Xavier Coudert <fxcoudert (a] gcc.gnu.org> 229 230 * acinclude.m4 (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE, 231 LIBGFOR_CHECK_FOR_BROKEN_ISNAN, 232 LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): Remove. 233 * configure.ac: Remove above checks. 234 * libgfortran.h: Define isnan, isinf, isfinite, isnormal and 235 signbit in terms of the respective built-ins. 236 * io/write_float.def (WRITE_FLOAT): Use signbit() instead of 237 __builtin_signbit(). 238 * intrinsics/c99_functions.c (tgamma): Use isnan() instead of 239 __builtin_isnan(). 240 * config.h.in: Regenerate. 241 * configure: Regenerate. 242 243 2010-09-06 Tobias Burnus <burnus (a] net-b.de> 244 245 PR fortran/38282 246 * gfortran.map: Add new iany, iall and iparity intrinsics. 247 * Makefile.am: Ditto. 248 * m4/iany.m4: New. 249 * m4/iall.m4: New. 250 * m4/iparity.m4: New. 251 * Makefile.in: Regenerate. 252 * generated/iall_i1.c: Generate. 253 * generated/iall_i2.c: Generate. 254 * generated/iall_i4.c: Generate. 255 * generated/iall_i8.c: Generate. 256 * generated/iall_i16.c: Generate. 257 * generated/iany_i1.c: Generate. 258 * generated/iany_i2.c: Generate. 259 * generated/iany_i4.c: Generate. 260 * generated/iany_i8.c: Generate. 261 * generated/iany_i16.c: Generate. 262 * generated/iparity_i1.c: Generate. 263 * generated/iparity_i2.c: Generate. 264 * generated/iparity_i4.c: Generate. 265 * generated/iparity_i8.c: Generate. 266 * generated/iparity_i16.c: Generate. 267 268 2010-09-05 Tobias Burnus <burnus (a] net-b.de> 269 270 * m4/bessel.m4: Fix printf warning by casting to (long int). 271 * generated/bessel_r4.c:Regenerated. 272 * generated/bessel_r8.c: Regenerated. 273 * generated/bessel_r10.c: Regenerated. 274 * generated/bessel_r16.c: Regenerated. 275 276 2010-09-01 Francois-Xavier Coudert <fxcoudert (a] gcc.gnu.org> 277 278 * intrinsics/execute_command_line.c: New file. 279 * gfortran.map (_gfortran_execute_command_line_i4, 280 _gfortran_execute_command_line_i8): New symbols. 281 * Makefile.am: Add new file intrinsics/execute_command_line.c. 282 * Makefile.in: Regenerated. 283 284 2010-08-29 Francois-Xavier Coudert <fxcoudert (a] gcc.gnu.org> 285 286 * m4/mtype.m4 (upcase, hasmathfunc, mathfunc_macro): New macros. 287 * m4/fraction.m4: Use new macros to support quad-float types. 288 * m4/set_exponent.m4: Likewise. 289 * m4/spacing.m4: Likewise. 290 * m4/exponent.m4: Likewise. 291 * m4/nearest.m4: Likewise. 292 * m4/norm2.m4: Likewise. 293 * m4/bessel.m4: Likewise. 294 * m4/rrspacing.m4: Likewise. 295 * generated/bessel_r4.c:Regenerated. 296 * generated/bessel_r8.c: Regenerated. 297 * generated/bessel_r10.c: Regenerated. 298 * generated/bessel_r16.c: Regenerated. 299 * generated/exponent_r4.c: Regenerated. 300 * generated/exponent_r8.c: Regenerated. 301 * generated/exponent_r10.c: Regenerated. 302 * generated/exponent_r16.c: Regenerated. 303 * generated/fraction_r4.c: Regenerated. 304 * generated/fraction_r8.c: Regenerated. 305 * generated/fraction_r10.c: Regenerated. 306 * generated/fraction_r16.c: Regenerated. 307 * generated/nearest_r4.c: Regenerated. 308 * generated/nearest_r8.c: Regenerated. 309 * generated/nearest_r10.c: Regenerated. 310 * generated/nearest_r16.c: Regenerated. 311 * generated/norm2_r4.c: Regenerated. 312 * generated/norm2_r8.c: Regenerated. 313 * generated/norm2_r10.c: Regenerated. 314 * generated/norm2_r16.c: Regenerated. 315 * generated/rrspacing_r4.c: Regenerated. 316 * generated/rrspacing_r8.c: Regenerated. 317 * generated/rrspacing_r10.c: Regenerated. 318 * generated/rrspacing_r16.c: Regenerated. 319 * generated/set_exponent_r4.c: Regenerated. 320 * generated/set_exponent_r8.c: Regenerated. 321 * generated/set_exponent_r10.c: Regenerated. 322 * generated/set_exponent_r16.c: Regenerated. 323 * generated/spacing_r4.c: Regenerated. 324 * generated/spacing_r8.c: Regenerated. 325 * generated/spacing_r10.c: Regenerated. 326 * generated/spacing_r16.c: Regenerated. 327 328 2010-08-28 Tobias Burnus <burnus (a] net-b.de> 329 330 * mk-kinds-h.sh: Disable REAL(16) if REAL(10) is available. 331 332 2010-08-27 Tobias Burnus <burnus (a] net-b.de> 333 334 PR fortran/33197 335 * libgfortran/m4/ifunction.m4 (FINISH_ARRAY_FUNCTION, 336 ARRAY_FUNCTION): Allow expression after loop. 337 * libgfortran/m4/norm2.m4: New for _gfortran_norm2_r{4,8,10,16}. 338 * libgfortran/m4/parity.m4: New for _gfortran_parity_l{1,2,4,8,16}. 339 * libgfortran/gfortran.map: Add new functions. 340 * libgfortran/Makefile.am: Ditto. 341 * libgfortran/m4/minloc1.m4: Add empty argument for ARRAY_FUNCTION. 342 * libgfortran/m4/maxloc1.m4: Ditto. 343 * libgfortran/m4/all.m4: Ditto. 344 * libgfortran/m4/minval.m4: Ditto. 345 * libgfortran/m4/maxval.m4: Ditto. 346 * libgfortran/m4/count.m4: Ditto. 347 * libgfortran/m4/product.m4: Ditto. 348 * libgfortran/m4/any.m4: Ditto. 349 * Makefile.in: Regenerated. 350 * generated/minval_r8.c: Regenerated. 351 * generated/maxloc1_4_r8.c: Regenerated. 352 * generated/minloc1_16_r16.c: Regenerated. 353 * generated/norm2_r4.c: Regenerated. 354 * generated/sum_i8.c: Regenerated. 355 * generated/parity_l2.c: Regenerated. 356 * generated/any_l16.c: Regenerated. 357 * generated/maxval_i2.c: Regenerated. 358 * generated/any_l2.c: Regenerated. 359 * generated/product_r4.c: Regenerated. 360 * generated/maxloc1_8_i4.c: Regenerated. 361 * generated/parity_l16.c: Regenerated. 362 * generated/all_l1.c: Regenerated. 363 * generated/product_i2.c: Regenerated. 364 * generated/minloc1_8_r16.c: Regenerated. 365 * generated/maxloc1_8_r16.c: Regenerated. 366 * generated/sum_r16.c: Regenerated. 367 * generated/sum_i1.c: Regenerated. 368 * generated/minloc1_4_r8.c: Regenerated. 369 * generated/maxloc1_16_r16.c: Regenerated. 370 * generated/minloc1_16_i4.c: Regenerated. 371 * generated/maxloc1_16_i4.c: Regenerated. 372 * generated/maxval_r16.c: Regenerated. 373 * generated/product_c10.c: Regenerated. 374 * generated/minloc1_8_i4.c: Regenerated. 375 * generated/all_l2.c: Regenerated. 376 * generated/product_c4.c: Regenerated. 377 * generated/sum_r4.c: Regenerated. 378 * generated/all_l16.c: Regenerated. 379 * generated/minloc1_16_r10.c: Regenerated. 380 * generated/sum_i2.c: Regenerated. 381 * generated/maxloc1_8_r8.c: Regenerated. 382 * generated/minval_i16.c: Regenerated. 383 * generated/parity_l4.c: Regenerated. 384 * generated/maxval_i4.c: Regenerated. 385 * generated/any_l4.c: Regenerated. 386 * generated/minval_i8.c: Regenerated. 387 * generated/maxloc1_4_i8.c: Regenerated. 388 * generated/minloc1_4_i16.c: Regenerated. 389 * generated/maxloc1_4_i16.c: Regenerated. 390 * generated/minloc1_8_r10.c: Regenerated. 391 * generated/product_i4.c: Regenerated. 392 * generated/maxloc1_8_r10.c: Regenerated. 393 * generated/sum_c16.c: Regenerated. 394 * generated/minloc1_16_r8.c: Regenerated. 395 * generated/maxloc1_16_r8.c: Regenerated. 396 * generated/count_4_l.c: Regenerated. 397 * generated/sum_r10.c: Regenerated. 398 * generated/count_8_l.c: Regenerated. 399 * generated/sum_c4.c: Regenerated. 400 * generated/maxloc1_16_r10.c: Regenerated. 401 * generated/minloc1_8_r8.c: Regenerated. 402 * generated/maxval_r10.c: Regenerated. 403 * generated/minval_i1.c: Regenerated. 404 * generated/maxloc1_4_i1.c: Regenerated. 405 * generated/minloc1_4_i8.c: Regenerated. 406 * generated/product_i16.c: Regenerated. 407 * generated/all_l4.c: Regenerated. 408 * generated/norm2_r16.c: Regenerated. 409 * generated/minval_r4.c: Regenerated. 410 * generated/maxloc1_4_r4.c: Regenerated. 411 * generated/sum_i4.c: Regenerated. 412 * generated/maxval_r8.c: Regenerated. 413 * generated/norm2_r8.c: Regenerated. 414 * generated/minloc1_4_i1.c: Regenerated. 415 * generated/minval_r16.c: Regenerated. 416 * generated/minval_i2.c: Regenerated. 417 * generated/maxloc1_4_i2.c: Regenerated. 418 * generated/product_r8.c: Regenerated. 419 * generated/maxloc1_8_i8.c: Regenerated. 420 * generated/sum_c10.c: Regenerated. 421 * generated/minloc1_4_r16.c: Regenerated. 422 * generated/maxloc1_4_r16.c: Regenerated. 423 * generated/count_1_l.c: Regenerated. 424 * generated/minloc1_4_r4.c: Regenerated. 425 * generated/minloc1_16_i8.c: Regenerated. 426 * generated/maxloc1_16_i8.c: Regenerated. 427 * generated/minloc1_4_i2.c: Regenerated. 428 * generated/maxloc1_8_i1.c: Regenerated. 429 * generated/minloc1_8_i8.c: Regenerated. 430 * generated/product_r16.c: Regenerated. 431 * generated/product_c8.c: Regenerated. 432 * generated/sum_r8.c: Regenerated. 433 * generated/norm2_r10.c: Regenerated. 434 * generated/minloc1_16_i16.c: Regenerated. 435 * generated/maxloc1_8_r4.c: Regenerated. 436 * generated/minloc1_16_i1.c: Regenerated. 437 * generated/maxloc1_16_i1.c: Regenerated. 438 * generated/minval_r10.c: Regenerated. 439 * generated/count_16_l.c: Regenerated. 440 * generated/parity_l8.c: Regenerated. 441 * generated/minloc1_8_i1.c: Regenerated. 442 * generated/minval_i4.c: Regenerated. 443 * generated/maxloc1_4_i4.c: Regenerated. 444 * generated/maxloc1_8_i2.c: Regenerated. 445 * generated/maxval_i8.c: Regenerated. 446 * generated/any_l8.c: Regenerated. 447 * generated/minloc1_4_r10.c: Regenerated. 448 * generated/minloc1_8_i16.c: Regenerated. 449 * generated/maxloc1_4_r10.c: Regenerated. 450 * generated/maxloc1_8_i16.c: Regenerated. 451 * generated/minloc1_16_r4.c: Regenerated. 452 * generated/maxloc1_16_r4.c: Regenerated. 453 * generated/product_i8.c: Regenerated. 454 * generated/sum_i16.c: Regenerated. 455 * generated/count_2_l.c: Regenerated. 456 * generated/maxloc1_16_i16.c: Regenerated. 457 * generated/minloc1_8_r4.c: Regenerated. 458 * generated/sum_c8.c: Regenerated. 459 * generated/minloc1_16_i2.c: Regenerated. 460 * generated/maxloc1_16_i2.c: Regenerated. 461 * generated/parity_l1.c: Regenerated. 462 * generated/maxval_i16.c: Regenerated. 463 * generated/maxval_i1.c: Regenerated. 464 * generated/minloc1_4_i4.c: Regenerated. 465 * generated/any_l1.c: Regenerated. 466 * generated/minloc1_8_i2.c: Regenerated. 467 * generated/product_c16.c: Regenerated. 468 * generated/product_r10.c: Regenerated. 469 * generated/product_i1.c: Regenerated. 470 * generated/all_l8.c: Regenerated. 471 * generated/maxval_r4.c: Regenerated. 472 473 2010-08-26 Rainer Orth <ro (a] CeBiTec.Uni-Bielefeld.DE> 474 475 * config/fpu-387.h (has_sse): Remove cw_sse, unused. 476 Use fixed-length asm. 477 478 2010-08-23 Tobias Burnus <burnus (a] net-b.de> 479 480 PR fortran/45323 481 * io/write.c (nml_write_obj, namelist_write): Cast argument 482 of toupper to int. 483 484 2010-08-21 Ralf Wildenhues <Ralf.Wildenhues (a] gmx.de> 485 486 * configure: Regenerate. 487 488 2010-08-19 Tobias Burnus <burnus (a] net-b.de> 489 490 PR fortran/36158 491 PR fortran/33197 492 * m4/bessel.m4: Implement bessel_jn and bessel_yn. 493 * gfortran.map: Add the generated bessel_jn_r{4,8,10,16} 494 and bessel_yn_r{4,8,10,16}. 495 * Makefile.am: Add bessel.m4. 496 * Makefile.in: Regenerated. 497 * generated/bessel_r4.c: Generated. 498 * generated/bessel_r16.c: Generated. 499 * generated/bessel_r8.c: Generated. 500 * generated/bessel_r10.c: Generated. 501 502 2010-08-19 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 503 504 PR libfortran/45108 505 * io/list_read.c (namelist_read): If namelist reading fails, use 506 generate_error and then continue the read loop. 507 508 2010-08-17 Jakub Jelinek <jakub (a] redhat.com> 509 510 PR fortran/45308 511 * intrinsics/date_and_time.c (date_and_time): Pass __{zone,time,date}_len 512 instead of {ZONE,TIME,DATE}_LEN as second argument to fstrcpy. Drop 513 asserts. Adjust comment to the F2003 wording from the F95 wording. 514 515 2010-08-14 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 516 517 PR libfortran/44931 518 * io/inquire.c (inquire_via_unit): Add special case for __MINGW32__ to 519 return special file names CONIN$, CONOUT$, and CONERR$. 520 521 2010-08-07 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 522 523 PR libfortran/45143 524 * io/format.c: Remove fnode storage structure definitions, moving these 525 to format.h. (parse_format_list): Add check for data descriptors, 526 taking care of nested formats. Adjust calling parameters to pass a 527 check flag. (parse_format): Likewise. 528 * io/format.h: Add structures moved from format.c. 529 530 2010-08-02 Janne Blomqvist <jb (a] gcc.gnu.org> 531 532 * io/unit.c (update_position): Don't update the position flag for 533 non-seekable files, check for stell() error. 534 535 2010-08-01 Janne Blomqvist <jb (a] gcc.gnu.org> 536 537 * io/unix.c (file_exists): Use access(2) instead of stat(2) to 538 test file existence. 539 (fallback_access): Move up in file, implement F_OK. 540 541 2010-07-31 David Edelsohn <edelsohn (a] gnu.org> 542 543 * io/inquire.c: Include io.h before string.h. 544 545 2010-07-28 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 546 547 PR libfortran/44931 548 * io/inquire.c (inquire_via_unit): Use ttyname to return actual device 549 file name for stdin, stdout, and stderr. If ttyname does not succeed 550 fall back to default names for these units. Include string.h to allow 551 using strlen function. 552 * unix.c: Remove typedef of unix_stream structure, move to unix.h. 553 * unix.h: Add typedef of unix_stream structure so that it is 554 accessible to inquire.c. 555 556 2010-07-19 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 557 558 PR libfortran/44953 559 * io/unix.c (mem_alloc_w4): Return gfc_char4_t instead of char type 560 pointer. (mem_write4): Remove cast to gfc_char4_t. 561 * io/transfer.c (write_block): Use a gfc_char4_t pointer. 562 (memset4): New helper function. (next_record_w): Use new helper 563 function rather than sset for internal units. Don't attempt to pad 564 with spaces if it is not needed. 565 * io/unix.h: Update prototype for mem_alloc_w4. 566 * io/write.c (memset4): Use gfc_char4_t pointer and chracter type. 567 Don't use multiply by 4 to compute offset. (memcpy4): Likewise. 568 (write_default_char4): Use a gfc_char4_t pointer and update memset4 569 and memcpy calls. (write_a): Likewise. (write_l): Likewise. 570 (write_boz): Likewise. (write_decimal): Likewise. (write_x): Likewise. 571 (write_char): Add support for character(kind=4) internal units that 572 was previously missed. (write_integer): Use a gfc_char4_t pointer and 573 update memset4 and memcpy calls. (write_character): Likewise. 574 (write_separator): Add support for character(kind=4) internal units 575 that was previously missed. 576 * write_float.def (output_float): Use a gfc_char4_t pointer and 577 update memset4 and memcpy calls. (write_infnan): Likewise. 578 (output_float_FMT_G_): Likewise. 579 580 2010-07-16 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 581 582 PR libfortran/37077 583 * io/read.c (read_default_char4): Add support for reading into a 584 kind-4 character variable from a character(kind=4) internal unit. 585 * io/io.h (read_block_form4): Add prototype. 586 * io/unit.c (get_internal_unit): Add call to fbuf_init. 587 (free_internal_unit): Add call to fbuf_destroy. (get_unit): Fix 588 whitespace. 589 * io/transfer.c (read_sf_internal): Use fbuf_alloc to allocate a string 590 to recieve the wide characters translated to single byte chracters. 591 (read_block_form): Fix whitespace. (read_block_form4): New function to 592 read from a character(kind=4) internal unit into a character(kind=4) 593 variable. (read_block_direct): Fix whitespace. (write_block): Fix 594 whitespace. (formatted_transfer_scalar_read): Likewise. 595 (formatted_transfer_scalar_write): Likewise. 596 * io/write.c (write_character): Add support for list directed write of 597 a kind=1 character string to a character(kind=4) internal unit. 598 599 2010-07-14 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 600 601 PR libfortran/44934 602 * io/file_pos.c (st_endfile): Correctly set unit flags for form. 603 * io/transfer.c (data_transfer_init): Fix indentation of whitespace. 604 605 2010-07-12 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 606 607 PR libfortran/37077 608 * io/read.c: Fix comment. 609 * io/io.h (is_char4_unit): New macro. 610 * io/unit.c (get_internal_unit): Call new function open_internal4. 611 * io/unix.c (mem_alloc_r4): New function. (mem_alloc_w4): New function. 612 (mem_read4): New function, temporary stub. (mem_write4): New function. 613 (open_internal4): New function to set stream pointers to use the new 614 mem functions. 615 * io/transfer.c (write_block): Use new mem_alloc_w4 to access internal 616 units of kind=4. 617 * io/unix.h: Add prototypes for open_internal4, mem_alloc_w4, and 618 mem_alloc_r4. 619 * io/write.c (memset4): New helper function. (memcpy4): New helper 620 function. (write_default_char4): Use new helper functions. 621 (write_a): Likewise. (write_l): Likewise. (write_boz): Likewise. 622 (write_decimal): Likewise. (write_x): Likewise. 623 (write_integer): Likewise. 624 * io/write_float.def (output_float): Add code blocks to handle internal 625 unit kind=4 output utilizing gfc_char4_t pointers. (write_infnan): Use 626 new helper functions. (OUTPUT_FLOAT_FMT_G): Update this macro likewise. 627 628 2010-07-12 Rainer Orth <ro (a] CeBiTec.Uni-Bielefeld.DE> 629 630 * config/fpu-387.h [__sun__ && __svr4__] Include <signal.h>, 631 <ucontext.h>. 632 (sigill_caught): New. 633 (sigill_hdlr): New function 634 (has_sse) [__sun__ && __svr4__]: Check if SSE instruction causes 635 SIGILL. 636 637 2010-07-11 Kai Tietz <kai.tietz (a] onevision.com> 638 639 PR libfortran/44698 640 * io/unix.c (flush_buf): Add _commit for WIN32. 641 642 2010-06-28 Tobias Burnus <burnus (a] net-b.de> 643 644 PR fortran/43298 645 * list_read.c (parse_real): Do not pass (..) on for NAN(..). 646 * read.c (convert_real): Fix comment about NAN/INF. 647 648 2010-07-02 Rainer Orth <ro (a] CeBiTec.Uni-Bielefeld.DE> 649 650 * configure.ac (gfortran_use_symver): Only check for Sun-style symbol 651 versioning on Solaris 2. 652 * configure: Regenerate. 653 654 2010-07-02 Rainer Orth <ro (a] CeBiTec.Uni-Bielefeld.DE> 655 656 * configure.ac: Check for Sun symbol versioning. 657 * configure: Regenerate. 658 659 * Makefile.am [LIBGFOR_USE_SYMVER]: Protect version_arg with 660 LIBGFOR_USE_SYMVER_GNU. 661 Add version_dep. 662 [LIBGFOR_USE_SYMVER_SUN]: Handle Sun symbol versioning. 663 [!LIBGFOR_USE_SYMVER]: Add version_dep. 664 (libgfortran_la_DEPENDENCIES): Set to $(version_dep). 665 * Makefile.in: Regenerate. 666 667 2010-06-29 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 668 669 PR libfortran/43298 670 * io/read.c: Add code to parse and read Inf, Infinity, NaN, and Nan with 671 optional parenthesis. 672 673 2010-06-28 Tobias Burnus <burnus (a] net-b.de> 674 675 PR fortran/43298 676 * list_read.c (parse_real, read_real): Support NAN(alphanum). 677 678 2010-06-25 Tobias Burnus <burnus (a] net-b.de> 679 680 * intrinsics/selected_real_kind.f90 681 (_gfortran_selected_real_kind2008): Add function. 682 (_gfortran_selected_real_kind): Stub which calls 683 _gfortran_selected_real_kind2008. 684 * gfortran.map (GFORTRAN_1.4): Add 685 _gfortran_selected_real_kind2008. 686 * mk-srk-inc.sh: Save also RADIX. 687 688 2010-06-25 Tobias Burnus <burnus (a] net-b.de> 689 690 * runtime/compile_options.c (init_compile_options): Update 691 compile_options.allow_std for GFC_STD_F2008_OBS. 692 * io/transfer.c (formatted_transfer_scalar_read, 693 formatted_transfer_scalar_write): Fix allow_std check. 694 * io/list_read.c (nml_parse_qualifier): Ditto. 695 696 2010-06-18 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 697 698 PR libfortran/44477 699 * io/file_pos.c (st_endfile): Add check for ENDFILE when file is 700 already positioned after the EOF marker. Use find_or_create_unit 701 instead of find_unit. If unit is not connected, connect it and create 702 the file with default settings. 703 * io/transfer.c (data_transfer_init): Add check for attempted READ or 704 WRITE when file is already positioned after the EOF marker. 705 706 2010-06-10 Francois-Xavier Coudert <fxcoudert (a] gcc.gnu.org> 707 708 * intrinsics/selected_char_kind.c (selected_char_kind): Fix 709 return value for ISO_10646. 710 711 2010-06-09 Francois-Xavier Coudert <fxcoudert (a] gcc.gnu.org> 712 713 * mk-kinds-h.sh: Define GFC_REAL_*_LITERAL_SUFFIX and 714 GFC_REAL_*_LITERAL macros for each kind. 715 * intrinsics/cpu_time.c (cpu_time_4, cpu_time_8, cpu_time_10, 716 cpu_time_16): Use them. 717 * intrinsics/random.c (rnumber_4, rnumber_8, rnumber_10, 718 rnumber_16): Likewise. 719 720 2010-06-09 Francois-Xavier Coudert <fxcoudert (a] gcc.gnu.org> 721 722 * intrinsics/system_clock.c (system_clock_4, system_clock_8): 723 Undefine TCK. 724 725 2010-06-04 Thomas Koenig <tkoenig (a] gcc.gnu.org> 726 727 PR libfortran/34670 728 * intrinsics/date_and_time.c: Replace assert with runtime_error 729 when VALUE is too small. 730 731 2010-05-20 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 732 733 PR fortran/43851 734 * runtime/stop.c (stop_string): Make sure nothing is emitted for 735 blank stop. 736 737 2010-05-19 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 738 739 PR fortran/43851 740 * runtime/stop.c (error_stop_numeric): New function and updated comment. 741 Add declaration for stop_numeric and remove declaration for stop_string. 742 (stop_string): Use for blank STOP. 743 (stop_numeric): Remove use of special -1 stop code. 744 * runtime/pause.c (do_pause): Use stop_string for blank stop. 745 (pause_numeric): Remove use of special -1 pause code. 746 * gfortran.map: Add new symbol to run-time library. 747 * libgfortran.h: Move declaration for stop_string to here to make 748 function visible for do_pause. Remove declaration for stop_numeric. 749 750 2010-05-08 Janne Blomqvist <jb (a] gcc.gnu.org> 751 752 * io/unix.h (mem_alloc_r): Fix typo to reduce visibility. 753 754 2010-05-07 Janne Blomqvist <jb (a] gcc.gnu.org> 755 756 * libgfortran.h (free_mem): Remove prototype. 757 * runtime/memory.c (free_mem): Remove function. 758 * intrinsics/date_and_time.c (secnds): Replace free_mem() with 759 free(). 760 * io/fbuf.c (fbuf_destroy): Likewise. 761 * io/format.c (free_format_hash_table): Likewise. 762 (save_parsed_format): Likewise. 763 (free_format_data): Likewise. 764 * io/list_read.c (free_saved): Likewise. 765 (free_line): Likewise. 766 (nml_touch_nodes): Likewise. 767 (nml_read_obj): Likewise 768 * io/lock.c (free_ionml): Likewise. 769 * io/open.c (new_unit): Likewise. 770 (already_open): Likewise. 771 * io/unit.c (destroy_unit_mutex): Likewise. 772 (free_internal_unit): Likewise. 773 (close_unit_1): Likewise. 774 * io/unix.c (raw_close): Likewise. 775 (buf_close): Likewise. 776 (mem_close): Likewise. 777 (tempfile): Likewise. 778 * io/write.c (nml_write_obj): Likewise. 779 * io/write_float.def (output_float_FMT_G_##): Likewise. 780 * runtime/error.c (show_locus): Likewise. 781 782 2010-05-04 Ralf Wildenhues <Ralf.Wildenhues (a] gmx.de> 783 784 PR other/43620 785 * configure.ac (AM_INIT_AUTOMAKE): Add no-dist. 786 * configure: Regenerate. 787 * Makefile.in: Regenerate. 788 789 2010-04-30 Kai Tietz <kai.tietz (a] onevision.com> 790 791 PR/43844 792 * io/unix.c (raw_truncate): Explicit cast from integer-scalar 793 to pointer. 794 (tempfile): Use for mingw GetTempPath and avoid double slash 795 for path. 796 797 2010-04-24 Kai Tietz <kai.tietz (a] onevision.com> 798 799 PR/43844 800 * io/unix.c (tempfile): Correct logic for mktemp case. 801 802 2010-04-06 Tobias Burnus <burnus (a] net-b.de> 803 804 PR fortran/39997 805 * runtime/stop.c (error_stop_string): New function. 806 * gfortran.map (_gfortran_error_stop_string): Add. 807 808 2010-04-02 Ralf Wildenhues <Ralf.Wildenhues (a] gmx.de> 809 810 * Makefile.in: Regenerate. 811 * aclocal.m4: Regenerate. 812 813 2010-04-01 Janne Blomqvist <jb (a] gcc.gnu.org> 814 815 PR libfortran/43605 816 * io/intrinsics.c (gf_ftell): New function, seek to correct offset. 817 (ftell): Call gf_ftell. 818 (FTELL_SUB): Likewise. 819 820 2010-04-01 Paul Thomas <pault (a] gcc.gnu.org> 821 822 * io/transfer.c : Update copyright. 823 * io/unix.c : ditto 824 * io/read.c : ditto 825 * io/io.h : ditto 826 * io/unix.h : ditto 827 * io/inquire.c : ditto 828 * io/format.c : ditto 829 * io/list_read.c : ditto 830 * runtime/error.c : ditto 831 * libgfortran.h : ditto 832 * intrinsics/date_and_time.c: ditto 833 * intrinsics/args.c : ditto 834 835 2010-04-01 Janne Blomqvist <jb (a] gcc.gnu.org> 836 837 PR libfortran/43605 838 * io/intrinsics.c (ftell): Reset fbuf, correct offset. 839 (FTELL_SUB): Likewise. 840 841 2010-03-29 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 842 843 PR libfortran/43265 844 * io/transfer.c (next_record_r): Only call hit_eof for specific 845 conditions when an EOF is encountered. 846 847 2010-03-29 Tobias Burnus <burnus (a] net-b.de> 848 849 PR fortran/43551 850 * io/unix.c (buf_write): Set physical_offset after lseek. 851 852 2010-03-25 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 853 854 PR libfortran/43517 855 * io/read.c (read_x): Return if seen EOR condition. 856 857 2010-03-21 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 858 859 PR fortran/43409 860 * io/io.h: Fix type of size in st_parameter_inquire structure. 861 862 2010-03-20 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 863 864 PR fortran/43409 865 * io/unix.h: Add prototype for new function to return file size. 866 * io/unix.c (file_size): New function. 867 * io/inquire.c (inquire_via_unit): Use new function. 868 (inquire_via_filename): Use new function. 869 870 2010-03-17 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 871 872 * io/transfer.c (read_sf_internal): Remove stray function declaration 873 used during debugging. 874 875 2010-03-17 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 876 877 PR libfortran/43265 878 * io/io.h: Delete prototype for read_sf, making it static. 879 * io/read.c (read_x): Modify to call hit_eof if PAD="no". 880 * io/transfer.c (read_sf_internal): New static function extracted from 881 read_sf for use on internal units only. Handle empty string case. 882 (read_sf): New factoring of this function, make it static. Add special 883 conditions for EOF based on ADVANCE="no", PAD="no", and whether any 884 bytes have been previously read from the record. 885 (read_block_form): Modify to call read_sf or read_sf_internal. 886 (next_record_r): Add a done flag similar to next_record_w. Call hit_eof 887 if internal array unit next record returns finished, meaning an EOF was 888 found and not done, ie not the last record expected. For external 889 units call hit_eof if item_count is 1 or there are no pending spaces. 890 (next_record): Update call to next_record_r. 891 892 2010-03-12 Kai Tietz <kai.tietz (a] onevision.com> 893 894 PR/42950 895 * io/format.c (parse_format_list): Add to ERROR, WARNING, 896 SILENT enumerators NOTIFICATION_ prefix. 897 * runtime/error.c (notification_std): Likewise. 898 * libgfortran.h (notification): Likewise. 899 (GFC_LARGEST_BUF): Check for HAVE_GFC_INTEGER_16. 900 901 2010-03-11 Tobias Burnus <burnus (a] net-b.de> 902 903 PR fortran/43228 904 * io/list_read.c (nml_parse_qualifier): Disable expanded_read 905 for array sections. 906 907 2010-03-10 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 908 909 PR libfortran/43320 910 * io/transfer.c (next_record_r): Add hit_eof based on item_count 911 condition. 912 913 2010-03-09 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 914 915 PR libfortran/43265 916 * io/read.c: Include fbuf.h and unix.h to enable lower level I/O for 917 read_x. (read_x): Replace the use of read_sf with equivalent lower level 918 I/O, eliminating unneeded code and handling EOF and EOR conditions. 919 * io/io.h: Revise prototype for read_sf. 920 * io/transfer.c (read_sf): Delete no_error parameter and all uses of it. 921 (read_block_form): Likewise. 922 (next_record_r): Delete wrong code call to hit_eof. 923 924 2010-03-08 Kai TIetz <kai.tietz (a] onevision.com> 925 926 PR/42950 927 * libgfortran.h (_POSIX): Define if __MINGW32__ is defined. 928 (gfc_printf): Define to gnu_printf for __MINGW32__ case, 929 otherwise to __printf__. 930 (gfc_strtof,gfc_strtod,gfc_strtold): Define for mingw case 931 to POSIX compatible converter functions. 932 (runtime_error): Use instead gfc_printf as formatter 933 attribute name. 934 (runtime_error_at): Likewise. 935 (runtime_warning_at): Likewise. 936 (st_printf): Likewise. 937 * intrinsics/date_and_time.c (localtime_r): Undefine 938 possible defined macro. 939 (gmtime_r): Likewise. 940 * io/read.c (convert_real): Use gfc_strtof, gfc_strtod, 941 and gfc_strtold. 942 943 2010-02-24 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 944 945 PR libfortran/43155 946 * io/transfer.c (require_type): Subtract one from item_count for output 947 of error message. Add comment before formatted_transfer function 948 explaining why the item_count is off by one. 949 950 2010-02-24 Rainer Orth <ro (a] CeBiTec.Uni-Bielefeld.DE> 951 952 * io/write_float.def (WRITE_FLOAT): Use __builtin_signbit. 953 954 2010-02-22 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 955 956 * io/list_read.c (list_formatted_read_scalar): Remove duplicate code. 957 958 2010-02-09 Tobias Burnus <burnus (a] net-b.de> 959 960 PR fortran/42996 961 * intrinsics/args.c (get_command_argument_i4): Always return 962 commandline-argument length for length parameter. 963 964 2010-02-06 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 965 966 PR libfortran/42742 967 * io/format.c (reset_fnode_counters): Use the correct pointer to the 968 head of the fnode list. (parse_format): Remove previous hack that set 969 limit on size of format string for caching. 970 971 2010-02-06 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 972 973 PR libfortran 974 * io/transfer.c (read_sf): Handle EOR and EOF conditions for 975 ADVANCE="no" with PAD="yes" or PAD="no". 976 977 2010-02-03 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 978 979 PR libfortran/42901 980 * io/list_read.c (nml_get_obj_data): Add new qualifier flag, clean up 981 code, and adjust logic to set namelist info pointer correctly for array 982 qualifiers of derived type components. 983 984 2010-01-15 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 985 986 PR libfortran/42742 987 * io/format.c (parse_format): Set limit on size of format strings that 988 will be cached. 989 990 2010-01-05 Rainer Orth <ro (a] CeBiTec.Uni-Bielefeld.DE> 991 992 * configure: Regenerate. 993 994 2010-01-03 Janne Blomqvist <jb (a] gcc.gnu.org> 995 996 PR libfortran/42420 997 * io/unix.c: Defines for MINGW stat and fstat. 998 (gfstat_t): New typedef. 999 (id_from_fd): Use gfstat_t instead of struct stat. 1000 (fd_to_stream): Likewise. 1001 (compare_file_filename): Likewise. 1002 (find_file): Likewise. 1003 (file_exists): Likewise. 1004 (inquire_sequential): Likewise. 1005 (inquire_direct): Likewise. 1006 (inquire_formatted): Likewise. 1007 1008 1010 Copyright (C) 2010 Free Software Foundation, Inc. 1011 1012 Copying and distribution of this file, with or without modification, 1013 are permitted in any medium without royalty provided the copyright 1014 notice and this notice are preserved. 1015
Indexes created Wed Apr 29 00:23:26 UTC 2026