H.J. Lu | 797103e | 2011-01-02 08:22:05 -0800 | [diff] [blame] | 1 | 2010-12-10 Tobias Burnus <burnus@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@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@gcc.gnu.org> |
| 20 | Tobias Burnus <burnus@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@gmx.de> |
| 485 | |
| 486 | * configure: Regenerate. |
| 487 | |
| 488 | 2010-08-19 Tobias Burnus <burnus@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@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@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@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@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@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@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@gnu.org> |
| 542 | |
| 543 | * io/inquire.c: Include io.h before string.h. |
| 544 | |
| 545 | 2010-07-28 Jerry DeLisle <jvdelisle@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@gcc.gnu.org> |
| 751 | |
| 752 | * io/unix.h (mem_alloc_r): Fix typo to reduce visibility. |
| 753 | |
| 754 | 2010-05-07 Janne Blomqvist <jb@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@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@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@onevision.com> |
| 798 | |
| 799 | PR/43844 |
| 800 | * io/unix.c (tempfile): Correct logic for mktemp case. |
| 801 | |
| 802 | 2010-04-06 Tobias Burnus <burnus@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@gmx.de> |
| 809 | |
| 810 | * Makefile.in: Regenerate. |
| 811 | * aclocal.m4: Regenerate. |
| 812 | |
| 813 | 2010-04-01 Janne Blomqvist <jb@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@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@CeBiTec.Uni-Bielefeld.DE> |
| 951 | |
| 952 | * io/write_float.def (WRITE_FLOAT): Use __builtin_signbit. |
| 953 | |
| 954 | 2010-02-22 Jerry DeLisle <jvdelisle@gcc.gnu.org> |
| 955 | |
| 956 | * io/list_read.c (list_formatted_read_scalar): Remove duplicate code. |
| 957 | |
| 958 | 2010-02-09 Tobias Burnus <burnus@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@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@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@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@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@CeBiTec.Uni-Bielefeld.DE> |
| 991 | |
| 992 | * configure: Regenerate. |
| 993 | |
| 994 | 2010-01-03 Janne Blomqvist <jb@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 | |
| 1009 | Copyright (C) 2010 Free Software Foundation, Inc. |
| 1010 | |
| 1011 | Copying and distribution of this file, with or without modification, |
| 1012 | are permitted in any medium without royalty provided the copyright |
| 1013 | notice and this notice are preserved. |