OSDN Git Service

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