1 2010-10-26 Jerry DeLisle <jvdelisle@gcc.gnu.org>
4 * io/list_read.c (nml_parse_qualifier): Add additional conditions for
5 setting the end index for loop specification. Fix some whitespace.
6 * io/write.c (write_default_char4): Const-ify the source argument.
8 2010-10-21 Thomas Koenig <tkoenig@gcc.gnu.org>
11 * m4/shape.m4 (shape_'rtype_kind`): Use variable for rank.
12 Allocate return array if unallocated.
13 * generated/shape_i4.c: Regenerated.
14 * generated/shape_i8.c: Regenerated.
15 * generated/shape_i16.c: Regenerated.
17 2010-10-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
20 * runtime/stop.c (stop_numeric_f08): New function.
21 (stop_numeric): Restore to previous behavior.
22 * gfortran.map: Add symbol _gfortran_stop_numeric_f08.
24 2010-10-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
26 * io/io.h: Remove definition of the BT enumerator.
27 * libgfortran.h: Replace GFC_DTYPE enumerator with BT.
28 * intrinsics/iso_c_generated_procs.c: Likewise
29 * intrinsics/date_and_time.c: Likewise.
30 * intrinsics/iso_c_binding.c: Likewise.
31 * io/list_read.c: Likewise.
32 * io/transfer.c: Likewise.
33 * io/write.c: Likewise.
35 2010-10-16 Thomas Koenig <tkoenig@gcc.gnu.org>
40 * gfortran.map: Add _gfortran_transfer_array_write,
41 _gfortran_transfer_array_write, _gfortran_transfer_character_write,
42 _gfortran_transfer_character_wide_write,
43 _gfortran_transfer_complex_write,
44 _gfortran_transfer_integer_write,
45 _gfortran_transfer_logical_write and
46 _gfortran_transfer_real_write.
47 * io/transfer.c (transfer_integer_write): Add prototype and
48 function body as call to the original function, without the
50 (transfer_real_write): Likewise.
51 (transfer_logical_write): Likewise.
52 (transfer_character_write): Likewise.
53 (transfer_character_wide_write): Likewise.
54 (transfer_complex_write): Likewise.
55 (transfer_array_write): Likewise.
57 2010-09-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
60 * io/write.c (namelist_write_newline): Pad character array internal
61 unit records with spaces.
63 2010-09-21 Jerry DeLisle <jvdelisle@gcc.gnu.org>
66 * io/open.c (new_unit): On POSITION_APPEND don't seek if file length is
69 2010-09-14 Jerry DeLisle <jvdelisle@gcc.gnu.org>
72 * io/list_read.c (nml_get_obj_data): Set first_nl if the previous
75 2010-09-12 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
77 * intrinsics/pack_generic.c (pack): Add missing return and fix
79 * intrinsics/cshift0.c (cshift0): Fix whitespace.
80 * intrinsics/unpack_generic.c (unpack1, unpack0): Fix whitespace.
82 2010-09-10 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
84 * runtime/string.c (compare0): Remove.
85 (find_option): Inline string comparison
87 2010-09-09 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
89 * acinclude.m4 (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE,
90 LIBGFOR_CHECK_FOR_BROKEN_ISNAN,
91 LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): Remove.
92 * configure.ac: Remove above checks.
93 * libgfortran.h: Define isnan, isinf, isfinite, isnormal and
94 signbit in terms of the respective built-ins.
95 * io/write_float.def (WRITE_FLOAT): Use signbit() instead of
97 * intrinsics/c99_functions.c (tgamma): Use isnan() instead of
99 * config.h.in: Regenerate.
100 * configure: Regenerate.
102 2010-09-06 Tobias Burnus <burnus@net-b.de>
105 * gfortran.map: Add new iany, iall and iparity intrinsics.
106 * Makefile.am: Ditto.
109 * m4/iparity.m4: New.
110 * Makefile.in: Regenerate.
111 * generated/iall_i1.c: Generate.
112 * generated/iall_i2.c: Generate.
113 * generated/iall_i4.c: Generate.
114 * generated/iall_i8.c: Generate.
115 * generated/iall_i16.c: Generate.
116 * generated/iany_i1.c: Generate.
117 * generated/iany_i2.c: Generate.
118 * generated/iany_i4.c: Generate.
119 * generated/iany_i8.c: Generate.
120 * generated/iany_i16.c: Generate.
121 * generated/iparity_i1.c: Generate.
122 * generated/iparity_i2.c: Generate.
123 * generated/iparity_i4.c: Generate.
124 * generated/iparity_i8.c: Generate.
125 * generated/iparity_i16.c: Generate.
127 2010-09-05 Tobias Burnus <burnus@net-b.de>
129 * m4/bessel.m4: Fix printf warning by casting to (long int).
130 * generated/bessel_r4.c:Regenerated.
131 * generated/bessel_r8.c: Regenerated.
132 * generated/bessel_r10.c: Regenerated.
133 * generated/bessel_r16.c: Regenerated.
135 2010-09-01 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
137 * intrinsics/execute_command_line.c: New file.
138 * gfortran.map (_gfortran_execute_command_line_i4,
139 _gfortran_execute_command_line_i8): New symbols.
140 * Makefile.am: Add new file intrinsics/execute_command_line.c.
141 * Makefile.in: Regenerated.
143 2010-08-29 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
145 * m4/mtype.m4 (upcase, hasmathfunc, mathfunc_macro): New macros.
146 * m4/fraction.m4: Use new macros to support quad-float types.
147 * m4/set_exponent.m4: Likewise.
148 * m4/spacing.m4: Likewise.
149 * m4/exponent.m4: Likewise.
150 * m4/nearest.m4: Likewise.
151 * m4/norm2.m4: Likewise.
152 * m4/bessel.m4: Likewise.
153 * m4/rrspacing.m4: Likewise.
154 * generated/bessel_r4.c:Regenerated.
155 * generated/bessel_r8.c: Regenerated.
156 * generated/bessel_r10.c: Regenerated.
157 * generated/bessel_r16.c: Regenerated.
158 * generated/exponent_r4.c: Regenerated.
159 * generated/exponent_r8.c: Regenerated.
160 * generated/exponent_r10.c: Regenerated.
161 * generated/exponent_r16.c: Regenerated.
162 * generated/fraction_r4.c: Regenerated.
163 * generated/fraction_r8.c: Regenerated.
164 * generated/fraction_r10.c: Regenerated.
165 * generated/fraction_r16.c: Regenerated.
166 * generated/nearest_r4.c: Regenerated.
167 * generated/nearest_r8.c: Regenerated.
168 * generated/nearest_r10.c: Regenerated.
169 * generated/nearest_r16.c: Regenerated.
170 * generated/norm2_r4.c: Regenerated.
171 * generated/norm2_r8.c: Regenerated.
172 * generated/norm2_r10.c: Regenerated.
173 * generated/norm2_r16.c: Regenerated.
174 * generated/rrspacing_r4.c: Regenerated.
175 * generated/rrspacing_r8.c: Regenerated.
176 * generated/rrspacing_r10.c: Regenerated.
177 * generated/rrspacing_r16.c: Regenerated.
178 * generated/set_exponent_r4.c: Regenerated.
179 * generated/set_exponent_r8.c: Regenerated.
180 * generated/set_exponent_r10.c: Regenerated.
181 * generated/set_exponent_r16.c: Regenerated.
182 * generated/spacing_r4.c: Regenerated.
183 * generated/spacing_r8.c: Regenerated.
184 * generated/spacing_r10.c: Regenerated.
185 * generated/spacing_r16.c: Regenerated.
187 2010-08-28 Tobias Burnus <burnus@net-b.de>
189 * mk-kinds-h.sh: Disable REAL(16) if REAL(10) is available.
191 2010-08-27 Tobias Burnus <burnus@net-b.de>
194 * libgfortran/m4/ifunction.m4 (FINISH_ARRAY_FUNCTION,
195 ARRAY_FUNCTION): Allow expression after loop.
196 * libgfortran/m4/norm2.m4: New for _gfortran_norm2_r{4,8,10,16}.
197 * libgfortran/m4/parity.m4: New for _gfortran_parity_l{1,2,4,8,16}.
198 * libgfortran/gfortran.map: Add new functions.
199 * libgfortran/Makefile.am: Ditto.
200 * libgfortran/m4/minloc1.m4: Add empty argument for ARRAY_FUNCTION.
201 * libgfortran/m4/maxloc1.m4: Ditto.
202 * libgfortran/m4/all.m4: Ditto.
203 * libgfortran/m4/minval.m4: Ditto.
204 * libgfortran/m4/maxval.m4: Ditto.
205 * libgfortran/m4/count.m4: Ditto.
206 * libgfortran/m4/product.m4: Ditto.
207 * libgfortran/m4/any.m4: Ditto.
208 * Makefile.in: Regenerated.
209 * generated/minval_r8.c: Regenerated.
210 * generated/maxloc1_4_r8.c: Regenerated.
211 * generated/minloc1_16_r16.c: Regenerated.
212 * generated/norm2_r4.c: Regenerated.
213 * generated/sum_i8.c: Regenerated.
214 * generated/parity_l2.c: Regenerated.
215 * generated/any_l16.c: Regenerated.
216 * generated/maxval_i2.c: Regenerated.
217 * generated/any_l2.c: Regenerated.
218 * generated/product_r4.c: Regenerated.
219 * generated/maxloc1_8_i4.c: Regenerated.
220 * generated/parity_l16.c: Regenerated.
221 * generated/all_l1.c: Regenerated.
222 * generated/product_i2.c: Regenerated.
223 * generated/minloc1_8_r16.c: Regenerated.
224 * generated/maxloc1_8_r16.c: Regenerated.
225 * generated/sum_r16.c: Regenerated.
226 * generated/sum_i1.c: Regenerated.
227 * generated/minloc1_4_r8.c: Regenerated.
228 * generated/maxloc1_16_r16.c: Regenerated.
229 * generated/minloc1_16_i4.c: Regenerated.
230 * generated/maxloc1_16_i4.c: Regenerated.
231 * generated/maxval_r16.c: Regenerated.
232 * generated/product_c10.c: Regenerated.
233 * generated/minloc1_8_i4.c: Regenerated.
234 * generated/all_l2.c: Regenerated.
235 * generated/product_c4.c: Regenerated.
236 * generated/sum_r4.c: Regenerated.
237 * generated/all_l16.c: Regenerated.
238 * generated/minloc1_16_r10.c: Regenerated.
239 * generated/sum_i2.c: Regenerated.
240 * generated/maxloc1_8_r8.c: Regenerated.
241 * generated/minval_i16.c: Regenerated.
242 * generated/parity_l4.c: Regenerated.
243 * generated/maxval_i4.c: Regenerated.
244 * generated/any_l4.c: Regenerated.
245 * generated/minval_i8.c: Regenerated.
246 * generated/maxloc1_4_i8.c: Regenerated.
247 * generated/minloc1_4_i16.c: Regenerated.
248 * generated/maxloc1_4_i16.c: Regenerated.
249 * generated/minloc1_8_r10.c: Regenerated.
250 * generated/product_i4.c: Regenerated.
251 * generated/maxloc1_8_r10.c: Regenerated.
252 * generated/sum_c16.c: Regenerated.
253 * generated/minloc1_16_r8.c: Regenerated.
254 * generated/maxloc1_16_r8.c: Regenerated.
255 * generated/count_4_l.c: Regenerated.
256 * generated/sum_r10.c: Regenerated.
257 * generated/count_8_l.c: Regenerated.
258 * generated/sum_c4.c: Regenerated.
259 * generated/maxloc1_16_r10.c: Regenerated.
260 * generated/minloc1_8_r8.c: Regenerated.
261 * generated/maxval_r10.c: Regenerated.
262 * generated/minval_i1.c: Regenerated.
263 * generated/maxloc1_4_i1.c: Regenerated.
264 * generated/minloc1_4_i8.c: Regenerated.
265 * generated/product_i16.c: Regenerated.
266 * generated/all_l4.c: Regenerated.
267 * generated/norm2_r16.c: Regenerated.
268 * generated/minval_r4.c: Regenerated.
269 * generated/maxloc1_4_r4.c: Regenerated.
270 * generated/sum_i4.c: Regenerated.
271 * generated/maxval_r8.c: Regenerated.
272 * generated/norm2_r8.c: Regenerated.
273 * generated/minloc1_4_i1.c: Regenerated.
274 * generated/minval_r16.c: Regenerated.
275 * generated/minval_i2.c: Regenerated.
276 * generated/maxloc1_4_i2.c: Regenerated.
277 * generated/product_r8.c: Regenerated.
278 * generated/maxloc1_8_i8.c: Regenerated.
279 * generated/sum_c10.c: Regenerated.
280 * generated/minloc1_4_r16.c: Regenerated.
281 * generated/maxloc1_4_r16.c: Regenerated.
282 * generated/count_1_l.c: Regenerated.
283 * generated/minloc1_4_r4.c: Regenerated.
284 * generated/minloc1_16_i8.c: Regenerated.
285 * generated/maxloc1_16_i8.c: Regenerated.
286 * generated/minloc1_4_i2.c: Regenerated.
287 * generated/maxloc1_8_i1.c: Regenerated.
288 * generated/minloc1_8_i8.c: Regenerated.
289 * generated/product_r16.c: Regenerated.
290 * generated/product_c8.c: Regenerated.
291 * generated/sum_r8.c: Regenerated.
292 * generated/norm2_r10.c: Regenerated.
293 * generated/minloc1_16_i16.c: Regenerated.
294 * generated/maxloc1_8_r4.c: Regenerated.
295 * generated/minloc1_16_i1.c: Regenerated.
296 * generated/maxloc1_16_i1.c: Regenerated.
297 * generated/minval_r10.c: Regenerated.
298 * generated/count_16_l.c: Regenerated.
299 * generated/parity_l8.c: Regenerated.
300 * generated/minloc1_8_i1.c: Regenerated.
301 * generated/minval_i4.c: Regenerated.
302 * generated/maxloc1_4_i4.c: Regenerated.
303 * generated/maxloc1_8_i2.c: Regenerated.
304 * generated/maxval_i8.c: Regenerated.
305 * generated/any_l8.c: Regenerated.
306 * generated/minloc1_4_r10.c: Regenerated.
307 * generated/minloc1_8_i16.c: Regenerated.
308 * generated/maxloc1_4_r10.c: Regenerated.
309 * generated/maxloc1_8_i16.c: Regenerated.
310 * generated/minloc1_16_r4.c: Regenerated.
311 * generated/maxloc1_16_r4.c: Regenerated.
312 * generated/product_i8.c: Regenerated.
313 * generated/sum_i16.c: Regenerated.
314 * generated/count_2_l.c: Regenerated.
315 * generated/maxloc1_16_i16.c: Regenerated.
316 * generated/minloc1_8_r4.c: Regenerated.
317 * generated/sum_c8.c: Regenerated.
318 * generated/minloc1_16_i2.c: Regenerated.
319 * generated/maxloc1_16_i2.c: Regenerated.
320 * generated/parity_l1.c: Regenerated.
321 * generated/maxval_i16.c: Regenerated.
322 * generated/maxval_i1.c: Regenerated.
323 * generated/minloc1_4_i4.c: Regenerated.
324 * generated/any_l1.c: Regenerated.
325 * generated/minloc1_8_i2.c: Regenerated.
326 * generated/product_c16.c: Regenerated.
327 * generated/product_r10.c: Regenerated.
328 * generated/product_i1.c: Regenerated.
329 * generated/all_l8.c: Regenerated.
330 * generated/maxval_r4.c: Regenerated.
332 2010-08-26 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
334 * config/fpu-387.h (has_sse): Remove cw_sse, unused.
335 Use fixed-length asm.
337 2010-08-23 Tobias Burnus <burnus@net-b.de>
340 * io/write.c (nml_write_obj, namelist_write): Cast argument
343 2010-08-21 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
345 * configure: Regenerate.
347 2010-08-19 Tobias Burnus <burnus@net-b.de>
351 * m4/bessel.m4: Implement bessel_jn and bessel_yn.
352 * gfortran.map: Add the generated bessel_jn_r{4,8,10,16}
353 and bessel_yn_r{4,8,10,16}.
354 * Makefile.am: Add bessel.m4.
355 * Makefile.in: Regenerated.
356 * generated/bessel_r4.c: Generated.
357 * generated/bessel_r16.c: Generated.
358 * generated/bessel_r8.c: Generated.
359 * generated/bessel_r10.c: Generated.
361 2010-08-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
364 * io/list_read.c (namelist_read): If namelist reading fails, use
365 generate_error and then continue the read loop.
367 2010-08-17 Jakub Jelinek <jakub@redhat.com>
370 * intrinsics/date_and_time.c (date_and_time): Pass __{zone,time,date}_len
371 instead of {ZONE,TIME,DATE}_LEN as second argument to fstrcpy. Drop
372 asserts. Adjust comment to the F2003 wording from the F95 wording.
374 2010-08-14 Jerry DeLisle <jvdelisle@gcc.gnu.org>
377 * io/inquire.c (inquire_via_unit): Add special case for __MINGW32__ to
378 return special file names CONIN$, CONOUT$, and CONERR$.
380 2010-08-07 Jerry DeLisle <jvdelisle@gcc.gnu.org>
383 * io/format.c: Remove fnode storage structure definitions, moving these
384 to format.h. (parse_format_list): Add check for data descriptors,
385 taking care of nested formats. Adjust calling parameters to pass a
386 check flag. (parse_format): Likewise.
387 * io/format.h: Add structures moved from format.c.
389 2010-08-02 Janne Blomqvist <jb@gcc.gnu.org>
391 * io/unit.c (update_position): Don't update the position flag for
392 non-seekable files, check for stell() error.
394 2010-08-01 Janne Blomqvist <jb@gcc.gnu.org>
396 * io/unix.c (file_exists): Use access(2) instead of stat(2) to
398 (fallback_access): Move up in file, implement F_OK.
400 2010-07-31 David Edelsohn <edelsohn@gnu.org>
402 * io/inquire.c: Include io.h before string.h.
404 2010-07-28 Jerry DeLisle <jvdelisle@gcc.gnu.org>
407 * io/inquire.c (inquire_via_unit): Use ttyname to return actual device
408 file name for stdin, stdout, and stderr. If ttyname does not succeed
409 fall back to default names for these units. Include string.h to allow
410 using strlen function.
411 * unix.c: Remove typedef of unix_stream structure, move to unix.h.
412 * unix.h: Add typedef of unix_stream structure so that it is
413 accessible to inquire.c.
415 2010-07-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
418 * io/unix.c (mem_alloc_w4): Return gfc_char4_t instead of char type
419 pointer. (mem_write4): Remove cast to gfc_char4_t.
420 * io/transfer.c (write_block): Use a gfc_char4_t pointer.
421 (memset4): New helper function. (next_record_w): Use new helper
422 function rather than sset for internal units. Don't attempt to pad
423 with spaces if it is not needed.
424 * io/unix.h: Update prototype for mem_alloc_w4.
425 * io/write.c (memset4): Use gfc_char4_t pointer and chracter type.
426 Don't use multiply by 4 to compute offset. (memcpy4): Likewise.
427 (write_default_char4): Use a gfc_char4_t pointer and update memset4
428 and memcpy calls. (write_a): Likewise. (write_l): Likewise.
429 (write_boz): Likewise. (write_decimal): Likewise. (write_x): Likewise.
430 (write_char): Add support for character(kind=4) internal units that
431 was previously missed. (write_integer): Use a gfc_char4_t pointer and
432 update memset4 and memcpy calls. (write_character): Likewise.
433 (write_separator): Add support for character(kind=4) internal units
434 that was previously missed.
435 * write_float.def (output_float): Use a gfc_char4_t pointer and
436 update memset4 and memcpy calls. (write_infnan): Likewise.
437 (output_float_FMT_G_): Likewise.
439 2010-07-16 Jerry DeLisle <jvdelisle@gcc.gnu.org>
442 * io/read.c (read_default_char4): Add support for reading into a
443 kind-4 character variable from a character(kind=4) internal unit.
444 * io/io.h (read_block_form4): Add prototype.
445 * io/unit.c (get_internal_unit): Add call to fbuf_init.
446 (free_internal_unit): Add call to fbuf_destroy. (get_unit): Fix
448 * io/transfer.c (read_sf_internal): Use fbuf_alloc to allocate a string
449 to recieve the wide characters translated to single byte chracters.
450 (read_block_form): Fix whitespace. (read_block_form4): New function to
451 read from a character(kind=4) internal unit into a character(kind=4)
452 variable. (read_block_direct): Fix whitespace. (write_block): Fix
453 whitespace. (formatted_transfer_scalar_read): Likewise.
454 (formatted_transfer_scalar_write): Likewise.
455 * io/write.c (write_character): Add support for list directed write of
456 a kind=1 character string to a character(kind=4) internal unit.
458 2010-07-14 Jerry DeLisle <jvdelisle@gcc.gnu.org>
461 * io/file_pos.c (st_endfile): Correctly set unit flags for form.
462 * io/transfer.c (data_transfer_init): Fix indentation of whitespace.
464 2010-07-12 Jerry DeLisle <jvdelisle@gcc.gnu.org>
467 * io/read.c: Fix comment.
468 * io/io.h (is_char4_unit): New macro.
469 * io/unit.c (get_internal_unit): Call new function open_internal4.
470 * io/unix.c (mem_alloc_r4): New function. (mem_alloc_w4): New function.
471 (mem_read4): New function, temporary stub. (mem_write4): New function.
472 (open_internal4): New function to set stream pointers to use the new
474 * io/transfer.c (write_block): Use new mem_alloc_w4 to access internal
476 * io/unix.h: Add prototypes for open_internal4, mem_alloc_w4, and
478 * io/write.c (memset4): New helper function. (memcpy4): New helper
479 function. (write_default_char4): Use new helper functions.
480 (write_a): Likewise. (write_l): Likewise. (write_boz): Likewise.
481 (write_decimal): Likewise. (write_x): Likewise.
482 (write_integer): Likewise.
483 * io/write_float.def (output_float): Add code blocks to handle internal
484 unit kind=4 output utilizing gfc_char4_t pointers. (write_infnan): Use
485 new helper functions. (OUTPUT_FLOAT_FMT_G): Update this macro likewise.
487 2010-07-12 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
489 * config/fpu-387.h [__sun__ && __svr4__] Include <signal.h>,
491 (sigill_caught): New.
492 (sigill_hdlr): New function
493 (has_sse) [__sun__ && __svr4__]: Check if SSE instruction causes
496 2010-07-11 Kai Tietz <kai.tietz@onevision.com>
499 * io/unix.c (flush_buf): Add _commit for WIN32.
501 2010-06-28 Tobias Burnus <burnus@net-b.de>
504 * list_read.c (parse_real): Do not pass (..) on for NAN(..).
505 * read.c (convert_real): Fix comment about NAN/INF.
507 2010-07-02 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
509 * configure.ac (gfortran_use_symver): Only check for Sun-style symbol
510 versioning on Solaris 2.
511 * configure: Regenerate.
513 2010-07-02 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
515 * configure.ac: Check for Sun symbol versioning.
516 * configure: Regenerate.
518 * Makefile.am [LIBGFOR_USE_SYMVER]: Protect version_arg with
519 LIBGFOR_USE_SYMVER_GNU.
521 [LIBGFOR_USE_SYMVER_SUN]: Handle Sun symbol versioning.
522 [!LIBGFOR_USE_SYMVER]: Add version_dep.
523 (libgfortran_la_DEPENDENCIES): Set to $(version_dep).
524 * Makefile.in: Regenerate.
526 2010-06-29 Jerry DeLisle <jvdelisle@gcc.gnu.org>
529 * io/read.c: Add code to parse and read Inf, Infinity, NaN, and Nan with
530 optional parenthesis.
532 2010-06-28 Tobias Burnus <burnus@net-b.de>
535 * list_read.c (parse_real, read_real): Support NAN(alphanum).
537 2010-06-25 Tobias Burnus <burnus@net-b.de>
539 * intrinsics/selected_real_kind.f90
540 (_gfortran_selected_real_kind2008): Add function.
541 (_gfortran_selected_real_kind): Stub which calls
542 _gfortran_selected_real_kind2008.
543 * gfortran.map (GFORTRAN_1.4): Add
544 _gfortran_selected_real_kind2008.
545 * mk-srk-inc.sh: Save also RADIX.
547 2010-06-25 Tobias Burnus <burnus@net-b.de>
549 * runtime/compile_options.c (init_compile_options): Update
550 compile_options.allow_std for GFC_STD_F2008_OBS.
551 * io/transfer.c (formatted_transfer_scalar_read,
552 formatted_transfer_scalar_write): Fix allow_std check.
553 * io/list_read.c (nml_parse_qualifier): Ditto.
555 2010-06-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
558 * io/file_pos.c (st_endfile): Add check for ENDFILE when file is
559 already positioned after the EOF marker. Use find_or_create_unit
560 instead of find_unit. If unit is not connected, connect it and create
561 the file with default settings.
562 * io/transfer.c (data_transfer_init): Add check for attempted READ or
563 WRITE when file is already positioned after the EOF marker.
565 2010-06-10 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
567 * intrinsics/selected_char_kind.c (selected_char_kind): Fix
568 return value for ISO_10646.
570 2010-06-09 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
572 * mk-kinds-h.sh: Define GFC_REAL_*_LITERAL_SUFFIX and
573 GFC_REAL_*_LITERAL macros for each kind.
574 * intrinsics/cpu_time.c (cpu_time_4, cpu_time_8, cpu_time_10,
575 cpu_time_16): Use them.
576 * intrinsics/random.c (rnumber_4, rnumber_8, rnumber_10,
577 rnumber_16): Likewise.
579 2010-06-09 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
581 * intrinsics/system_clock.c (system_clock_4, system_clock_8):
584 2010-06-04 Thomas Koenig <tkoenig@gcc.gnu.org>
587 * intrinsics/date_and_time.c: Replace assert with runtime_error
588 when VALUE is too small.
590 2010-05-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
593 * runtime/stop.c (stop_string): Make sure nothing is emitted for
596 2010-05-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
599 * runtime/stop.c (error_stop_numeric): New function and updated comment.
600 Add declaration for stop_numeric and remove declaration for stop_string.
601 (stop_string): Use for blank STOP.
602 (stop_numeric): Remove use of special -1 stop code.
603 * runtime/pause.c (do_pause): Use stop_string for blank stop.
604 (pause_numeric): Remove use of special -1 pause code.
605 * gfortran.map: Add new symbol to run-time library.
606 * libgfortran.h: Move declaration for stop_string to here to make
607 function visible for do_pause. Remove declaration for stop_numeric.
609 2010-05-08 Janne Blomqvist <jb@gcc.gnu.org>
611 * io/unix.h (mem_alloc_r): Fix typo to reduce visibility.
613 2010-05-07 Janne Blomqvist <jb@gcc.gnu.org>
615 * libgfortran.h (free_mem): Remove prototype.
616 * runtime/memory.c (free_mem): Remove function.
617 * intrinsics/date_and_time.c (secnds): Replace free_mem() with
619 * io/fbuf.c (fbuf_destroy): Likewise.
620 * io/format.c (free_format_hash_table): Likewise.
621 (save_parsed_format): Likewise.
622 (free_format_data): Likewise.
623 * io/list_read.c (free_saved): Likewise.
624 (free_line): Likewise.
625 (nml_touch_nodes): Likewise.
626 (nml_read_obj): Likewise
627 * io/lock.c (free_ionml): Likewise.
628 * io/open.c (new_unit): Likewise.
629 (already_open): Likewise.
630 * io/unit.c (destroy_unit_mutex): Likewise.
631 (free_internal_unit): Likewise.
632 (close_unit_1): Likewise.
633 * io/unix.c (raw_close): Likewise.
634 (buf_close): Likewise.
635 (mem_close): Likewise.
636 (tempfile): Likewise.
637 * io/write.c (nml_write_obj): Likewise.
638 * io/write_float.def (output_float_FMT_G_##): Likewise.
639 * runtime/error.c (show_locus): Likewise.
641 2010-05-04 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
644 * configure.ac (AM_INIT_AUTOMAKE): Add no-dist.
645 * configure: Regenerate.
646 * Makefile.in: Regenerate.
648 2010-04-30 Kai Tietz <kai.tietz@onevision.com>
651 * io/unix.c (raw_truncate): Explicit cast from integer-scalar
653 (tempfile): Use for mingw GetTempPath and avoid double slash
656 2010-04-24 Kai Tietz <kai.tietz@onevision.com>
659 * io/unix.c (tempfile): Correct logic for mktemp case.
661 2010-04-06 Tobias Burnus <burnus@net-b.de>
664 * runtime/stop.c (error_stop_string): New function.
665 * gfortran.map (_gfortran_error_stop_string): Add.
667 2010-04-02 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
669 * Makefile.in: Regenerate.
670 * aclocal.m4: Regenerate.
672 2010-04-01 Janne Blomqvist <jb@gcc.gnu.org>
675 * io/intrinsics.c (gf_ftell): New function, seek to correct offset.
676 (ftell): Call gf_ftell.
677 (FTELL_SUB): Likewise.
679 2010-04-01 Paul Thomas <pault@gcc.gnu.org>
681 * io/transfer.c : Update copyright.
686 * io/inquire.c : ditto
687 * io/format.c : ditto
688 * io/list_read.c : ditto
689 * runtime/error.c : ditto
690 * libgfortran.h : ditto
691 * intrinsics/date_and_time.c: ditto
692 * intrinsics/args.c : ditto
694 2010-04-01 Janne Blomqvist <jb@gcc.gnu.org>
697 * io/intrinsics.c (ftell): Reset fbuf, correct offset.
698 (FTELL_SUB): Likewise.
700 2010-03-29 Jerry DeLisle <jvdelisle@gcc.gnu.org>
703 * io/transfer.c (next_record_r): Only call hit_eof for specific
704 conditions when an EOF is encountered.
706 2010-03-29 Tobias Burnus <burnus@net-b.de>
709 * io/unix.c (buf_write): Set physical_offset after lseek.
711 2010-03-25 Jerry DeLisle <jvdelisle@gcc.gnu.org>
714 * io/read.c (read_x): Return if seen EOR condition.
716 2010-03-21 Jerry DeLisle <jvdelisle@gcc.gnu.org>
719 * io/io.h: Fix type of size in st_parameter_inquire structure.
721 2010-03-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
724 * io/unix.h: Add prototype for new function to return file size.
725 * io/unix.c (file_size): New function.
726 * io/inquire.c (inquire_via_unit): Use new function.
727 (inquire_via_filename): Use new function.
729 2010-03-17 Jerry DeLisle <jvdelisle@gcc.gnu.org>
731 * io/transfer.c (read_sf_internal): Remove stray function declaration
732 used during debugging.
734 2010-03-17 Jerry DeLisle <jvdelisle@gcc.gnu.org>
737 * io/io.h: Delete prototype for read_sf, making it static.
738 * io/read.c (read_x): Modify to call hit_eof if PAD="no".
739 * io/transfer.c (read_sf_internal): New static function extracted from
740 read_sf for use on internal units only. Handle empty string case.
741 (read_sf): New factoring of this function, make it static. Add special
742 conditions for EOF based on ADVANCE="no", PAD="no", and whether any
743 bytes have been previously read from the record.
744 (read_block_form): Modify to call read_sf or read_sf_internal.
745 (next_record_r): Add a done flag similar to next_record_w. Call hit_eof
746 if internal array unit next record returns finished, meaning an EOF was
747 found and not done, ie not the last record expected. For external
748 units call hit_eof if item_count is 1 or there are no pending spaces.
749 (next_record): Update call to next_record_r.
751 2010-03-12 Kai Tietz <kai.tietz@onevision.com>
754 * io/format.c (parse_format_list): Add to ERROR, WARNING,
755 SILENT enumerators NOTIFICATION_ prefix.
756 * runtime/error.c (notification_std): Likewise.
757 * libgfortran.h (notification): Likewise.
758 (GFC_LARGEST_BUF): Check for HAVE_GFC_INTEGER_16.
760 2010-03-11 Tobias Burnus <burnus@net-b.de>
763 * io/list_read.c (nml_parse_qualifier): Disable expanded_read
766 2010-03-10 Jerry DeLisle <jvdelisle@gcc.gnu.org>
769 * io/transfer.c (next_record_r): Add hit_eof based on item_count
772 2010-03-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>
775 * io/read.c: Include fbuf.h and unix.h to enable lower level I/O for
776 read_x. (read_x): Replace the use of read_sf with equivalent lower level
777 I/O, eliminating unneeded code and handling EOF and EOR conditions.
778 * io/io.h: Revise prototype for read_sf.
779 * io/transfer.c (read_sf): Delete no_error parameter and all uses of it.
780 (read_block_form): Likewise.
781 (next_record_r): Delete wrong code call to hit_eof.
783 2010-03-08 Kai TIetz <kai.tietz@onevision.com>
786 * libgfortran.h (_POSIX): Define if __MINGW32__ is defined.
787 (gfc_printf): Define to gnu_printf for __MINGW32__ case,
788 otherwise to __printf__.
789 (gfc_strtof,gfc_strtod,gfc_strtold): Define for mingw case
790 to POSIX compatible converter functions.
791 (runtime_error): Use instead gfc_printf as formatter
793 (runtime_error_at): Likewise.
794 (runtime_warning_at): Likewise.
795 (st_printf): Likewise.
796 * intrinsics/date_and_time.c (localtime_r): Undefine
797 possible defined macro.
798 (gmtime_r): Likewise.
799 * io/read.c (convert_real): Use gfc_strtof, gfc_strtod,
802 2010-02-24 Jerry DeLisle <jvdelisle@gcc.gnu.org>
805 * io/transfer.c (require_type): Subtract one from item_count for output
806 of error message. Add comment before formatted_transfer function
807 explaining why the item_count is off by one.
809 2010-02-24 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
811 * io/write_float.def (WRITE_FLOAT): Use __builtin_signbit.
813 2010-02-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
815 * io/list_read.c (list_formatted_read_scalar): Remove duplicate code.
817 2010-02-09 Tobias Burnus <burnus@net-b.de>
820 * intrinsics/args.c (get_command_argument_i4): Always return
821 commandline-argument length for length parameter.
823 2010-02-06 Jerry DeLisle <jvdelisle@gcc.gnu.org>
826 * io/format.c (reset_fnode_counters): Use the correct pointer to the
827 head of the fnode list. (parse_format): Remove previous hack that set
828 limit on size of format string for caching.
830 2010-02-06 Jerry DeLisle <jvdelisle@gcc.gnu.org>
833 * io/transfer.c (read_sf): Handle EOR and EOF conditions for
834 ADVANCE="no" with PAD="yes" or PAD="no".
836 2010-02-03 Jerry DeLisle <jvdelisle@gcc.gnu.org>
839 * io/list_read.c (nml_get_obj_data): Add new qualifier flag, clean up
840 code, and adjust logic to set namelist info pointer correctly for array
841 qualifiers of derived type components.
843 2010-01-15 Jerry DeLisle <jvdelisle@gcc.gnu.org>
846 * io/format.c (parse_format): Set limit on size of format strings that
849 2010-01-05 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
851 * configure: Regenerate.
853 2010-01-03 Janne Blomqvist <jb@gcc.gnu.org>
856 * io/unix.c: Defines for MINGW stat and fstat.
857 (gfstat_t): New typedef.
858 (id_from_fd): Use gfstat_t instead of struct stat.
859 (fd_to_stream): Likewise.
860 (compare_file_filename): Likewise.
861 (find_file): Likewise.
862 (file_exists): Likewise.
863 (inquire_sequential): Likewise.
864 (inquire_direct): Likewise.
865 (inquire_formatted): Likewise.
868 Copyright (C) 2010 Free Software Foundation, Inc.
870 Copying and distribution of this file, with or without modification,
871 are permitted in any medium without royalty provided the copyright
872 notice and this notice are preserved.