OSDN Git Service

2009-08-02 Jerry DeLisle <jvdelisle@gcc.gnu.org>
[pf3gnuchains/gcc-fork.git] / libgfortran / ChangeLog
1 2009-08-02  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2
3         PR libfortran/40853
4         * io/list_read.c (nml_get_obj_data): Do not set nl
5         pointer to first_nl if nl->next is NULL.
6
7 2009-07-31  Kaz Kojima  <kkojima@gcc.gnu.org>
8
9         * Makefile.am: Don't set SECTION_FLAGS with @SECTION_FLAGS@.
10         Don't set IEEE_FLAGS with @IEEE_FLAGS@.
11         * Makefile.in: Regenerate.
12
13 2009-07-30  Kaz Kojima  <kkojima@gcc.gnu.org>
14
15         * configure.host: Define ieee_flags and set it to -mieee for sh.
16         * configure.ac: Set IEEE_FLAGS with ieee_flags.
17         * Makefile.am: Add IEEE_FLAGS to AM_CFLAGS.
18         * configure: Regenerate.
19         * Makefile.in: Regenerate.
20
21 2009-07-30  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
22
23         * configure.ac (_AC_ARG_VAR_PRECIOUS): Use m4_rename_force.
24
25 2009-07-27  Tobias Burnus  <burnus@net-b.de>
26
27         PR fortran/40863
28         * c99_functions.c: Define complex I, if not defined.
29         Create prototypes for C99 functions to silence warnings.
30         * gfortran.map: Add missing functions to GFORTRAN_C99_1.0
31         and new GFORTRAN_C99_1.1.
32
33 2009-07-25  Tobias Burnus  <burnus@net-b.de>
34
35         PR fortran/33197
36         * intrinsics/c99_functions.c (cacosf,cacos,cacosl,casinf,
37         casin,casind,catanf,catan,catanl,cacoshf,cacosh,cacoshl,
38         casinhf,casinh,casinhf,catanhf,catanh,catanhl): New functions.
39         * c99_protos.h: Add prototypes for those.
40
41 2009-07-24  Jakub Jelinek  <jakub@redhat.com>
42
43         PR fortran/40643
44         PR fortran/31067
45         * libgfortran.h (GFC_REAL_4_INFINITY, GFC_REAL_8_INFINITY,
46         GFC_REAL_10_INFINITY, GFC_REAL_16_INFINITY, GFC_REAL_4_QUIET_NAN,
47         GFC_REAL_8_QUIET_NAN, GFC_REAL_10_QUIET_NAN, GFC_REAL_16_QUIET_NAN):
48         Define.
49         * m4/iparm.m4 (atype_inf, atype_nan): Define.
50         * m4/ifunction.m4: Formatting.
51         * m4/iforeach.m4: Likewise.
52         (START_FOREACH_FUNCTION): Initialize dest to all 1s, not all 0s.
53         (START_FOREACH_BLOCK, FINISH_FOREACH_FUNCTION,
54         FINISH_MASKED_FOREACH_FUNCTION): Run foreach block inside a loop
55         until count[0] == extent[0].
56         * m4/minval.m4: Formatting.  Handle NaNs and infinities.  Optimize.
57         * m4/maxval.m4: Likewise.
58         * m4/minloc0.m4: Likewise.
59         * m4/maxloc0.m4: Likewise.
60         * m4/minloc1.m4: Likewise.
61         * m4/maxloc1.m4: Likewise.
62         * generated/maxloc0_16_i16.c: Regenerated.
63         * generated/maxloc0_16_i1.c: Likewise.
64         * generated/maxloc0_16_i2.c: Likewise.
65         * generated/maxloc0_16_i4.c: Likewise.
66         * generated/maxloc0_16_i8.c: Likewise.
67         * generated/maxloc0_16_r10.c: Likewise.
68         * generated/maxloc0_16_r16.c: Likewise.
69         * generated/maxloc0_16_r4.c: Likewise.
70         * generated/maxloc0_16_r8.c: Likewise.
71         * generated/maxloc0_4_i16.c: Likewise.
72         * generated/maxloc0_4_i1.c: Likewise.
73         * generated/maxloc0_4_i2.c: Likewise.
74         * generated/maxloc0_4_i4.c: Likewise.
75         * generated/maxloc0_4_i8.c: Likewise.
76         * generated/maxloc0_4_r10.c: Likewise.
77         * generated/maxloc0_4_r16.c: Likewise.
78         * generated/maxloc0_4_r4.c: Likewise.
79         * generated/maxloc0_4_r8.c: Likewise.
80         * generated/maxloc0_8_i16.c: Likewise.
81         * generated/maxloc0_8_i1.c: Likewise.
82         * generated/maxloc0_8_i2.c: Likewise.
83         * generated/maxloc0_8_i4.c: Likewise.
84         * generated/maxloc0_8_i8.c: Likewise.
85         * generated/maxloc0_8_r10.c: Likewise.
86         * generated/maxloc0_8_r16.c: Likewise.
87         * generated/maxloc0_8_r4.c: Likewise.
88         * generated/maxloc0_8_r8.c: Likewise.
89         * generated/maxloc1_16_i16.c: Likewise.
90         * generated/maxloc1_16_i1.c: Likewise.
91         * generated/maxloc1_16_i2.c: Likewise.
92         * generated/maxloc1_16_i4.c: Likewise.
93         * generated/maxloc1_16_i8.c: Likewise.
94         * generated/maxloc1_16_r10.c: Likewise.
95         * generated/maxloc1_16_r16.c: Likewise.
96         * generated/maxloc1_16_r4.c: Likewise.
97         * generated/maxloc1_16_r8.c: Likewise.
98         * generated/maxloc1_4_i16.c: Likewise.
99         * generated/maxloc1_4_i1.c: Likewise.
100         * generated/maxloc1_4_i2.c: Likewise.
101         * generated/maxloc1_4_i4.c: Likewise.
102         * generated/maxloc1_4_i8.c: Likewise.
103         * generated/maxloc1_4_r10.c: Likewise.
104         * generated/maxloc1_4_r16.c: Likewise.
105         * generated/maxloc1_4_r4.c: Likewise.
106         * generated/maxloc1_4_r8.c: Likewise.
107         * generated/maxloc1_8_i16.c: Likewise.
108         * generated/maxloc1_8_i1.c: Likewise.
109         * generated/maxloc1_8_i2.c: Likewise.
110         * generated/maxloc1_8_i4.c: Likewise.
111         * generated/maxloc1_8_i8.c: Likewise.
112         * generated/maxloc1_8_r10.c: Likewise.
113         * generated/maxloc1_8_r16.c: Likewise.
114         * generated/maxloc1_8_r4.c: Likewise.
115         * generated/maxloc1_8_r8.c: Likewise.
116         * generated/maxval_i16.c: Likewise.
117         * generated/maxval_i1.c: Likewise.
118         * generated/maxval_i2.c: Likewise.
119         * generated/maxval_i4.c: Likewise.
120         * generated/maxval_i8.c: Likewise.
121         * generated/maxval_r10.c: Likewise.
122         * generated/maxval_r16.c: Likewise.
123         * generated/maxval_r4.c: Likewise.
124         * generated/maxval_r8.c: Likewise.
125         * generated/minloc0_16_i16.c: Likewise.
126         * generated/minloc0_16_i1.c: Likewise.
127         * generated/minloc0_16_i2.c: Likewise.
128         * generated/minloc0_16_i4.c: Likewise.
129         * generated/minloc0_16_i8.c: Likewise.
130         * generated/minloc0_16_r10.c: Likewise.
131         * generated/minloc0_16_r16.c: Likewise.
132         * generated/minloc0_16_r4.c: Likewise.
133         * generated/minloc0_16_r8.c: Likewise.
134         * generated/minloc0_4_i16.c: Likewise.
135         * generated/minloc0_4_i1.c: Likewise.
136         * generated/minloc0_4_i2.c: Likewise.
137         * generated/minloc0_4_i4.c: Likewise.
138         * generated/minloc0_4_i8.c: Likewise.
139         * generated/minloc0_4_r10.c: Likewise.
140         * generated/minloc0_4_r16.c: Likewise.
141         * generated/minloc0_4_r4.c: Likewise.
142         * generated/minloc0_4_r8.c: Likewise.
143         * generated/minloc0_8_i16.c: Likewise.
144         * generated/minloc0_8_i1.c: Likewise.
145         * generated/minloc0_8_i2.c: Likewise.
146         * generated/minloc0_8_i4.c: Likewise.
147         * generated/minloc0_8_i8.c: Likewise.
148         * generated/minloc0_8_r10.c: Likewise.
149         * generated/minloc0_8_r16.c: Likewise.
150         * generated/minloc0_8_r4.c: Likewise.
151         * generated/minloc0_8_r8.c: Likewise.
152         * generated/minloc1_16_i16.c: Likewise.
153         * generated/minloc1_16_i1.c: Likewise.
154         * generated/minloc1_16_i2.c: Likewise.
155         * generated/minloc1_16_i4.c: Likewise.
156         * generated/minloc1_16_i8.c: Likewise.
157         * generated/minloc1_16_r10.c: Likewise.
158         * generated/minloc1_16_r16.c: Likewise.
159         * generated/minloc1_16_r4.c: Likewise.
160         * generated/minloc1_16_r8.c: Likewise.
161         * generated/minloc1_4_i16.c: Likewise.
162         * generated/minloc1_4_i1.c: Likewise.
163         * generated/minloc1_4_i2.c: Likewise.
164         * generated/minloc1_4_i4.c: Likewise.
165         * generated/minloc1_4_i8.c: Likewise.
166         * generated/minloc1_4_r10.c: Likewise.
167         * generated/minloc1_4_r16.c: Likewise.
168         * generated/minloc1_4_r4.c: Likewise.
169         * generated/minloc1_4_r8.c: Likewise.
170         * generated/minloc1_8_i16.c: Likewise.
171         * generated/minloc1_8_i1.c: Likewise.
172         * generated/minloc1_8_i2.c: Likewise.
173         * generated/minloc1_8_i4.c: Likewise.
174         * generated/minloc1_8_i8.c: Likewise.
175         * generated/minloc1_8_r10.c: Likewise.
176         * generated/minloc1_8_r16.c: Likewise.
177         * generated/minloc1_8_r4.c: Likewise.
178         * generated/minloc1_8_r8.c: Likewise.
179         * generated/minval_i16.c: Likewise.
180         * generated/minval_i1.c: Likewise.
181         * generated/minval_i2.c: Likewise.
182         * generated/minval_i4.c: Likewise.
183         * generated/minval_i8.c: Likewise.
184         * generated/minval_r10.c: Likewise.
185         * generated/minval_r16.c: Likewise.
186         * generated/minval_r4.c: Likewise.
187         * generated/minval_r8.c: Likewise.
188         * generated/product_c10.c: Likewise.
189         * generated/product_c16.c: Likewise.
190         * generated/product_c4.c: Likewise.
191         * generated/product_c8.c: Likewise.
192         * generated/product_i16.c: Likewise.
193         * generated/product_i1.c: Likewise.
194         * generated/product_i2.c: Likewise.
195         * generated/product_i4.c: Likewise.
196         * generated/product_i8.c: Likewise.
197         * generated/product_r10.c: Likewise.
198         * generated/product_r16.c: Likewise.
199         * generated/product_r4.c: Likewise.
200         * generated/product_r8.c: Likewise.
201         * generated/sum_c10.c: Likewise.
202         * generated/sum_c16.c: Likewise.
203         * generated/sum_c4.c: Likewise.
204         * generated/sum_c8.c: Likewise.
205         * generated/sum_i16.c: Likewise.
206         * generated/sum_i1.c: Likewise.
207         * generated/sum_i2.c: Likewise.
208         * generated/sum_i4.c: Likewise.
209         * generated/sum_i8.c: Likewise.
210         * generated/sum_r10.c: Likewise.
211         * generated/sum_r16.c: Likewise.
212         * generated/sum_r4.c: Likewise.
213         * generated/sum_r8.c: Likewise.
214
215 2009-07-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
216
217         PR libfortran/32784
218         * unix.c (regular_file): Check for CONIN$ CONOUT$, and CONERR$ and open
219         the respective /dev/conin or /dev/conout devices.  This is Cygwin
220         specific.
221
222 2009-07-19  Thomas Koenig  <tkoenig@gcc.gnu.org>
223
224         PR libfortran/34670
225         PR libfortran/36874
226         * Makefile.am:  Add bounds.c
227         * libgfortran.h (bounds_equal_extents):  Add prototype.
228         (bounds_iforeach_return):  Likewise.
229         (bounds_ifunction_return):  Likewise.
230         (bounds_reduced_extents):  Likewise.
231         * runtime/bounds.c:  New file.
232         (bounds_iforeach_return):  New function; correct typo in
233         error message.
234         (bounds_ifunction_return):  New function.
235         (bounds_equal_extents):  New function.
236         (bounds_reduced_extents):  Likewise.
237         * intrinsics/cshift0.c (cshift0):  Use new functions
238         for bounds checking.
239         * intrinsics/eoshift0.c (eoshift0):  Likewise.
240         * intrinsics/eoshift2.c (eoshift2):  Likewise.
241         * m4/iforeach.m4:  Likewise.
242         * m4/eoshift1.m4:  Likewise.
243         * m4/eoshift3.m4:  Likewise.
244         * m4/cshift1.m4:  Likewise.
245         * m4/ifunction.m4:  Likewise.
246         * Makefile.in:  Regenerated.
247         * generated/cshift1_16.c: Regenerated.
248         * generated/cshift1_4.c: Regenerated.
249         * generated/cshift1_8.c: Regenerated.
250         * generated/eoshift1_16.c: Regenerated.
251         * generated/eoshift1_4.c: Regenerated.
252         * generated/eoshift1_8.c: Regenerated.
253         * generated/eoshift3_16.c: Regenerated.
254         * generated/eoshift3_4.c: Regenerated.
255         * generated/eoshift3_8.c: Regenerated.
256         * generated/maxloc0_16_i1.c: Regenerated.
257         * generated/maxloc0_16_i16.c: Regenerated.
258         * generated/maxloc0_16_i2.c: Regenerated.
259         * generated/maxloc0_16_i4.c: Regenerated.
260         * generated/maxloc0_16_i8.c: Regenerated.
261         * generated/maxloc0_16_r10.c: Regenerated.
262         * generated/maxloc0_16_r16.c: Regenerated.
263         * generated/maxloc0_16_r4.c: Regenerated.
264         * generated/maxloc0_16_r8.c: Regenerated.
265         * generated/maxloc0_4_i1.c: Regenerated.
266         * generated/maxloc0_4_i16.c: Regenerated.
267         * generated/maxloc0_4_i2.c: Regenerated.
268         * generated/maxloc0_4_i4.c: Regenerated.
269         * generated/maxloc0_4_i8.c: Regenerated.
270         * generated/maxloc0_4_r10.c: Regenerated.
271         * generated/maxloc0_4_r16.c: Regenerated.
272         * generated/maxloc0_4_r4.c: Regenerated.
273         * generated/maxloc0_4_r8.c: Regenerated.
274         * generated/maxloc0_8_i1.c: Regenerated.
275         * generated/maxloc0_8_i16.c: Regenerated.
276         * generated/maxloc0_8_i2.c: Regenerated.
277         * generated/maxloc0_8_i4.c: Regenerated.
278         * generated/maxloc0_8_i8.c: Regenerated.
279         * generated/maxloc0_8_r10.c: Regenerated.
280         * generated/maxloc0_8_r16.c: Regenerated.
281         * generated/maxloc0_8_r4.c: Regenerated.
282         * generated/maxloc0_8_r8.c: Regenerated.
283         * generated/maxloc1_16_i1.c: Regenerated.
284         * generated/maxloc1_16_i16.c: Regenerated.
285         * generated/maxloc1_16_i2.c: Regenerated.
286         * generated/maxloc1_16_i4.c: Regenerated.
287         * generated/maxloc1_16_i8.c: Regenerated.
288         * generated/maxloc1_16_r10.c: Regenerated.
289         * generated/maxloc1_16_r16.c: Regenerated.
290         * generated/maxloc1_16_r4.c: Regenerated.
291         * generated/maxloc1_16_r8.c: Regenerated.
292         * generated/maxloc1_4_i1.c: Regenerated.
293         * generated/maxloc1_4_i16.c: Regenerated.
294         * generated/maxloc1_4_i2.c: Regenerated.
295         * generated/maxloc1_4_i4.c: Regenerated.
296         * generated/maxloc1_4_i8.c: Regenerated.
297         * generated/maxloc1_4_r10.c: Regenerated.
298         * generated/maxloc1_4_r16.c: Regenerated.
299         * generated/maxloc1_4_r4.c: Regenerated.
300         * generated/maxloc1_4_r8.c: Regenerated.
301         * generated/maxloc1_8_i1.c: Regenerated.
302         * generated/maxloc1_8_i16.c: Regenerated.
303         * generated/maxloc1_8_i2.c: Regenerated.
304         * generated/maxloc1_8_i4.c: Regenerated.
305         * generated/maxloc1_8_i8.c: Regenerated.
306         * generated/maxloc1_8_r10.c: Regenerated.
307         * generated/maxloc1_8_r16.c: Regenerated.
308         * generated/maxloc1_8_r4.c: Regenerated.
309         * generated/maxloc1_8_r8.c: Regenerated.
310         * generated/maxval_i1.c: Regenerated.
311         * generated/maxval_i16.c: Regenerated.
312         * generated/maxval_i2.c: Regenerated.
313         * generated/maxval_i4.c: Regenerated.
314         * generated/maxval_i8.c: Regenerated.
315         * generated/maxval_r10.c: Regenerated.
316         * generated/maxval_r16.c: Regenerated.
317         * generated/maxval_r4.c: Regenerated.
318         * generated/maxval_r8.c: Regenerated.
319         * generated/minloc0_16_i1.c: Regenerated.
320         * generated/minloc0_16_i16.c: Regenerated.
321         * generated/minloc0_16_i2.c: Regenerated.
322         * generated/minloc0_16_i4.c: Regenerated.
323         * generated/minloc0_16_i8.c: Regenerated.
324         * generated/minloc0_16_r10.c: Regenerated.
325         * generated/minloc0_16_r16.c: Regenerated.
326         * generated/minloc0_16_r4.c: Regenerated.
327         * generated/minloc0_16_r8.c: Regenerated.
328         * generated/minloc0_4_i1.c: Regenerated.
329         * generated/minloc0_4_i16.c: Regenerated.
330         * generated/minloc0_4_i2.c: Regenerated.
331         * generated/minloc0_4_i4.c: Regenerated.
332         * generated/minloc0_4_i8.c: Regenerated.
333         * generated/minloc0_4_r10.c: Regenerated.
334         * generated/minloc0_4_r16.c: Regenerated.
335         * generated/minloc0_4_r4.c: Regenerated.
336         * generated/minloc0_4_r8.c: Regenerated.
337         * generated/minloc0_8_i1.c: Regenerated.
338         * generated/minloc0_8_i16.c: Regenerated.
339         * generated/minloc0_8_i2.c: Regenerated.
340         * generated/minloc0_8_i4.c: Regenerated.
341         * generated/minloc0_8_i8.c: Regenerated.
342         * generated/minloc0_8_r10.c: Regenerated.
343         * generated/minloc0_8_r16.c: Regenerated.
344         * generated/minloc0_8_r4.c: Regenerated.
345         * generated/minloc0_8_r8.c: Regenerated.
346         * generated/minloc1_16_i1.c: Regenerated.
347         * generated/minloc1_16_i16.c: Regenerated.
348         * generated/minloc1_16_i2.c: Regenerated.
349         * generated/minloc1_16_i4.c: Regenerated.
350         * generated/minloc1_16_i8.c: Regenerated.
351         * generated/minloc1_16_r10.c: Regenerated.
352         * generated/minloc1_16_r16.c: Regenerated.
353         * generated/minloc1_16_r4.c: Regenerated.
354         * generated/minloc1_16_r8.c: Regenerated.
355         * generated/minloc1_4_i1.c: Regenerated.
356         * generated/minloc1_4_i16.c: Regenerated.
357         * generated/minloc1_4_i2.c: Regenerated.
358         * generated/minloc1_4_i4.c: Regenerated.
359         * generated/minloc1_4_i8.c: Regenerated.
360         * generated/minloc1_4_r10.c: Regenerated.
361         * generated/minloc1_4_r16.c: Regenerated.
362         * generated/minloc1_4_r4.c: Regenerated.
363         * generated/minloc1_4_r8.c: Regenerated.
364         * generated/minloc1_8_i1.c: Regenerated.
365         * generated/minloc1_8_i16.c: Regenerated.
366         * generated/minloc1_8_i2.c: Regenerated.
367         * generated/minloc1_8_i4.c: Regenerated.
368         * generated/minloc1_8_i8.c: Regenerated.
369         * generated/minloc1_8_r10.c: Regenerated.
370         * generated/minloc1_8_r16.c: Regenerated.
371         * generated/minloc1_8_r4.c: Regenerated.
372         * generated/minloc1_8_r8.c: Regenerated.
373         * generated/minval_i1.c: Regenerated.
374         * generated/minval_i16.c: Regenerated.
375         * generated/minval_i2.c: Regenerated.
376         * generated/minval_i4.c: Regenerated.
377         * generated/minval_i8.c: Regenerated.
378         * generated/minval_r10.c: Regenerated.
379         * generated/minval_r16.c: Regenerated.
380         * generated/minval_r4.c: Regenerated.
381         * generated/minval_r8.c: Regenerated.
382         * generated/product_c10.c: Regenerated.
383         * generated/product_c16.c: Regenerated.
384         * generated/product_c4.c: Regenerated.
385         * generated/product_c8.c: Regenerated.
386         * generated/product_i1.c: Regenerated.
387         * generated/product_i16.c: Regenerated.
388         * generated/product_i2.c: Regenerated.
389         * generated/product_i4.c: Regenerated.
390         * generated/product_i8.c: Regenerated.
391         * generated/product_r10.c: Regenerated.
392         * generated/product_r16.c: Regenerated.
393         * generated/product_r4.c: Regenerated.
394         * generated/product_r8.c: Regenerated.
395         * generated/sum_c10.c: Regenerated.
396         * generated/sum_c16.c: Regenerated.
397         * generated/sum_c4.c: Regenerated.
398         * generated/sum_c8.c: Regenerated.
399         * generated/sum_i1.c: Regenerated.
400         * generated/sum_i16.c: Regenerated.
401         * generated/sum_i2.c: Regenerated.
402         * generated/sum_i4.c: Regenerated.
403         * generated/sum_i8.c: Regenerated.
404         * generated/sum_r10.c: Regenerated.
405         * generated/sum_r16.c: Regenerated.
406         * generated/sum_r4.c: Regenerated.
407         * generated/sum_r8.c: Regenerated.
408
409 2009-07-17  Janne Blomqvist  <jb@gcc.gnu.org>
410             Jerry DeLisle  <jvdelisle@gcc.gnu.org>
411                 
412         PR libfortran/40714
413         * io/transfer.c (finalize_transfer): Set current_record to 0
414         before returning in case of error.
415
416 2009-07-12  Tobias Burnus  <burnus@net-b.de>
417
418         PR libfortran/22423
419         * io/io.h (namelist_type): Use the proper enum for GFC_DTYPE_*.
420         * intrinsics/iso_c_binding.c (c_f_pointer_u0): Make sure
421         variable is initialized to silence warning.
422
423 2009-07-10  Steven G. Kargl  <kargl@gcc.gnu.org>
424
425         * c99_functions.c (ccoshf, ccosh, ccoshl, ctanhf, ctanh, ctanl):
426         Fix errant minus.
427
428 2009-07-08  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
429
430         PR libfortran/40330
431         PR libfortran/40662
432         * io/io.h (st_parameter_dt): Define format_not_saved bit used to signal
433         whether the parsed format data was previously saved. Used to determine
434         if the current format data should be freed or not.
435         * io/transfer.c (st_read_done): Use the format_not_saved bit.
436         (st_write_done): Likewise.
437         * io/format.c (parse_format_list): Add boolean pointer to arg list. This
438         pointer is used to return status to the caller regarding whether it is
439         safe to cache the parsed format data.  Currently, if a FMT_STRING token
440         is encounetered, it is not safe to cache. Also, added a local boolean
441         variable to hold this information as recursive calls to
442         parse_format_list are made.  Remove previous save_format logic.
443         (parse_format): Do not use the format caching facility if the current
444         unit is an internal unit or if it is not safe to save parsed format
445         data.
446         
447 2009-06-29  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
448
449         PR libfortran/40576
450         * io/transfer.c (sset): Adjust exit condition for loop.
451
452 2009-06-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
453
454         PR libfortran/40508
455         * io/format.c: Don't save parsed format data for internal units.
456
457 2009-06-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
458
459         PR fortran/37577
460         Port from fortran-dev
461         * runtime/in_pack_generic (internal_pack):  Remove unnecessary
462         test for stride == 0.
463         * runtime/in_unpack_generic.c (internal_unpack):  Likewise.
464         * intrinsics/iso_c_binding.c (c_f_pointer_u0):  Take care
465         of stride in "shape" argument.  Use array access macros for
466         accessing array descriptors.
467         * libgfortran.h (struct descriptor_dimension):  Change stride
468         to _stride, lbound to _lbound and ubound to _ubound.
469         (GFC_DIMENSION_LBOUND):  Use new name(s) in struct
470         descriptor_dimension.
471         (GFC_DIMENSION_UBOUND):  Likewise.
472         (GFC_DIMENSION_STRIDE):  Likewise.
473         (GFC_DIMENSION_EXTENT):  Likewise.
474         (GFC_DIMENSION_SET):  Likewise.
475         (GFC_DESCRIPTOR_LBOUND):  Likewise.
476         (GFC_DESCRIPTOR_UBOUND):  Likewise.
477         (GFC_DESCRIPTOR_EXTENT):  Likewise.
478         (GFC_DESCRIPTOR_STRIDE):  Likewise.
479         * io/transfer.c (transfer_array):  Use array access macros.
480         Use byte-sized strides.
481         * intrinsics/eoshift0.c (eoshift0):  Use array access
482         macros everywhere.
483         * m4/in_pack.m4 (internal_pack_'rtype_ccode`):  Use
484         array access macros for accessing array descriptors.
485         * m4/in_unpack.m4 (internal_unpack_'rtype_ccode`):
486         Likewise.
487         * m4/matmull.m4 (matmul_'rtype_code`):  Likewise.
488         * m4/matmul.m4 (matmul_'rtype_code`):  Likewise.
489         * m4/unpack.m4 (unpack0_'rtype_code`):  Likewise.
490         (unpack1_'rtype_code`):  Likewise.
491         * m4/ifunction_logical.m4 (name`'rtype_qual`_'atype_code): Likewise.
492         * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): Use array access
493         macros everywhere.
494                 * intrinsics/dtime.c (dtime_sub):  Use array access macros
495         for accessing array descriptors.
496         * intrinsics/cshift0 (cshift0):  Likewise.
497         * intrinsics/etime.c:  Likewise.  Remove redundant calculation
498         of rdim.
499         * m4/cshift0.m4 (cshift0_'rtype_code`):  Use array access macros
500         for accessing array descriptors.
501         * m4/pack.m4 (pack_'rtype_code`):  Likewise.
502         * m4/spread.m4 (spread_'rtype_code`):  Likewise.
503         (spread_scalar_'rtype_code`):  Likewise.
504         * m4/transpose.m4 (transpose_'rtype_code`):  Likewise.
505         * m4/iforeach.m4 (name`'rtype_qual`_'atype_code):  Likewise.
506         * m4/eoshift1.m4 (eoshift1):  Likewise.  Remove size argument,
507         calculate within function.
508         (eoshift1_'atype_kind`):  Remove size argument from call
509         to eoshift1.
510         (eoshift1_'atype_kind`_char):  Likewise.
511         (eoshift1_'atype_kind`_char4):  Likewise.
512         * m4/eoshift3.m4 (eoshift3):  Remove size argument, calculate
513         within function. Use array access macros for accessing array
514         descriptors.
515         (eoshift3_'atype_kind`):  Remove size argument from call
516         to eoshift1.
517         (eoshift3_'atype_kind`_char):  Likewise.
518         (eoshift3_'atype_kind`_char4):  Likewise.
519         * m4/shape.m4 (shape_'rtype_kind`):  Use array access macros
520         for accessing array descriptors.
521         * m4/cshift1.m4 (cshift1): Remove size argument, calculate
522         within function. Use array access macros for accessing array
523         descriptors.
524         (cshift1_'atype_kind`):  Remove size argument from call to
525         cshift1.
526         (cshift1_'atype_kind`_char):  Remove size argument from call to
527         cshift1.
528         (cshift1_'atype_kind`_char4):  Remove size argument from call to
529         cshift1.
530         * m4/reshape.m4 (reshape_'rtype_ccode`):  Use array access macros
531         for accessing array descriptors.
532         * m4/ifunction.m4 (name`'rtype_qual`_'atype_code):  Likewise.
533         * intrinsics/pack_generic.c (pack_internal):  Use array access
534         macros for accessing array descriptors.
535         (pack_s_internal):  Likewise.
536         * intrinsics/transpose_generic.c (transpose_internal):  Remove
537         size argument, calculate from array descriptor. Use array
538         access macros for accessing array descriptors.
539         (transpose):  Remove size argument from call.
540         (transpoe_char):  Likewise.
541         (transpose_char4):  Likewise.
542         * intrinsics/move_alloc.c (move_alloc):  Use array access macros
543         for accessing array descriptors.
544         * intrinsics/spread_generic.c (spread_internal):  Remove size
545         argument, calculate from array descriptor.  Use array access
546         macros for accessing array descriptors.
547         (spread_internal_scalar):  Likewise.
548         (spread):  Remove size argument from call to spread_internal.
549         (spread_char):  Mark argument source_length as unused.
550         Remove size argument from call to spread_internal.
551         (spread_char4):  Likewise.
552         (spread_char_scalar):  Likewise.
553         (spread_char4_scalar):  Likewise.
554         * intrinsics/unpack_generic.c (unpack_internal):  Use array access
555         macros for accessing array descriptors.
556         * intrinsics/eoshift2.c (eoshift2):  Remove size argument, calculate
557         from array descriptor instead.  Use array access macros for
558         accessing array descriptors.
559         (eoshift2_##N):  Remove size argument from call to eoshift2.
560         (eoshift2_##N_##char):  Likewise.
561         (eoshift2_##N_##char4):  Likewise.
562         * intrinsics/reshape_generic.c (reshape_internal):  Use array
563         access macross for accessing array descriptors.
564         * libgfortran.h:  Introduce new macros GFC_DIMENSION_LBOUND,
565         GFC_DIMENSION_UBOUND,GFC_DIMENSION_STRIDE, GFC_DIMENSION_EXTENT,
566         GFC_DIMENSION_SET, GFC_DESCRIPTOR_LBOUND, GFC_DESCRIPTOR_UBOUND,
567         GFC_DESCRIPTOR_EXTENT, GFC_DESCRIPTOR_EXTENT_BYTES,
568         GFC_DESCRIPTOR_STRIDE, GFC_DESCRIPTOR_STRIDE_BYTES
569         * runtime/in_pack_generic.c (internal_pack):  Use new macros
570         for array descriptor access.
571         * runtime/in_unpack_generic.c (internal_unpack):  Likewise.
572         * intrinsics/dtime.c (dtime_sub):  Likewise.
573         * intrinsics/cshift0 (cshift0):  Remove argument size,
574         calculate directly from the array descriptor.  Use new macros
575         for array descriptor access.
576         * cshift0_##N:  Remove shift argument in call to cshift0.
577         * cshift0_##N_char:  Mark array_length as unused.  Remove
578         array_length in call to cshift0.
579         * cshift0_##N_char4:  Likewise.
580         * intrisics/etime.c:  Use new macros for array descriptor access.
581         * intrinsics/stat.c (stat_i4_sub_0):  Likewise.
582         (stat_i8_sub_0):  Likewise.
583         (fstat_i4_sub):  Likewise.
584         (fstat_i8_sub):  Likewise.
585         * intrinsics/date_and_time.c (date_and_time):  Likewise.
586         (secnds):  Likewise.
587         (itime_i4):  Likewise.
588         (itime_i8):  Likewise.
589         (idate_i4):  Likewise.
590         (idate_i8):  Likewise.
591         (gmtime_i4):  Likewise.
592         (gmtime_i8):  Likewise.
593         (ltime_i4):  Likewise.
594         (litme_i8):  Likewise.
595         * intrinsics/associated.c (associated):  Likewise.
596         * intrinsics/eoshift0.c (eoshift0):  Likewise.
597         * intriniscs/size.c (size0):  Likewise.
598         * intrinsics/random.c (arandom_r4):  Likewise.
599         (arandom_r8):  Likewise.
600         (arandom_r10):  Likewise.
601         (arandom_r16):  Likewise.
602         (random_seed_i4):  Likewise.
603         (random_seed_i8):  Likewise.
604         * io/list_read.c (nml_parse_qualifier):  Likewise.
605         (nml_touch_nodes):  Likewise.
606         (nml_read_obj):  Likewise.
607         (get_name):  Likewise.
608         * io/transfer.c (transfer_array):  Likewise.
609         (init_loop_spec):  Likewise.
610         (st_set_nml_var_dim):  Likewise.
611         * io/write.c (nml_write_obj):  Likewise.
612         (obj_loop):  Likewise.
613         * generated/all_l1.c: Regenerated.
614         * generated/all_l16.c: Regenerated.
615         * generated/all_l2.c: Regenerated.
616         * generated/all_l4.c: Regenerated.
617         * generated/all_l8.c: Regenerated.
618         * generated/any_l1.c: Regenerated.
619         * generated/any_l16.c: Regenerated.
620         * generated/any_l2.c: Regenerated.
621         * generated/any_l4.c: Regenerated.
622         * generated/any_l8.c: Regenerated.
623         * generated/count_16_l.c: Regenerated.
624         * generated/count_1_l.c: Regenerated.
625         * generated/count_2_l.c: Regenerated.
626         * generated/count_4_l.c: Regenerated.
627         * generated/count_8_l.c: Regenerated.
628         * generated/cshift0_c10.c: Regenerated.
629         * generated/cshift0_c16.c: Regenerated.
630         * generated/cshift0_c4.c: Regenerated.
631         * generated/cshift0_c8.c: Regenerated.
632         * generated/cshift0_i1.c: Regenerated.
633         * generated/cshift0_i16.c: Regenerated.
634         * generated/cshift0_i2.c: Regenerated.
635         * generated/cshift0_i4.c: Regenerated.
636         * generated/cshift0_i8.c: Regenerated.
637         * generated/cshift0_r10.c: Regenerated.
638         * generated/cshift0_r16.c: Regenerated.
639         * generated/cshift0_r4.c: Regenerated.
640         * generated/cshift0_r8.c: Regenerated.
641         * generated/cshift1_16.c: Regenerated.
642         * generated/cshift1_4.c: Regenerated.
643         * generated/cshift1_8.c: Regenerated.
644         * generated/eoshift1_16.c: Regenerated.
645         * generated/eoshift1_4.c: Regenerated.
646         * generated/eoshift1_8.c: Regenerated.
647         * generated/eoshift3_16.c: Regenerated.
648         * generated/eoshift3_4.c: Regenerated.
649         * generated/eoshift3_8.c: Regenerated.
650         * generated/in_pack_c10.c: Regenerated.
651         * generated/in_pack_c16.c: Regenerated.
652         * generated/in_pack_c4.c: Regenerated.
653         * generated/in_pack_c8.c: Regenerated.
654         * generated/in_pack_i1.c: Regenerated.
655         * generated/in_pack_i16.c: Regenerated.
656         * generated/in_pack_i2.c: Regenerated.
657         * generated/in_pack_i4.c: Regenerated.
658         * generated/in_pack_i8.c: Regenerated.
659         * generated/in_pack_r10.c: Regenerated.
660         * generated/in_pack_r16.c: Regenerated.
661         * generated/in_pack_r4.c: Regenerated.
662         * generated/in_pack_r8.c: Regenerated.
663         * generated/in_unpack_c10.c: Regenerated.
664         * generated/in_unpack_c16.c: Regenerated.
665         * generated/in_unpack_c4.c: Regenerated.
666         * generated/in_unpack_c8.c: Regenerated.
667         * generated/in_unpack_i1.c: Regenerated.
668         * generated/in_unpack_i16.c: Regenerated.
669         * generated/in_unpack_i2.c: Regenerated.
670         * generated/in_unpack_i4.c: Regenerated.
671         * generated/in_unpack_i8.c: Regenerated.
672         * generated/in_unpack_r10.c: Regenerated.
673         * generated/in_unpack_r16.c: Regenerated.
674         * generated/in_unpack_r4.c: Regenerated.
675         * generated/in_unpack_r8.c: Regenerated.
676         * generated/matmul_c10.c: Regenerated.
677         * generated/matmul_c16.c: Regenerated.
678         * generated/matmul_c4.c: Regenerated.
679         * generated/matmul_c8.c: Regenerated.
680         * generated/matmul_i1.c: Regenerated.
681         * generated/matmul_i16.c: Regenerated.
682         * generated/matmul_i2.c: Regenerated.
683         * generated/matmul_i4.c: Regenerated.
684         * generated/matmul_i8.c: Regenerated.
685         * generated/matmul_l16.c: Regenerated.
686         * generated/matmul_l4.c: Regenerated.
687         * generated/matmul_l8.c: Regenerated.
688         * generated/matmul_r10.c: Regenerated.
689         * generated/matmul_r16.c: Regenerated.
690         * generated/matmul_r4.c: Regenerated.
691         * generated/matmul_r8.c: Regenerated.
692         * generated/maxloc0_16_i1.c: Regenerated.
693         * generated/maxloc0_16_i16.c: Regenerated.
694         * generated/maxloc0_16_i2.c: Regenerated.
695         * generated/maxloc0_16_i4.c: Regenerated.
696         * generated/maxloc0_16_i8.c: Regenerated.
697         * generated/maxloc0_16_r10.c: Regenerated.
698         * generated/maxloc0_16_r16.c: Regenerated.
699         * generated/maxloc0_16_r4.c: Regenerated.
700         * generated/maxloc0_16_r8.c: Regenerated.
701         * generated/maxloc0_4_i1.c: Regenerated.
702         * generated/maxloc0_4_i16.c: Regenerated.
703         * generated/maxloc0_4_i2.c: Regenerated.
704         * generated/maxloc0_4_i4.c: Regenerated.
705         * generated/maxloc0_4_i8.c: Regenerated.
706         * generated/maxloc0_4_r10.c: Regenerated.
707         * generated/maxloc0_4_r16.c: Regenerated.
708         * generated/maxloc0_4_r4.c: Regenerated.
709         * generated/maxloc0_4_r8.c: Regenerated.
710         * generated/maxloc0_8_i1.c: Regenerated.
711         * generated/maxloc0_8_i16.c: Regenerated.
712         * generated/maxloc0_8_i2.c: Regenerated.
713         * generated/maxloc0_8_i4.c: Regenerated.
714         * generated/maxloc0_8_i8.c: Regenerated.
715         * generated/maxloc0_8_r10.c: Regenerated.
716         * generated/maxloc0_8_r16.c: Regenerated.
717         * generated/maxloc0_8_r4.c: Regenerated.
718         * generated/maxloc0_8_r8.c: Regenerated.
719         * generated/maxloc1_16_i1.c: Regenerated.
720         * generated/maxloc1_16_i16.c: Regenerated.
721         * generated/maxloc1_16_i2.c: Regenerated.
722         * generated/maxloc1_16_i4.c: Regenerated.
723         * generated/maxloc1_16_i8.c: Regenerated.
724         * generated/maxloc1_16_r10.c: Regenerated.
725         * generated/maxloc1_16_r16.c: Regenerated.
726         * generated/maxloc1_16_r4.c: Regenerated.
727         * generated/maxloc1_16_r8.c: Regenerated.
728         * generated/maxloc1_4_i1.c: Regenerated.
729         * generated/maxloc1_4_i16.c: Regenerated.
730         * generated/maxloc1_4_i2.c: Regenerated.
731         * generated/maxloc1_4_i4.c: Regenerated.
732         * generated/maxloc1_4_i8.c: Regenerated.
733         * generated/maxloc1_4_r10.c: Regenerated.
734         * generated/maxloc1_4_r16.c: Regenerated.
735         * generated/maxloc1_4_r4.c: Regenerated.
736         * generated/maxloc1_4_r8.c: Regenerated.
737         * generated/maxloc1_8_i1.c: Regenerated.
738         * generated/maxloc1_8_i16.c: Regenerated.
739         * generated/maxloc1_8_i2.c: Regenerated.
740         * generated/maxloc1_8_i4.c: Regenerated.
741         * generated/maxloc1_8_i8.c: Regenerated.
742         * generated/maxloc1_8_r10.c: Regenerated.
743         * generated/maxloc1_8_r16.c: Regenerated.
744         * generated/maxloc1_8_r4.c: Regenerated.
745         * generated/maxloc1_8_r8.c: Regenerated.
746         * generated/maxval_i1.c: Regenerated.
747         * generated/maxval_i16.c: Regenerated.
748         * generated/maxval_i2.c: Regenerated.
749         * generated/maxval_i4.c: Regenerated.
750         * generated/maxval_i8.c: Regenerated.
751         * generated/maxval_r10.c: Regenerated.
752         * generated/maxval_r16.c: Regenerated.
753         * generated/maxval_r4.c: Regenerated.
754         * generated/maxval_r8.c: Regenerated.
755         * generated/minloc0_16_i1.c: Regenerated.
756         * generated/minloc0_16_i16.c: Regenerated.
757         * generated/minloc0_16_i2.c: Regenerated.
758         * generated/minloc0_16_i4.c: Regenerated.
759         * generated/minloc0_16_i8.c: Regenerated.
760         * generated/minloc0_16_r10.c: Regenerated.
761         * generated/minloc0_16_r16.c: Regenerated.
762         * generated/minloc0_16_r4.c: Regenerated.
763         * generated/minloc0_16_r8.c: Regenerated.
764         * generated/minloc0_4_i1.c: Regenerated.
765         * generated/minloc0_4_i16.c: Regenerated.
766         * generated/minloc0_4_i2.c: Regenerated.
767         * generated/minloc0_4_i4.c: Regenerated.
768         * generated/minloc0_4_i8.c: Regenerated.
769         * generated/minloc0_4_r10.c: Regenerated.
770         * generated/minloc0_4_r16.c: Regenerated.
771         * generated/minloc0_4_r4.c: Regenerated.
772         * generated/minloc0_4_r8.c: Regenerated.
773         * generated/minloc0_8_i1.c: Regenerated.
774         * generated/minloc0_8_i16.c: Regenerated.
775         * generated/minloc0_8_i2.c: Regenerated.
776         * generated/minloc0_8_i4.c: Regenerated.
777         * generated/minloc0_8_i8.c: Regenerated.
778         * generated/minloc0_8_r10.c: Regenerated.
779         * generated/minloc0_8_r16.c: Regenerated.
780         * generated/minloc0_8_r4.c: Regenerated.
781         * generated/minloc0_8_r8.c: Regenerated.
782         * generated/minloc1_16_i1.c: Regenerated.
783         * generated/minloc1_16_i16.c: Regenerated.
784         * generated/minloc1_16_i2.c: Regenerated.
785         * generated/minloc1_16_i4.c: Regenerated.
786         * generated/minloc1_16_i8.c: Regenerated.
787         * generated/minloc1_16_r10.c: Regenerated.
788         * generated/minloc1_16_r16.c: Regenerated.
789         * generated/minloc1_16_r4.c: Regenerated.
790         * generated/minloc1_16_r8.c: Regenerated.
791         * generated/minloc1_4_i1.c: Regenerated.
792         * generated/minloc1_4_i16.c: Regenerated.
793         * generated/minloc1_4_i2.c: Regenerated.
794         * generated/minloc1_4_i4.c: Regenerated.
795         * generated/minloc1_4_i8.c: Regenerated.
796         * generated/minloc1_4_r10.c: Regenerated.
797         * generated/minloc1_4_r16.c: Regenerated.
798         * generated/minloc1_4_r4.c: Regenerated.
799         * generated/minloc1_4_r8.c: Regenerated.
800         * generated/minloc1_8_i1.c: Regenerated.
801         * generated/minloc1_8_i16.c: Regenerated.
802         * generated/minloc1_8_i2.c: Regenerated.
803         * generated/minloc1_8_i4.c: Regenerated.
804         * generated/minloc1_8_i8.c: Regenerated.
805         * generated/minloc1_8_r10.c: Regenerated.
806         * generated/minloc1_8_r16.c: Regenerated.
807         * generated/minloc1_8_r4.c: Regenerated.
808         * generated/minloc1_8_r8.c: Regenerated.
809         * generated/minval_i1.c: Regenerated.
810         * generated/minval_i16.c: Regenerated.
811         * generated/minval_i2.c: Regenerated.
812         * generated/minval_i4.c: Regenerated.
813         * generated/minval_i8.c: Regenerated.
814         * generated/minval_r10.c: Regenerated.
815         * generated/minval_r16.c: Regenerated.
816         * generated/minval_r4.c: Regenerated.
817         * generated/minval_r8.c: Regenerated.
818         * generated/pack_c10.c: Regenerated.
819         * generated/pack_c16.c: Regenerated.
820         * generated/pack_c4.c: Regenerated.
821         * generated/pack_c8.c: Regenerated.
822         * generated/pack_i1.c: Regenerated.
823         * generated/pack_i16.c: Regenerated.
824         * generated/pack_i2.c: Regenerated.
825         * generated/pack_i4.c: Regenerated.
826         * generated/pack_i8.c: Regenerated.
827         * generated/pack_r10.c: Regenerated.
828         * generated/pack_r16.c: Regenerated.
829         * generated/pack_r4.c: Regenerated.
830         * generated/pack_r8.c: Regenerated.
831         * generated/product_c10.c: Regenerated.
832         * generated/product_c16.c: Regenerated.
833         * generated/product_c4.c: Regenerated.
834         * generated/product_c8.c: Regenerated.
835         * generated/product_i1.c: Regenerated.
836         * generated/product_i16.c: Regenerated.
837         * generated/product_i2.c: Regenerated.
838         * generated/product_i4.c: Regenerated.
839         * generated/product_i8.c: Regenerated.
840         * generated/product_r10.c: Regenerated.
841         * generated/product_r16.c: Regenerated.
842         * generated/product_r4.c: Regenerated.
843         * generated/product_r8.c: Regenerated.
844         * generated/reshape_c10.c: Regenerated.
845         * generated/reshape_c16.c: Regenerated.
846         * generated/reshape_c4.c: Regenerated.
847         * generated/reshape_c8.c: Regenerated.
848         * generated/reshape_i16.c: Regenerated.
849         * generated/reshape_i4.c: Regenerated.
850         * generated/reshape_i8.c: Regenerated.
851         * generated/reshape_r10.c: Regenerated.
852         * generated/reshape_r16.c: Regenerated.
853         * generated/reshape_r4.c: Regenerated.
854         * generated/reshape_r8.c: Regenerated.
855         * generated/shape_i16.c: Regenerated.
856         * generated/shape_i4.c: Regenerated.
857         * generated/shape_i8.c: Regenerated.
858         * generated/spread_c10.c: Regenerated.
859         * generated/spread_c16.c: Regenerated.
860         * generated/spread_c4.c: Regenerated.
861         * generated/spread_c8.c: Regenerated.
862         * generated/spread_i1.c: Regenerated.
863         * generated/spread_i16.c: Regenerated.
864         * generated/spread_i2.c: Regenerated.
865         * generated/spread_i4.c: Regenerated.
866         * generated/spread_i8.c: Regenerated.
867         * generated/spread_r10.c: Regenerated.
868         * generated/spread_r16.c: Regenerated.
869         * generated/spread_r4.c: Regenerated.
870         * generated/spread_r8.c: Regenerated.
871         * generated/sum_c10.c: Regenerated.
872         * generated/sum_c16.c: Regenerated.
873         * generated/sum_c4.c: Regenerated.
874         * generated/sum_c8.c: Regenerated.
875         * generated/sum_i1.c: Regenerated.
876         * generated/sum_i16.c: Regenerated.
877         * generated/sum_i2.c: Regenerated.
878         * generated/sum_i4.c: Regenerated.
879         * generated/sum_i8.c: Regenerated.
880         * generated/sum_r10.c: Regenerated.
881         * generated/sum_r16.c: Regenerated.
882         * generated/sum_r4.c: Regenerated.
883         * generated/sum_r8.c: Regenerated.
884         * generated/transpose_c10.c: Regenerated.
885         * generated/transpose_c16.c: Regenerated.
886         * generated/transpose_c4.c: Regenerated.
887         * generated/transpose_c8.c: Regenerated.
888         * generated/transpose_i16.c: Regenerated.
889         * generated/transpose_i4.c: Regenerated.
890         * generated/transpose_i8.c: Regenerated.
891         * generated/transpose_r10.c: Regenerated.
892         * generated/transpose_r16.c: Regenerated.
893         * generated/transpose_r4.c: Regenerated.
894         * generated/transpose_r8.c: Regenerated.
895         * generated/unpack_c10.c: Regenerated.
896         * generated/unpack_c16.c: Regenerated.
897         * generated/unpack_c4.c: Regenerated.
898         * generated/unpack_c8.c: Regenerated.
899         * generated/unpack_i1.c: Regenerated.
900         * generated/unpack_i16.c: Regenerated.
901         * generated/unpack_i2.c: Regenerated.
902         * generated/unpack_i4.c: Regenerated.
903         * generated/unpack_i8.c: Regenerated.
904         * generated/unpack_r10.c: Regenerated.
905         * generated/unpack_r16.c: Regenerated.
906         * generated/unpack_r4.c: Regenerated.
907         * generated/unpack_r8.c: Regenerated.
908
909 2009-06-14 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
910
911         * fmain.c (main): Don't PREFIX set_args.
912         * libgfortran.h (set_args): Use iexport_proto.
913         * runtime/main.c (set_args): Use iexport.
914
915 2009-06-07  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
916
917         PR libfortran/40008
918         * libgfortran.h: Define IOPARM_OPEN_HAS_NEWUNIT.
919         * io/open.c (st_open): Don't error on negative unit number if NEWUNIT
920         was specified. If NEWUNIT is specified, call new function to get the
921         unique unit number and assign it.
922         * io/io.h (st_parameter_open): Add pointer to newunit.  Add prototype for
923         next_available_newunit. Add prototype for new function,
924         get_unique_unit_number.
925         * io/unit.c: Declare next_available_newunit. Define the first newunit
926         number. (init_units): Initialize next_available_unit.
927         (get_unique_unit_number): New function. Fix whitespace and comments.
928         * io/transfer.c (data_transfer_init): Update error message to not be
929         specific to OPEN statements.
930
931 2009-06-07  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
932
933         PR libfortran/40334
934         * io/list_read.c (list_formatted_read_scalar): Set the end file
935         conditions after a return from EOF error.
936
937 2009-06-04  Janne Blomqvist  <jb@gcc.gnu.org>
938
939         PR libfortran/40330
940         * io/format.c (free_format_hash_table): Also free and nullify hash key.
941         (save_parsed_format): Copy string rather than pointer copy.
942         
943 2009-05-29  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
944
945         PR fortran/40019
946         * intrinsics/bit_intrinsics.c: New file.
947         * gfortran.map (GFORTRAN_1.2): New list.
948         * Makefile.am: Add intrinsics/bit_intrinsics.c.
949         * Makefile.in: Regenerate.
950
951 2009-05-29  Janne Blomqvist  <jb@gcc.gnu.org>
952
953         PR libfortran/40190
954         * configure.ac: Check for localtime_r and gmtime_r.
955         * intrinsics/date_and_time.c: Add fallback implementations for
956         localtime_r and gmtime_r.
957         (date_and_time): Change to use localtime_r and gmtime_r instead of
958         localtime and gmtime, respectively.
959         (itime0): Use localtime_r instead of localtime.
960         (ltime_0): Likewise.
961         (gmtime_0): Use gmtime_r instead of gmtime.
962         * config.h.in: Regenerated
963         * configure: Regenerated.
964
965 2009-05-27  Janne Blomqvist  <jb@gcc.gnu.org>
966
967         PR fortran/39178
968         * runtime/main.c (store_exe_path): Remove static attribute.
969         * libgfortran.h: Add back store_exe_path prototype.
970
971 2009-05-27  Thomas Koenig  <tkoenig@gcc.gnu.org>
972
973         PR libfortran/40187
974         * intrinsics/iso_c_binding.c (c_f_pointer_u0):  Take care
975         of stride in "shape" argument.
976
977 2009-05-26  Tobias Burnus  <burnus@net-b.de>
978
979         PR fortran/39178
980         * runtime/main.c (store_exe_path): Make static
981         and multiple-times callable.
982         (set_args): Call store_exe_path.
983         * libgfortran.h: Remove store_exe_path prototype.
984         * fmain.c (main): Remove store_exe_path call.
985
986 2009-05-19  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
987
988         PR libfortran/37754
989         * io/write_float.def: Simplify format calculation.
990         
991 2009-05-07  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
992
993         PR fortran/22423
994         * io/transfer.c (read_block_direct): Avoid warning.
995         * runtime/string.c (compare0): Avoid warning.
996
997 2009-04-30  Janne Blomqvist  <jb@gcc.gnu.org>
998
999         PR libfortran/39667
1000         * io/file_pos.c (st_rewind): Don't truncate or flush.
1001         * io/intrinsics.c (fgetc): Flush if switching mode.
1002         (fputc): Likewise.
1003
1004 2009-04-18  Janne Blomqvist  <jb@gcc.gnu.org>
1005
1006         PR libfortran/39782
1007         * io/transfer.c (data_transfer_init): Don't flush before seek.
1008         (finalize_transfer): Remove extra flush.
1009
1010 2009-04-17  Janne Blomqvist  <jb@gcc.gnu.org>
1011
1012         * io/io.h (is_preconnected): Remove prototype.
1013         * io/unix.c (is_preconnected): Remove function.
1014
1015 2009-04-17  Ulrich Weigand  <Ulrich.Weigand@de.ibm.com>
1016
1017         * configure.ac: Test for -ffunction-sections -fdata-sections and
1018         set SECTION_FLAGS accordingly.
1019         * configure: Regenerate.
1020
1021         * Makefile.am: Add SECTION_FLAGS to AM_CFLAGS.
1022         * Makefile.in: Regenerate.
1023
1024 2009-04-15  Janne Blomqvist  <jb@gcc.gnu.org>
1025
1026         PR libfortran/38668
1027         * io/transfer.c (finalize_transfer): Don't flush for advance='no'.
1028
1029 2009-04-15 Danny Smith  <dannysmith@clear.net.nz>
1030
1031         * io/write.c (itoa) : Rename back to gfc_itoa.
1032         (write_i): Adjust call to write_decimal.
1033         (write_integer):  Use gfc_itoa.
1034
1035 2009-04-10  Janne Blomqvist  <jb@gcc.gnu.org>
1036
1037         * io/io.h (move_pos_offset): Remove prototype.
1038         * io/transfer.c (formatted_transfer_scalar_read): Use sseek
1039         instead of move_pos_offset.
1040         * io/unix.c (move_pos_offset): Remove.
1041
1042 2009-04-10  Janne Blomqvist  <jb@gcc.gnu.org>
1043
1044         PR libfortran/39665 libfortran/39702 libfortran/39709
1045         * io/io.h (st_parameter_dt): Revert aligned attribute from u.p.value.
1046         * io/list_read.c (read_complex): Read directly into user pointer.
1047         (read_real): Likewise.
1048         (list_formatted_read_scalar): Update read_complex and read_real calls.
1049         (nml_read_obj): Read directly into user pointer.
1050
1051 2009-04-09  Janne Blomqvist  <jb@gcc.gnu.org>
1052
1053         PR libfortran/39665
1054         * io/io.h (st_parameter_dt): Add aligned attribute to u.p.value.
1055         * io/read.c (convert_real): Add note about alignment requirements.
1056
1057 2009-04-09  Nick Clifton  <nickc@redhat.com>
1058
1059         * m4/cshift0.m4: Change copyright header to refer to version 3
1060         of the GNU General Public License with version 3.1 of the GCC
1061         Runtime Library Exception and to point readers at the COPYING3
1062         and COPYING3.RUNTIME files and the FSF's license web page.
1063         * c99_protos.h: Likewise.
1064         * config/fpu-387.h: Likewise.
1065         * config/fpu-aix.h: Likewise.
1066         * config/fpu-generic.h: Likewise.
1067         * config/fpu-glibc.h: Likewise.
1068         * config/fpu-sysv.h: Likewise.
1069         * intrinsics/abort.c: Likewise.
1070         * intrinsics/access.c: Likewise.
1071         * intrinsics/args.c: Likewise.
1072         * intrinsics/associated.c: Likewise.
1073         * intrinsics/c99_functions.c: Likewise.
1074         * intrinsics/chdir.c: Likewise.
1075         * intrinsics/chmod.c: Likewise.
1076         * intrinsics/clock.c: Likewise.
1077         * intrinsics/cpu_time.c: Likewise.
1078         * intrinsics/cshift0.c: Likewise.
1079         * intrinsics/ctime.c: Likewise.
1080         * intrinsics/date_and_time.c: Likewise.
1081         * intrinsics/dprod_r8.f90: Likewise.
1082         * intrinsics/dtime.c: Likewise.
1083         * intrinsics/env.c: Likewise.
1084         * intrinsics/eoshift0.c: Likewise.
1085         * intrinsics/eoshift2.c: Likewise.
1086         * intrinsics/erfc_scaled.c: Likewise.
1087         * intrinsics/erfc_scaled_inc.c: Likewise.
1088         * intrinsics/etime.c: Likewise.
1089         * intrinsics/exit.c: Likewise.
1090         * intrinsics/f2c_specifics.F90: Likewise.
1091         * intrinsics/fnum.c: Likewise.
1092         * intrinsics/gerror.c: Likewise.
1093         * intrinsics/getXid.c: Likewise.
1094         * intrinsics/getcwd.c: Likewise.
1095         * intrinsics/getlog.c: Likewise.
1096         * intrinsics/hostnm.c: Likewise.
1097         * intrinsics/ierrno.c: Likewise.
1098         * intrinsics/ishftc.c: Likewise.
1099         * intrinsics/iso_c_binding.c: Likewise.
1100         * intrinsics/iso_c_binding.h: Likewise.
1101         * intrinsics/iso_c_generated_procs.c: Likewise.
1102         * intrinsics/kill.c: Likewise.
1103         * intrinsics/link.c: Likewise.
1104         * intrinsics/malloc.c: Likewise.
1105         * intrinsics/move_alloc.c: Likewise.
1106         * intrinsics/mvbits.c: Likewise.
1107         * intrinsics/pack_generic.c: Likewise.
1108         * intrinsics/perror.c: Likewise.
1109         * intrinsics/rand.c: Likewise.
1110         * intrinsics/random.c: Likewise.
1111         * intrinsics/rename.c: Likewise.
1112         * intrinsics/reshape_generic.c: Likewise.
1113         * intrinsics/reshape_packed.c: Likewise.
1114         * intrinsics/selected_char_kind.c: Likewise.
1115         * intrinsics/selected_int_kind.f90: Likewise.
1116         * intrinsics/selected_real_kind.f90: Likewise.
1117         * intrinsics/signal.c: Likewise.
1118         * intrinsics/size.c: Likewise.
1119         * intrinsics/sleep.c: Likewise.
1120         * intrinsics/spread_generic.c: Likewise.
1121         * intrinsics/stat.c: Likewise.
1122         * intrinsics/string_intrinsics.c: Likewise.
1123         * intrinsics/string_intrinsics_inc.c: Likewise.
1124         * intrinsics/symlnk.c: Likewise.
1125         * intrinsics/system.c: Likewise.
1126         * intrinsics/system_clock.c: Likewise.
1127         * intrinsics/time.c: Likewise.
1128         * intrinsics/time_1.h: Likewise.
1129         * intrinsics/transpose_generic.c: Likewise.
1130         * intrinsics/umask.c: Likewise.
1131         * intrinsics/unlink.c: Likewise.
1132         * intrinsics/unpack_generic.c: Likewise.
1133         * io/close.c: Likewise.
1134         * io/fbuf.c: Likewise.
1135         * io/file_pos.c: Likewise.
1136         * io/format.c: Likewise.
1137         * io/inquire.c: Likewise.
1138         * io/intrinsics.c: Likewise.
1139         * io/io.h: Likewise.
1140         * io/list_read.c: Likewise.
1141         * io/lock.c: Likewise.
1142         * io/open.c: Likewise.
1143         * io/read.c: Likewise.
1144         * io/size_from_kind.c: Likewise.
1145         * io/transfer.c: Likewise.
1146         * io/unit.c: Likewise.
1147         * io/unix.c: Likewise.
1148         * io/write.c: Likewise.
1149         * io/write_float.def: Likewise.
1150         * libgfortran.h: Likewise.
1151         * m4/all.m4: Likewise.
1152         * m4/any.m4: Likewise.
1153         * m4/count.m4: Likewise.
1154         * m4/cshift1.m4: Likewise.
1155         * m4/eoshift1.m4: Likewise.
1156         * m4/eoshift3.m4: Likewise.
1157         * m4/exponent.m4: Likewise.
1158         * m4/fraction.m4: Likewise.
1159         * m4/head.m4: Likewise.
1160         * m4/in_pack.m4: Likewise.
1161         * m4/in_unpack.m4: Likewise.
1162         * m4/matmul.m4: Likewise.
1163         * m4/matmull.m4: Likewise.
1164         * m4/maxloc0.m4: Likewise.
1165         * m4/maxloc1.m4: Likewise.
1166         * m4/maxval.m4: Likewise.
1167         * m4/minloc0.m4: Likewise.
1168         * m4/minloc1.m4: Likewise.
1169         * m4/minval.m4: Likewise.
1170         * m4/nearest.m4: Likewise.
1171         * m4/pack.m4: Likewise.
1172         * m4/pow.m4: Likewise.
1173         * m4/product.m4: Likewise.
1174         * m4/reshape.m4: Likewise.
1175         * m4/rrspacing.m4: Likewise.
1176         * m4/set_exponent.m4: Likewise.
1177         * m4/shape.m4: Likewise.
1178         * m4/spacing.m4: Likewise.
1179         * m4/spread.m4: Likewise.
1180         * m4/sum.m4: Likewise.
1181         * m4/transpose.m4: Likewise.
1182         * m4/unpack.m4: Likewise.
1183         * runtime/backtrace.c: Likewise.
1184         * runtime/compile_options.c: Likewise.
1185         * runtime/convert_char.c: Likewise.
1186         * runtime/environ.c: Likewise.
1187         * runtime/error.c: Likewise.
1188         * runtime/in_pack_generic.c: Likewise.
1189         * runtime/in_unpack_generic.c: Likewise.
1190         * runtime/main.c: Likewise.
1191         * runtime/memory.c: Likewise.
1192         * runtime/pause.c: Likewise.
1193         * runtime/select.c: Likewise.
1194         * runtime/select_inc.c: Likewise.
1195         * runtime/stop.c: Likewise.
1196         * runtime/string.c: Likewise.
1197         * generated/_abs_c10.F90: Regenerate.
1198         * generated/_abs_c16.F90: Regenerate.
1199         * generated/_abs_c4.F90: Regenerate.
1200         * generated/_abs_c8.F90: Regenerate.
1201         * generated/_abs_i16.F90: Regenerate.
1202         * generated/_abs_i4.F90: Regenerate.
1203         * generated/_abs_i8.F90: Regenerate.
1204         * generated/_abs_r10.F90: Regenerate.
1205         * generated/_abs_r16.F90: Regenerate.
1206         * generated/_abs_r4.F90: Regenerate.
1207         * generated/_abs_r8.F90: Regenerate.
1208         * generated/_acos_r10.F90: Regenerate.
1209         * generated/_acos_r16.F90: Regenerate.
1210         * generated/_acos_r4.F90: Regenerate.
1211         * generated/_acos_r8.F90: Regenerate.
1212         * generated/_acosh_r10.F90: Regenerate.
1213         * generated/_acosh_r16.F90: Regenerate.
1214         * generated/_acosh_r4.F90: Regenerate.
1215         * generated/_acosh_r8.F90: Regenerate.
1216         * generated/_aimag_c10.F90: Regenerate.
1217         * generated/_aimag_c16.F90: Regenerate.
1218         * generated/_aimag_c4.F90: Regenerate.
1219         * generated/_aimag_c8.F90: Regenerate.
1220         * generated/_aint_r10.F90: Regenerate.
1221         * generated/_aint_r16.F90: Regenerate.
1222         * generated/_aint_r4.F90: Regenerate.
1223         * generated/_aint_r8.F90: Regenerate.
1224         * generated/_anint_r10.F90: Regenerate.
1225         * generated/_anint_r16.F90: Regenerate.
1226         * generated/_anint_r4.F90: Regenerate.
1227         * generated/_anint_r8.F90: Regenerate.
1228         * generated/_asin_r10.F90: Regenerate.
1229         * generated/_asin_r16.F90: Regenerate.
1230         * generated/_asin_r4.F90: Regenerate.
1231         * generated/_asin_r8.F90: Regenerate.
1232         * generated/_asinh_r10.F90: Regenerate.
1233         * generated/_asinh_r16.F90: Regenerate.
1234         * generated/_asinh_r4.F90: Regenerate.
1235         * generated/_asinh_r8.F90: Regenerate.
1236         * generated/_atan2_r10.F90: Regenerate.
1237         * generated/_atan2_r16.F90: Regenerate.
1238         * generated/_atan2_r4.F90: Regenerate.
1239         * generated/_atan2_r8.F90: Regenerate.
1240         * generated/_atan_r10.F90: Regenerate.
1241         * generated/_atan_r16.F90: Regenerate.
1242         * generated/_atan_r4.F90: Regenerate.
1243         * generated/_atan_r8.F90: Regenerate.
1244         * generated/_atanh_r10.F90: Regenerate.
1245         * generated/_atanh_r16.F90: Regenerate.
1246         * generated/_atanh_r4.F90: Regenerate.
1247         * generated/_atanh_r8.F90: Regenerate.
1248         * generated/_conjg_c10.F90: Regenerate.
1249         * generated/_conjg_c16.F90: Regenerate.
1250         * generated/_conjg_c4.F90: Regenerate.
1251         * generated/_conjg_c8.F90: Regenerate.
1252         * generated/_cos_c10.F90: Regenerate.
1253         * generated/_cos_c16.F90: Regenerate.
1254         * generated/_cos_c4.F90: Regenerate.
1255         * generated/_cos_c8.F90: Regenerate.
1256         * generated/_cos_r10.F90: Regenerate.
1257         * generated/_cos_r16.F90: Regenerate.
1258         * generated/_cos_r4.F90: Regenerate.
1259         * generated/_cos_r8.F90: Regenerate.
1260         * generated/_cosh_r10.F90: Regenerate.
1261         * generated/_cosh_r16.F90: Regenerate.
1262         * generated/_cosh_r4.F90: Regenerate.
1263         * generated/_cosh_r8.F90: Regenerate.
1264         * generated/_dim_i16.F90: Regenerate.
1265         * generated/_dim_i4.F90: Regenerate.
1266         * generated/_dim_i8.F90: Regenerate.
1267         * generated/_dim_r10.F90: Regenerate.
1268         * generated/_dim_r16.F90: Regenerate.
1269         * generated/_dim_r4.F90: Regenerate.
1270         * generated/_dim_r8.F90: Regenerate.
1271         * generated/_exp_c10.F90: Regenerate.
1272         * generated/_exp_c16.F90: Regenerate.
1273         * generated/_exp_c4.F90: Regenerate.
1274         * generated/_exp_c8.F90: Regenerate.
1275         * generated/_exp_r10.F90: Regenerate.
1276         * generated/_exp_r16.F90: Regenerate.
1277         * generated/_exp_r4.F90: Regenerate.
1278         * generated/_exp_r8.F90: Regenerate.
1279         * generated/_log10_r10.F90: Regenerate.
1280         * generated/_log10_r16.F90: Regenerate.
1281         * generated/_log10_r4.F90: Regenerate.
1282         * generated/_log10_r8.F90: Regenerate.
1283         * generated/_log_c10.F90: Regenerate.
1284         * generated/_log_c16.F90: Regenerate.
1285         * generated/_log_c4.F90: Regenerate.
1286         * generated/_log_c8.F90: Regenerate.
1287         * generated/_log_r10.F90: Regenerate.
1288         * generated/_log_r16.F90: Regenerate.
1289         * generated/_log_r4.F90: Regenerate.
1290         * generated/_log_r8.F90: Regenerate.
1291         * generated/_mod_i16.F90: Regenerate.
1292         * generated/_mod_i4.F90: Regenerate.
1293         * generated/_mod_i8.F90: Regenerate.
1294         * generated/_mod_r10.F90: Regenerate.
1295         * generated/_mod_r16.F90: Regenerate.
1296         * generated/_mod_r4.F90: Regenerate.
1297         * generated/_mod_r8.F90: Regenerate.
1298         * generated/_sign_i16.F90: Regenerate.
1299         * generated/_sign_i4.F90: Regenerate.
1300         * generated/_sign_i8.F90: Regenerate.
1301         * generated/_sign_r10.F90: Regenerate.
1302         * generated/_sign_r16.F90: Regenerate.
1303         * generated/_sign_r4.F90: Regenerate.
1304         * generated/_sign_r8.F90: Regenerate.
1305         * generated/_sin_c10.F90: Regenerate.
1306         * generated/_sin_c16.F90: Regenerate.
1307         * generated/_sin_c4.F90: Regenerate.
1308         * generated/_sin_c8.F90: Regenerate.
1309         * generated/_sin_r10.F90: Regenerate.
1310         * generated/_sin_r16.F90: Regenerate.
1311         * generated/_sin_r4.F90: Regenerate.
1312         * generated/_sin_r8.F90: Regenerate.
1313         * generated/_sinh_r10.F90: Regenerate.
1314         * generated/_sinh_r16.F90: Regenerate.
1315         * generated/_sinh_r4.F90: Regenerate.
1316         * generated/_sinh_r8.F90: Regenerate.
1317         * generated/_sqrt_c10.F90: Regenerate.
1318         * generated/_sqrt_c16.F90: Regenerate.
1319         * generated/_sqrt_c4.F90: Regenerate.
1320         * generated/_sqrt_c8.F90: Regenerate.
1321         * generated/_sqrt_r10.F90: Regenerate.
1322         * generated/_sqrt_r16.F90: Regenerate.
1323         * generated/_sqrt_r4.F90: Regenerate.
1324         * generated/_sqrt_r8.F90: Regenerate.
1325         * generated/_tan_r10.F90: Regenerate.
1326         * generated/_tan_r16.F90: Regenerate.
1327         * generated/_tan_r4.F90: Regenerate.
1328         * generated/_tan_r8.F90: Regenerate.
1329         * generated/_tanh_r10.F90: Regenerate.
1330         * generated/_tanh_r16.F90: Regenerate.
1331         * generated/_tanh_r4.F90: Regenerate.
1332         * generated/_tanh_r8.F90: Regenerate.
1333         * generated/all_l1.c: Regenerate.
1334         * generated/all_l16.c: Regenerate.
1335         * generated/all_l2.c: Regenerate.
1336         * generated/all_l4.c: Regenerate.
1337         * generated/all_l8.c: Regenerate.
1338         * generated/any_l1.c: Regenerate.
1339         * generated/any_l16.c: Regenerate.
1340         * generated/any_l2.c: Regenerate.
1341         * generated/any_l4.c: Regenerate.
1342         * generated/any_l8.c: Regenerate.
1343         * generated/count_16_l.c: Regenerate.
1344         * generated/count_1_l.c: Regenerate.
1345         * generated/count_2_l.c: Regenerate.
1346         * generated/count_4_l.c: Regenerate.
1347         * generated/count_8_l.c: Regenerate.
1348         * generated/cshift0_c10.c: Regenerate.
1349         * generated/cshift0_c16.c: Regenerate.
1350         * generated/cshift0_c4.c: Regenerate.
1351         * generated/cshift0_c8.c: Regenerate.
1352         * generated/cshift0_i1.c: Regenerate.
1353         * generated/cshift0_i16.c: Regenerate.
1354         * generated/cshift0_i2.c: Regenerate.
1355         * generated/cshift0_i4.c: Regenerate.
1356         * generated/cshift0_i8.c: Regenerate.
1357         * generated/cshift0_r10.c: Regenerate.
1358         * generated/cshift0_r16.c: Regenerate.
1359         * generated/cshift0_r4.c: Regenerate.
1360         * generated/cshift0_r8.c: Regenerate.
1361         * generated/cshift1_16.c: Regenerate.
1362         * generated/cshift1_4.c: Regenerate.
1363         * generated/cshift1_8.c: Regenerate.
1364         * generated/eoshift1_16.c: Regenerate.
1365         * generated/eoshift1_4.c: Regenerate.
1366         * generated/eoshift1_8.c: Regenerate.
1367         * generated/eoshift3_16.c: Regenerate.
1368         * generated/eoshift3_4.c: Regenerate.
1369         * generated/eoshift3_8.c: Regenerate.
1370         * generated/exponent_r10.c: Regenerate.
1371         * generated/exponent_r16.c: Regenerate.
1372         * generated/exponent_r4.c: Regenerate.
1373         * generated/exponent_r8.c: Regenerate.
1374         * generated/fraction_r10.c: Regenerate.
1375         * generated/fraction_r16.c: Regenerate.
1376         * generated/fraction_r4.c: Regenerate.
1377         * generated/fraction_r8.c: Regenerate.
1378         * generated/in_pack_c10.c: Regenerate.
1379         * generated/in_pack_c16.c: Regenerate.
1380         * generated/in_pack_c4.c: Regenerate.
1381         * generated/in_pack_c8.c: Regenerate.
1382         * generated/in_pack_i1.c: Regenerate.
1383         * generated/in_pack_i16.c: Regenerate.
1384         * generated/in_pack_i2.c: Regenerate.
1385         * generated/in_pack_i4.c: Regenerate.
1386         * generated/in_pack_i8.c: Regenerate.
1387         * generated/in_pack_r10.c: Regenerate.
1388         * generated/in_pack_r16.c: Regenerate.
1389         * generated/in_pack_r4.c: Regenerate.
1390         * generated/in_pack_r8.c: Regenerate.
1391         * generated/in_unpack_c10.c: Regenerate.
1392         * generated/in_unpack_c16.c: Regenerate.
1393         * generated/in_unpack_c4.c: Regenerate.
1394         * generated/in_unpack_c8.c: Regenerate.
1395         * generated/in_unpack_i1.c: Regenerate.
1396         * generated/in_unpack_i16.c: Regenerate.
1397         * generated/in_unpack_i2.c: Regenerate.
1398         * generated/in_unpack_i4.c: Regenerate.
1399         * generated/in_unpack_i8.c: Regenerate.
1400         * generated/in_unpack_r10.c: Regenerate.
1401         * generated/in_unpack_r16.c: Regenerate.
1402         * generated/in_unpack_r4.c: Regenerate.
1403         * generated/in_unpack_r8.c: Regenerate.
1404         * generated/matmul_c10.c: Regenerate.
1405         * generated/matmul_c16.c: Regenerate.
1406         * generated/matmul_c4.c: Regenerate.
1407         * generated/matmul_c8.c: Regenerate.
1408         * generated/matmul_i1.c: Regenerate.
1409         * generated/matmul_i16.c: Regenerate.
1410         * generated/matmul_i2.c: Regenerate.
1411         * generated/matmul_i4.c: Regenerate.
1412         * generated/matmul_i8.c: Regenerate.
1413         * generated/matmul_l16.c: Regenerate.
1414         * generated/matmul_l4.c: Regenerate.
1415         * generated/matmul_l8.c: Regenerate.
1416         * generated/matmul_r10.c: Regenerate.
1417         * generated/matmul_r16.c: Regenerate.
1418         * generated/matmul_r4.c: Regenerate.
1419         * generated/matmul_r8.c: Regenerate.
1420         * generated/maxloc0_16_i1.c: Regenerate.
1421         * generated/maxloc0_16_i16.c: Regenerate.
1422         * generated/maxloc0_16_i2.c: Regenerate.
1423         * generated/maxloc0_16_i4.c: Regenerate.
1424         * generated/maxloc0_16_i8.c: Regenerate.
1425         * generated/maxloc0_16_r10.c: Regenerate.
1426         * generated/maxloc0_16_r16.c: Regenerate.
1427         * generated/maxloc0_16_r4.c: Regenerate.
1428         * generated/maxloc0_16_r8.c: Regenerate.
1429         * generated/maxloc0_4_i1.c: Regenerate.
1430         * generated/maxloc0_4_i16.c: Regenerate.
1431         * generated/maxloc0_4_i2.c: Regenerate.
1432         * generated/maxloc0_4_i4.c: Regenerate.
1433         * generated/maxloc0_4_i8.c: Regenerate.
1434         * generated/maxloc0_4_r10.c: Regenerate.
1435         * generated/maxloc0_4_r16.c: Regenerate.
1436         * generated/maxloc0_4_r4.c: Regenerate.
1437         * generated/maxloc0_4_r8.c: Regenerate.
1438         * generated/maxloc0_8_i1.c: Regenerate.
1439         * generated/maxloc0_8_i16.c: Regenerate.
1440         * generated/maxloc0_8_i2.c: Regenerate.
1441         * generated/maxloc0_8_i4.c: Regenerate.
1442         * generated/maxloc0_8_i8.c: Regenerate.
1443         * generated/maxloc0_8_r10.c: Regenerate.
1444         * generated/maxloc0_8_r16.c: Regenerate.
1445         * generated/maxloc0_8_r4.c: Regenerate.
1446         * generated/maxloc0_8_r8.c: Regenerate.
1447         * generated/maxloc1_16_i1.c: Regenerate.
1448         * generated/maxloc1_16_i16.c: Regenerate.
1449         * generated/maxloc1_16_i2.c: Regenerate.
1450         * generated/maxloc1_16_i4.c: Regenerate.
1451         * generated/maxloc1_16_i8.c: Regenerate.
1452         * generated/maxloc1_16_r10.c: Regenerate.
1453         * generated/maxloc1_16_r16.c: Regenerate.
1454         * generated/maxloc1_16_r4.c: Regenerate.
1455         * generated/maxloc1_16_r8.c: Regenerate.
1456         * generated/maxloc1_4_i1.c: Regenerate.
1457         * generated/maxloc1_4_i16.c: Regenerate.
1458         * generated/maxloc1_4_i2.c: Regenerate.
1459         * generated/maxloc1_4_i4.c: Regenerate.
1460         * generated/maxloc1_4_i8.c: Regenerate.
1461         * generated/maxloc1_4_r10.c: Regenerate.
1462         * generated/maxloc1_4_r16.c: Regenerate.
1463         * generated/maxloc1_4_r4.c: Regenerate.
1464         * generated/maxloc1_4_r8.c: Regenerate.
1465         * generated/maxloc1_8_i1.c: Regenerate.
1466         * generated/maxloc1_8_i16.c: Regenerate.
1467         * generated/maxloc1_8_i2.c: Regenerate.
1468         * generated/maxloc1_8_i4.c: Regenerate.
1469         * generated/maxloc1_8_i8.c: Regenerate.
1470         * generated/maxloc1_8_r10.c: Regenerate.
1471         * generated/maxloc1_8_r16.c: Regenerate.
1472         * generated/maxloc1_8_r4.c: Regenerate.
1473         * generated/maxloc1_8_r8.c: Regenerate.
1474         * generated/maxval_i1.c: Regenerate.
1475         * generated/maxval_i16.c: Regenerate.
1476         * generated/maxval_i2.c: Regenerate.
1477         * generated/maxval_i4.c: Regenerate.
1478         * generated/maxval_i8.c: Regenerate.
1479         * generated/maxval_r10.c: Regenerate.
1480         * generated/maxval_r16.c: Regenerate.
1481         * generated/maxval_r4.c: Regenerate.
1482         * generated/maxval_r8.c: Regenerate.
1483         * generated/minloc0_16_i1.c: Regenerate.
1484         * generated/minloc0_16_i16.c: Regenerate.
1485         * generated/minloc0_16_i2.c: Regenerate.
1486         * generated/minloc0_16_i4.c: Regenerate.
1487         * generated/minloc0_16_i8.c: Regenerate.
1488         * generated/minloc0_16_r10.c: Regenerate.
1489         * generated/minloc0_16_r16.c: Regenerate.
1490         * generated/minloc0_16_r4.c: Regenerate.
1491         * generated/minloc0_16_r8.c: Regenerate.
1492         * generated/minloc0_4_i1.c: Regenerate.
1493         * generated/minloc0_4_i16.c: Regenerate.
1494         * generated/minloc0_4_i2.c: Regenerate.
1495         * generated/minloc0_4_i4.c: Regenerate.
1496         * generated/minloc0_4_i8.c: Regenerate.
1497         * generated/minloc0_4_r10.c: Regenerate.
1498         * generated/minloc0_4_r16.c: Regenerate.
1499         * generated/minloc0_4_r4.c: Regenerate.
1500         * generated/minloc0_4_r8.c: Regenerate.
1501         * generated/minloc0_8_i1.c: Regenerate.
1502         * generated/minloc0_8_i16.c: Regenerate.
1503         * generated/minloc0_8_i2.c: Regenerate.
1504         * generated/minloc0_8_i4.c: Regenerate.
1505         * generated/minloc0_8_i8.c: Regenerate.
1506         * generated/minloc0_8_r10.c: Regenerate.
1507         * generated/minloc0_8_r16.c: Regenerate.
1508         * generated/minloc0_8_r4.c: Regenerate.
1509         * generated/minloc0_8_r8.c: Regenerate.
1510         * generated/minloc1_16_i1.c: Regenerate.
1511         * generated/minloc1_16_i16.c: Regenerate.
1512         * generated/minloc1_16_i2.c: Regenerate.
1513         * generated/minloc1_16_i4.c: Regenerate.
1514         * generated/minloc1_16_i8.c: Regenerate.
1515         * generated/minloc1_16_r10.c: Regenerate.
1516         * generated/minloc1_16_r16.c: Regenerate.
1517         * generated/minloc1_16_r4.c: Regenerate.
1518         * generated/minloc1_16_r8.c: Regenerate.
1519         * generated/minloc1_4_i1.c: Regenerate.
1520         * generated/minloc1_4_i16.c: Regenerate.
1521         * generated/minloc1_4_i2.c: Regenerate.
1522         * generated/minloc1_4_i4.c: Regenerate.
1523         * generated/minloc1_4_i8.c: Regenerate.
1524         * generated/minloc1_4_r10.c: Regenerate.
1525         * generated/minloc1_4_r16.c: Regenerate.
1526         * generated/minloc1_4_r4.c: Regenerate.
1527         * generated/minloc1_4_r8.c: Regenerate.
1528         * generated/minloc1_8_i1.c: Regenerate.
1529         * generated/minloc1_8_i16.c: Regenerate.
1530         * generated/minloc1_8_i2.c: Regenerate.
1531         * generated/minloc1_8_i4.c: Regenerate.
1532         * generated/minloc1_8_i8.c: Regenerate.
1533         * generated/minloc1_8_r10.c: Regenerate.
1534         * generated/minloc1_8_r16.c: Regenerate.
1535         * generated/minloc1_8_r4.c: Regenerate.
1536         * generated/minloc1_8_r8.c: Regenerate.
1537         * generated/minval_i1.c: Regenerate.
1538         * generated/minval_i16.c: Regenerate.
1539         * generated/minval_i2.c: Regenerate.
1540         * generated/minval_i4.c: Regenerate.
1541         * generated/minval_i8.c: Regenerate.
1542         * generated/minval_r10.c: Regenerate.
1543         * generated/minval_r16.c: Regenerate.
1544         * generated/minval_r4.c: Regenerate.
1545         * generated/minval_r8.c: Regenerate.
1546         * generated/misc_specifics.F90: Regenerate.
1547         * generated/nearest_r10.c: Regenerate.
1548         * generated/nearest_r16.c: Regenerate.
1549         * generated/nearest_r4.c: Regenerate.
1550         * generated/nearest_r8.c: Regenerate.
1551         * generated/pack_c10.c: Regenerate.
1552         * generated/pack_c16.c: Regenerate.
1553         * generated/pack_c4.c: Regenerate.
1554         * generated/pack_c8.c: Regenerate.
1555         * generated/pack_i1.c: Regenerate.
1556         * generated/pack_i16.c: Regenerate.
1557         * generated/pack_i2.c: Regenerate.
1558         * generated/pack_i4.c: Regenerate.
1559         * generated/pack_i8.c: Regenerate.
1560         * generated/pack_r10.c: Regenerate.
1561         * generated/pack_r16.c: Regenerate.
1562         * generated/pack_r4.c: Regenerate.
1563         * generated/pack_r8.c: Regenerate.
1564         * generated/pow_c10_i16.c: Regenerate.
1565         * generated/pow_c10_i4.c: Regenerate.
1566         * generated/pow_c10_i8.c: Regenerate.
1567         * generated/pow_c16_i16.c: Regenerate.
1568         * generated/pow_c16_i4.c: Regenerate.
1569         * generated/pow_c16_i8.c: Regenerate.
1570         * generated/pow_c4_i16.c: Regenerate.
1571         * generated/pow_c4_i4.c: Regenerate.
1572         * generated/pow_c4_i8.c: Regenerate.
1573         * generated/pow_c8_i16.c: Regenerate.
1574         * generated/pow_c8_i4.c: Regenerate.
1575         * generated/pow_c8_i8.c: Regenerate.
1576         * generated/pow_i16_i16.c: Regenerate.
1577         * generated/pow_i16_i4.c: Regenerate.
1578         * generated/pow_i16_i8.c: Regenerate.
1579         * generated/pow_i4_i16.c: Regenerate.
1580         * generated/pow_i4_i4.c: Regenerate.
1581         * generated/pow_i4_i8.c: Regenerate.
1582         * generated/pow_i8_i16.c: Regenerate.
1583         * generated/pow_i8_i4.c: Regenerate.
1584         * generated/pow_i8_i8.c: Regenerate.
1585         * generated/pow_r10_i16.c: Regenerate.
1586         * generated/pow_r10_i8.c: Regenerate.
1587         * generated/pow_r16_i16.c: Regenerate.
1588         * generated/pow_r16_i8.c: Regenerate.
1589         * generated/pow_r4_i16.c: Regenerate.
1590         * generated/pow_r4_i8.c: Regenerate.
1591         * generated/pow_r8_i16.c: Regenerate.
1592         * generated/pow_r8_i8.c: Regenerate.
1593         * generated/product_c10.c: Regenerate.
1594         * generated/product_c16.c: Regenerate.
1595         * generated/product_c4.c: Regenerate.
1596         * generated/product_c8.c: Regenerate.
1597         * generated/product_i1.c: Regenerate.
1598         * generated/product_i16.c: Regenerate.
1599         * generated/product_i2.c: Regenerate.
1600         * generated/product_i4.c: Regenerate.
1601         * generated/product_i8.c: Regenerate.
1602         * generated/product_r10.c: Regenerate.
1603         * generated/product_r16.c: Regenerate.
1604         * generated/product_r4.c: Regenerate.
1605         * generated/product_r8.c: Regenerate.
1606         * generated/reshape_c10.c: Regenerate.
1607         * generated/reshape_c16.c: Regenerate.
1608         * generated/reshape_c4.c: Regenerate.
1609         * generated/reshape_c8.c: Regenerate.
1610         * generated/reshape_i16.c: Regenerate.
1611         * generated/reshape_i4.c: Regenerate.
1612         * generated/reshape_i8.c: Regenerate.
1613         * generated/reshape_r10.c: Regenerate.
1614         * generated/reshape_r16.c: Regenerate.
1615         * generated/reshape_r4.c: Regenerate.
1616         * generated/reshape_r8.c: Regenerate.
1617         * generated/rrspacing_r10.c: Regenerate.
1618         * generated/rrspacing_r16.c: Regenerate.
1619         * generated/rrspacing_r4.c: Regenerate.
1620         * generated/rrspacing_r8.c: Regenerate.
1621         * generated/set_exponent_r10.c: Regenerate.
1622         * generated/set_exponent_r16.c: Regenerate.
1623         * generated/set_exponent_r4.c: Regenerate.
1624         * generated/set_exponent_r8.c: Regenerate.
1625         * generated/shape_i16.c: Regenerate.
1626         * generated/shape_i4.c: Regenerate.
1627         * generated/shape_i8.c: Regenerate.
1628         * generated/spacing_r10.c: Regenerate.
1629         * generated/spacing_r16.c: Regenerate.
1630         * generated/spacing_r4.c: Regenerate.
1631         * generated/spacing_r8.c: Regenerate.
1632         * generated/spread_c10.c: Regenerate.
1633         * generated/spread_c16.c: Regenerate.
1634         * generated/spread_c4.c: Regenerate.
1635         * generated/spread_c8.c: Regenerate.
1636         * generated/spread_i1.c: Regenerate.
1637         * generated/spread_i16.c: Regenerate.
1638         * generated/spread_i2.c: Regenerate.
1639         * generated/spread_i4.c: Regenerate.
1640         * generated/spread_i8.c: Regenerate.
1641         * generated/spread_r10.c: Regenerate.
1642         * generated/spread_r16.c: Regenerate.
1643         * generated/spread_r4.c: Regenerate.
1644         * generated/spread_r8.c: Regenerate.
1645         * generated/sum_c10.c: Regenerate.
1646         * generated/sum_c16.c: Regenerate.
1647         * generated/sum_c4.c: Regenerate.
1648         * generated/sum_c8.c: Regenerate.
1649         * generated/sum_i1.c: Regenerate.
1650         * generated/sum_i16.c: Regenerate.
1651         * generated/sum_i2.c: Regenerate.
1652         * generated/sum_i4.c: Regenerate.
1653         * generated/sum_i8.c: Regenerate.
1654         * generated/sum_r10.c: Regenerate.
1655         * generated/sum_r16.c: Regenerate.
1656         * generated/sum_r4.c: Regenerate.
1657         * generated/sum_r8.c: Regenerate.
1658         * generated/transpose_c10.c: Regenerate.
1659         * generated/transpose_c16.c: Regenerate.
1660         * generated/transpose_c4.c: Regenerate.
1661         * generated/transpose_c8.c: Regenerate.
1662         * generated/transpose_i16.c: Regenerate.
1663         * generated/transpose_i4.c: Regenerate.
1664         * generated/transpose_i8.c: Regenerate.
1665         * generated/transpose_r10.c: Regenerate.
1666         * generated/transpose_r16.c: Regenerate.
1667         * generated/transpose_r4.c: Regenerate.
1668         * generated/transpose_r8.c: Regenerate.
1669         * generated/unpack_c10.c: Regenerate.
1670         * generated/unpack_c16.c: Regenerate.
1671         * generated/unpack_c4.c: Regenerate.
1672         * generated/unpack_c8.c: Regenerate.
1673         * generated/unpack_i1.c: Regenerate.
1674         * generated/unpack_i16.c: Regenerate.
1675         * generated/unpack_i2.c: Regenerate.
1676         * generated/unpack_i4.c: Regenerate.
1677         * generated/unpack_i8.c: Regenerate.
1678         * generated/unpack_r10.c: Regenerate.
1679         * generated/unpack_r16.c: Regenerate.
1680         * generated/unpack_r4.c: Regenerate.
1681         * generated/unpack_r8.c: Regenerate.
1682
1683 2009-04-08  Janne Blomqvist  <jb@gcc.gnu.org>
1684
1685         * io/open.c (already_open): Test for POSIX close return value.
1686         * io/unit.c (close_unit_1): Likewise.
1687         * io/unix.c (raw_close): Return 0 for success for preconnected units.
1688
1689 2009-04-08  Janne Blomqvist  <jb@gcc.gnu.org>
1690
1691         * runtime/string.c (compare0): Use gfc_charlen_type.
1692         * runtime/error.c (gfc_itoa): Move to io/write.c
1693         (xtoa): Rename to gfc_xtoa.
1694         * runtime/backtrace.c (show_backtrace): Call gfc_xtoa.
1695         * intrinsics/cshift0.c (cshift0): Use index_type for shift arg.
1696         * intrinsics/date_and_time.c (date_and_time): Use index_type.
1697         (itime_i4): Likewise.
1698         (itime_i8): Likewise.
1699         (idate_i4): Likewise.
1700         (idate_i8): Likewise.
1701         (gmtime_i4): Likewise.
1702         (gmtime_i8): Likewise.
1703         (ltime_i4): Likewise.
1704         (ltime_i8): Likewise.
1705         * libgfortran.h (gfc_itoa): Remove prototype.
1706         (xtoa): Rename prototype to gfc_xtoa.
1707         * io/list_read.c (nml_read_obj): Use size_t for string length.
1708         * io/transfer.c (read_block_direct): Change nbytes arg from
1709         pointer to value.
1710         (unformatted_read): Minor cleanup, call read_block_directly properly.
1711         (skip_record): Use ssize_t.
1712         (next_record_w_unf): Avoid stell() call by calling sseek with SEEK_CUR.
1713         (iolength_transfer): Make sure to multiply before cast.
1714         * io/intrinsics.c (fgetc): Remove unnecessary variable.
1715         * io/format.c (format_hash): Use gfc_charlen_type.
1716         * io/write.c (itoa): Move from runtime/error.c:gfc_itoa, rename,
1717         make static.
1718         (write_i): Call with pointer to itoa.
1719         (write_z): Call with pointer to gfc_xtoa.
1720         (write_integer): Pointer to itoa.
1721         (nml_write_obj): Type cleanup, don't call strlen in loop.
1722         
1723 2009-04-06  H.J. Lu  <hongjiu.lu@intel.com>
1724
1725         PR libgfortran/39664
1726         * io/unix.c (raw_close): Don't close STDOUT_FILENO,
1727         STDERR_FILENO nor STDIN_FILENO.
1728
1729 2009-04-06  David Edelsohn  <edelsohn@gnu.org>
1730         
1731         * io/io.h (struct stream): Rename truncate to trunc.
1732         (struncate): Same.
1733         * io/unix.c (raw_init): Rename truncate to trunc.
1734         (buf_init): Same.
1735         (open_internal): Same.
1736         
1737 2009-04-05  Daniel Kraft  <d@domob.eu>
1738
1739         PR fortran/38654
1740         * io/read.c (read_f): Reworked to speed up floating point parsing.
1741         (convert_real): Use pointer-casting instead of memcpy and temporaries.
1742
1743 2009-04-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1744
1745         PR libfortran/37754
1746         * io/io.h (format_hash_entry): New structure for hash table.
1747         (format_hash_table): The hash table itself.
1748         (free_format_data): Revise function prototype.
1749         (free_format_hash_table, init_format_hash,
1750         free_format_hash): New function prototypes.
1751         * io/unit.c (close_unit_1): Use free_format_hash_table.
1752         * io/transfer.c (st_read_done, st_write_done): Free format data if
1753         internal unit.
1754         * io/format.c (free_format_hash_table): New function that frees any
1755         memory allocated previously for cached format data.
1756         (reset_node): New static helper function to reset the format counters
1757         for a format node.
1758         (reset_fnode_counters): New static function recursively calls reset_node
1759         to traverse the fnode tree.
1760         (format_hash): New simple hash function based on XOR, probabalistic,
1761         tosses collisions.
1762         (save_parsed_format): New static function to save the parsed format
1763         data to use again.
1764         (find_parsed_format): New static function searches the hash table
1765         looking for a match.
1766         (free_format_data): Revised to accept pointer to format data rather than
1767         the dtp pointer so that the function can be used in more places.
1768         (format_lex): Editorial.
1769         (parse_format_list): Set flag used to determine of format data hashing
1770         is to be used.  Internal units are not persistent enough for this.
1771         (revert): Move to ne location in file.
1772         (parse_format): Use new functions to look for previously parsed
1773         format strings and use them rather than re-parse.  If not found, saves
1774         the parsed format data for later use.
1775         
1776 2009-04-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1777
1778         PR libfortran/37754
1779         * io/transfer.c (formatted_transfer_scalar): Remove this function by
1780         factoring it into two new functions, one for read and one for write,
1781         eliminating all the conditionals for read or write mode.
1782         (formatted transfer_scalar_read): New function.
1783         (formatted transfer_scalar_write): New function.
1784         (formatted_transfer): Use new functions.
1785
1786 2009-04-05  Janne Blomqvist  <jb@gcc.gnu.org>
1787
1788         PR libfortran/25561 libfortran/37754
1789         * io/io.h (struct stream): Define new stream interface function
1790         pointers, and inline functions for accessing it.
1791         (struct fbuf): Use int instead of size_t, remove flushed element.
1792         (mem_alloc_w): New prototype.
1793         (mem_alloc_r): New prototype.
1794         (stream_at_bof): Remove prototype.
1795         (stream_at_eof): Remove prototype.
1796         (file_position): Remove prototype.
1797         (flush): Remove prototype.
1798         (stream_offset): Remove prototype.
1799         (unit_truncate): New prototype.
1800         (read_block_form): Change to return pointer, int* argument.
1801         (hit_eof): New prototype.
1802         (fbuf_init): Change prototype.
1803         (fbuf_reset): Change prototype.
1804         (fbuf_alloc): Change prototype.
1805         (fbuf_flush): Change prototype.
1806         (fbuf_seek): Change prototype.
1807         (fbuf_read): New prototype.
1808         (fbuf_getc_refill): New prototype.
1809         (fbuf_getc): New inline function.
1810         * io/fbuf.c (fbuf_init): Use int, get rid of flushed.
1811         (fbuf_debug): New function.
1812         (fbuf_reset): Flush, and return position offset.
1813         (fbuf_alloc): Simplify, don't flush, just realloc.
1814         (fbuf_flush): Make usable for read mode, salvage remaining bytes.
1815         (fbuf_seek): New whence argument.
1816         (fbuf_read): New function.
1817         (fbuf_getc_refill): New function.
1818         * io/file_pos.c (formatted_backspace): Use new stream interface.
1819         (unformatted_backspace): Likewise.
1820         (st_backspace): Make sure format buffer is reset, use new stream
1821         interface, use unit_truncate.
1822         (st_endfile): Likewise.
1823         (st_rewind): Likewise.
1824         * io/intrinsics.c: Use new stream interface.
1825         * io/list_read.c (push_char): Don't use u.p.scratch, use realloc
1826         to resize.
1827         (free_saved): Don't check u.p.scratch.
1828         (next_char): Use new stream interface, use fbuf_getc() for external files.
1829         (finish_list_read): flush format buffer.
1830         (nml_query): Update to use modified interface:s
1831         * io/open.c (test_endfile): Use new stream interface.
1832         (edit_modes): Likewise.
1833         (new_unit): Likewise, set bytes_left to 1 for stream files.
1834         * io/read.c (read_l): Use new read_block_form interface.
1835         (read_utf8): Likewise.
1836         (read_utf8_char1): Likewise.
1837         (read_default_char1): Likewise.
1838         (read_utf8_char4): Likewise.
1839         (read_default_char4): Likewise.
1840         (read_a): Likewise.
1841         (read_a_char4): Likewise.
1842         (read_decimal): Likewise.
1843         (read_radix): Likewise.
1844         (read_f): Likewise.
1845         * io/transfer.c (read_sf): Use fbuf_read and mem_alloc_r, remove
1846         usage of u.p.line_buffer.
1847         (read_block_form): Update interface to return pointer, use
1848         fbuf_read for direct access.
1849         (read_block_direct): Update to new stream interface.
1850         (write_block): Use mem_alloc_w for internal I/O.
1851         (write_buf): Update to new stream interface.
1852         (formatted_transfer_scalar): Don't use u.p.line_buffer, use
1853         fbuf_seek for external files.
1854         (us_read): Update to new stream interface.
1855         (us_write): Likewise.
1856         (data_transfer_init): Always check if we switch modes and flush.
1857         (skip_record): Use new stream interface, fix comparison.
1858         (next_record_r): Check for and reset u.p.at_eof, use new stream
1859         interface, use fbuf_getc for spacing.
1860         (write_us_marker): Update to new stream interface, don't inline.
1861         (next_record_w_unf): Likewise.
1862         (sset): New function.
1863         (next_record_w): Use new stream interface, use fbuf for printing
1864         newline.
1865         (next_record): Use new stream interface.
1866         (finalize_transfer): Remove sfree call, use new stream interface.
1867         (st_iolength_done): Don't use u.p.scratch.
1868         (st_read): Don't check for end of file.
1869         (st_read_done): Don't use u.p.scratch, use unit_truncate.
1870         (hit_eof): New function.
1871         * io/unit.c (init_units): Always init fbuf for formatted units.
1872         (update_position): Use new stream interface.
1873         (unit_truncate): New function.
1874         (finish_last_advance_record): Use fbuf to print newline.
1875         * io/unix.c: Remove unused SSIZE_MAX macro.
1876         (BUFFER_SIZE): Make static const variable rather than macro.
1877         (struct unix_stream): Remove dirty_offset, len, method,
1878         small_buffer. Order elements by decreasing size.
1879         (struct int_stream): Remove.
1880         (move_pos_offset): Remove usage of dirty_offset.
1881         (reset_stream): Remove.
1882         (do_read): Rename to raw_read, update to match new stream
1883         interface.
1884         (do_write): Rename to raw_write, update to new stream interface.
1885         (raw_seek): New function.
1886         (raw_tell): New function.
1887         (raw_truncate): New function.
1888         (raw_close): New function.
1889         (raw_flush): New function.
1890         (raw_init): New function.
1891         (fd_alloc): Remove.
1892         (fd_alloc_r_at): Remove.
1893         (fd_alloc_w_at): Remove.
1894         (fd_sfree): Remove.
1895         (fd_seek): Remove.
1896         (fd_truncate): Remove.
1897         (fd_sset): Remove.
1898         (fd_read): Remove.
1899         (fd_write): Remove.
1900         (fd_close): Remove.
1901         (fd_open): Remove.
1902         (fd_flush): Rename to buf_flush, update to new stream interface
1903         and unix_stream.
1904         (buf_read): New function.
1905         (buf_write): New function.
1906         (buf_seek): New function.
1907         (buf_tell): New function.
1908         (buf_truncate): New function.
1909         (buf_close): New function.
1910         (buf_init): New function.
1911         (mem_alloc_r_at): Rename to mem_alloc_r, change prototype.
1912         (mem_alloc_w_at): Rename to mem_alloc_w, change prototype.
1913         (mem_read): Change to match new stream interface.
1914         (mem_write): Likewise.
1915         (mem_seek): Likewise.
1916         (mem_tell): Likewise.
1917         (mem_truncate): Likewise.
1918         (mem_close): Likewise.
1919         (mem_flush): New function.
1920         (mem_sfree): Remove.
1921         (empty_internal_buffer): Cast to correct type.
1922         (open_internal): Use correct type, init function pointers.
1923         (fd_to_stream): Test whether to open file as buffered or raw.
1924         (output_stream): Remove mode set.
1925         (error_stream): Likewise.
1926         (flush_all_units_1): Use new stream interface.
1927         (flush_all_units): Likewise.
1928         (stream_at_bof): Remove.
1929         (stream_at_eof): Remove.
1930         (file_position): Remove.
1931         (file_length): Update logic to use stream interface.
1932         (flush): Remove.
1933         (stream_offset): Remove.
1934         * io/write.c (write_utf8_char4): Use int instead of size_t.
1935         (write_x): Extra safety check.
1936         (namelist_write_newline): Use new stream interface.
1937
1938 2009-03-29  John David Anglin  <dave.anglin@nrc-cnrc.gc.ca>
1939
1940         PR fortran/33595
1941         * intrinsics/c99_functions.c (round): Use floor instead of ceil.
1942         Revise checks to round up.
1943         (roundf): Likewise.
1944
1945 2009-03-28  Daniel Kraft  <d@domob.eu>
1946
1947         * intrinsics/string_intrinsics.c: #include <assert.h>
1948         * intrinsics/string_intrinsics_inc.c (string_trim): Use string_len_trim
1949         instead of calculating the length directly.
1950         (string_len_trim): For KIND=1, speed search up.
1951
1952 2009-03-24  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1953
1954         PR libfortran/39528
1955         * io/list_read.c (list_formatted_read_scalar): Move check for read
1956         completion to just after the check for a repeated value.
1957
1958 2009-03-08  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1959
1960         PR libfortran/39402
1961         * io/write_float.def (output_float): Handle F0.d formatting correctly
1962         for any d when value is 0.0.
1963
1964 2009-03-01  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
1965
1966         * configure: Regenerate.
1967
1968 2009-01-21  Daniel Kraft  <d@domob.eu>
1969
1970         PR fortran/38887
1971         * runtime/in_unpack_generic.c (internal_unpack):  Return instead of
1972         abort when called with empty array.
1973         * m4/in_unpack.m4:  Ditto.
1974         * generated/in_unpack_i1.c:  Regenerated.
1975         * generated/in_unpack_i2.c:  Regenerated.
1976         * generated/in_unpack_i4.c:  Regenerated.
1977         * generated/in_unpack_i8.c:  Regenerated.
1978         * generated/in_unpack_i16.c: Regenerated.
1979         * generated/in_unpack_r4.c:  Regenerated.
1980         * generated/in_unpack_r8.c:  Regenerated.
1981         * generated/in_unpack_r10.c: Regenerated.
1982         * generated/in_unpack_r16.c: Regenerated.
1983         * generated/in_unpack_c4.c:  Regenerated.
1984         * generated/in_unpack_c8.c:  Regenerated.
1985         * generated/in_unpack_c10.c: Regenerated.
1986         * generated/in_unpack_c16.c: Regenerated.
1987
1988 2009-01-12  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1989
1990         PR libfortran/38772
1991         * io/read.c (read_f): Clean up loop conditions for BZ/BN,
1992         allowing proper digit testing. White space fix.
1993
1994 2009-01-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
1995
1996         PR libfortran/38735
1997         * io/unit.c (get_internal_unit): Set default BLANK= status to NULL for
1998         internal units.
1999
2000 2008-12-29  John David Anglin  <dave.anglin@nrc-cnrc.gc.ca>
2001
2002         PR fortran/31832
2003         * acinclude.m4 (LIBGFOR_CHECK_FOR_BROKEN_POWF): New autoconf check for
2004         broken powf.
2005         * configure.ac (LIBGFOR_CHECK_FOR_BROKEN_POWF): Use it.
2006         * intrinsics/c99_functions.c: Use internal powf implementation if
2007         HAVE_BROKEN_POWF is defined.
2008         * configure: Rebuilt.
2009         * config.h.in: Rebuilt.
2010
2011 2008-12-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2012
2013         PR libfortran/37472
2014         * io/write_float.def (output_float_FMT_G_): Modify calculation of temp
2015         to avoid sensitivity to round-off.
2016
2017 2008-12-21  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2018
2019         PR libfortran/38398
2020         * io/io.h (st_parameter_dt): Add new bit to keep track of when to
2021         suppress blanks for g0 formatting.
2022         * io/transfer.c (formatted_transfer_scalar): Always call write_real_g0
2023         for g0 formatting.
2024         * io.c (write.c): Do not use ES formatting and use new bit to suppress
2025         blanks.
2026         * io/write_float.def (output_float): Adjust the location of setting the
2027         width so that it can be adjusted when suppressing blanks.  Set number of
2028         blanks to zero when dtp->u.p.g0_no_blanks is set. Do some minor code
2029         clean-up and add some white space for readability.
2030         
2031 2008-12-18  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
2032
2033         * configure: Regenerate.
2034
2035 2008-12-13  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2036
2037         PR libfortran/38504
2038         io/write.c (write_decimal): Skip extra sign '-' at beginning of string
2039         returned by gfc_itoa.
2040
2041 2008-12-08  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2042
2043         PR libfortran/38430
2044         * io/transfer.c (data_transfer_init): Move constraint check for REC=
2045         and STREAM access into condition for other REC= constraints to simplify.
2046         Comment out this constraint to avoid breaking compatibility with 4.3
2047         until later.  Added a TODO for above comment and this one.
2048         Fix test for max pos.
2049
2050 2008-12-06  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2051
2052         PR libfortran/38291
2053         * io/transfer.c (data_transfer_init): Add fbuf_flush inadvertently
2054         ommitted.  Add check for invalid use of REC= with ACCESS="stream".  Fix
2055         comment.
2056
2057 2008-12-06  Adam Nemet  <anemet@caviumnetworks.com>
2058
2059         * runtime/main.c (store_exe_path): Don't crash if argv0 is NULL.
2060
2061 2008-12-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2062
2063         PR libfortran/38291
2064         * io/transfer.c (data_transfer_init): Add checks for POS= valid range.
2065         Add check for unit opened with ACCESS="stream". Flush and seek if
2066         current stream position does not match. Check ENDFILE on read.
2067
2068 2008-12-04  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2069
2070         PR fortran/38285
2071         * write_float.def (WRITE_FLOAT): Zero the float value for special case
2072         only if scale_factor = 0.
2073         
2074 2008-11-23  Thomas Koenig  <tkoenig@gcc.gnu.org>
2075
2076         PR libfortran/38234
2077         * intrinsics/reshape_generic.c (reshape_internal):
2078         Source can be larger than shape.
2079         * m4/reshape.m4:  Likewise.
2080         * generated/reshape_c10.c Regenerated.
2081         * generated/reshape_c16.c Regenerated.
2082         * generated/reshape_c4.c Regenerated.
2083         * generated/reshape_c8.c Regenerated.
2084         * generated/reshape_i16.c Regenerated.
2085         * generated/reshape_i4.c Regenerated.
2086         * generated/reshape_i8.c Regenerated.
2087         * generated/reshape_r10.c Regenerated.
2088         * generated/reshape_r16.c Regenerated.
2089         * generated/reshape_r4.c Regenerated.
2090         * generated/reshape_r8.c Regenerated.
2091
2092 2008-11-22  Danny Smith  <dannysmith@users.sourceforge.net>
2093
2094         * libgfortran.h (__mingw_snprintf): Declare with gnu_printf
2095         format attribute.
2096
2097
2098 2008-11-22  Thomas Koenig  <tkoenig@gcc.gnu.org>
2099
2100         PR libfortran/38225
2101         * intrinsics/reshape_generic.c (reshape_internal):
2102         Use all dimensions of source for bounds checking.
2103         * m4/reshape.m4:  Likewise.
2104         * generated/reshape_c10.c Regenerated.
2105         * generated/reshape_c16.c Regenerated.
2106         * generated/reshape_c4.c Regenerated.
2107         * generated/reshape_c8.c Regenerated.
2108         * generated/reshape_i16.c Regenerated.
2109         * generated/reshape_i4.c Regenerated.
2110         * generated/reshape_i8.c Regenerated.
2111         * generated/reshape_r10.c Regenerated.
2112         * generated/reshape_r16.c Regenerated.
2113         * generated/reshape_r4.c Regenerated.
2114         * generated/reshape_r8.c Regenerated.
2115
2116 2008-11-22  Jakub Jelinek  <jakub@redhat.com>
2117
2118         PR libfortran/37839
2119         * io/io.h (IOPARM_INQUIRE_HAS_ROUND, IOPARM_INQUIRE_HAS_SIGN,
2120         IOPARM_INQUIRE_HAS_PENDING): Adjust values.
2121         (st_parameter_inquire): Reorder and fix types of round, sign and
2122         pending fields.
2123         (st_parameter_43, st_parameter_44): Removed.
2124         (st_parameter_dt): Put back struct definition directly to u.p
2125         declaration.  Change type of u.p.size_used from gfc_offset to
2126         GFC_IO_INT.  Decrease back size of u.pad to 16 pointers and
2127         32 ints.  Put id, pos, asynchronous, blank, decimal, delim,
2128         pad, round and sign fields after the union.
2129         * io/inquire.c (inquire_via_unit, inquire_via_filename): Only read
2130         flags2 if it is defined.
2131         * io/transfer.c (read_sf, read_block_form, write_block): Cast
2132         additions to size_used to GFC_IO_INT instead of gfc_offset.
2133         (data_transfer_init): Clear whole u.p struct.  Adjust
2134         for moving id, pos, asynchronous, blank, decimal, delim, pad,
2135         round and sign fields from u.p directly into st_parameter_dt.
2136         (finalize_transfer): Don't cast size_used to GFC_IO_INT.
2137         * io/file_pos.c (st_endfile): Clear whole u.p struct.
2138
2139 2008-11-20  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2140
2141         PR libfortran/37472
2142         * io/write_float.def (output_float_FMT_G_): Adjust conversion of
2143         G format specification to F format.
2144
2145 2008-11-18  Thomas Koenig  <tkoenig@gcc.gnu.org>
2146
2147         PR libfortran/38135
2148         * m4/reshape.m4:  Correct bounds checking when PAD is present.
2149         Treat PAD as if it were SOURCE when SOURCE is empty.
2150         * intrinsics/reshape_generic.c:  Likewise.
2151         * generated/reshape_c10.c Regenerated.
2152         * generated/reshape_c16.c Regenerated.
2153         * generated/reshape_c4.c Regenerated.
2154         * generated/reshape_c8.c Regenerated.
2155         * generated/reshape_i16.c Regenerated.
2156         * generated/reshape_i4.c Regenerated.
2157         * generated/reshape_i8.c Regenerated.
2158         * generated/reshape_r10.c Regenerated.
2159         * generated/reshape_r16.c Regenerated.
2160         * generated/reshape_r4.c Regenerated.
2161         * generated/reshape_r8.c Regenerated.
2162
2163 2008-11-16  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2164
2165         PR libfortran/38097
2166         * io/read.c (read_f): Initialize exponent. Fix comment. Set loop
2167         conditions for BZ/BN.
2168         * io/unit.c (get_internal_unit): Initialize flags.blank.
2169         * io/transfer.c (data_transfer_init): Fix whitespace.
2170
2171 2008-11-15  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2172
2173         PR libfortran/37294
2174         * io/write.c (namelist_write_newline): Use array loop specification to
2175         advance to next internal array unit record. (namelist_write): Adjust to
2176         accomodate the internal array unit behavior.
2177
2178 2008-11-01  Dennis Wassel  <dennis.wassel@gmail.com>
2179
2180         PR fortran/37159
2181         * intrinsics/random.c: Added comment to adapt check.c, should
2182         kiss_size change.
2183         Few cosmetic changes to existing comments.
2184
2185 2008-10-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2186
2187         PR libfortran/37707
2188         * io/list_read.c (read_character): Remove code to look ahead in namelist
2189         reads to descriminate non-delimited strings from namelist objects.
2190         * io/write.c (namelist_write): Delimit character strings with quote or
2191         apostrophe, defaulting to quote.
2192
2193 2008-10-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
2194
2195         PR libfortran/34670
2196         * intrinsics/transpose_generic.c:  Implement bounds checking.
2197         * m4/transpose.m4:  Likewise.
2198         * generated/transpose_c8.c: Regenerated.
2199         * generated/transpose_c16.c: Regenerated.
2200         * generated/transpose_r10.c: Regenerated.
2201         * generated/transpose_i8.c: Regenerated.
2202         * generated/transpose_c10.c: Regenerated.
2203         * generated/transpose_r4.c: Regenerated.
2204         * generated/transpose_c4.c: Regenerated.
2205         * generated/transpose_i16.c: Regenerated.
2206         * generated/transpose_i4.c: Regenerated.
2207         * generated/transpose_r8.c: Regenerated.
2208         * generated/transpose_r16.c: Regenerated.
2209
2210 2008-10-19  Jerry DeLisle  <jvdelisle@gcc.gnu.org
2211
2212         PR libfortran/37834
2213         * io/write_float.def (output_float): Emit '0.' for special case of
2214         format specifier 'f0.0' and value of zero. Likewise emit '0' for 'f1.0'.
2215
2216 2008-10-17  Jerry DeLisle  <jvdelisle@gcc.gnu.org
2217
2218         PR libfortran/37863
2219         * io/write_float.def (WRITE_FLOAT): Round to 1.0 correctly.
2220         * io/io.h (st_parameter_44): Fix id type declaration.
2221
2222 2008-10-16  Thomas Koenig  <tkoenig@gcc.gnu.org>
2223
2224         * io/file_pos.c (unformatted_backspace): Normal case is
2225         GFC_CONVERT_NATIVE.
2226         * io/transfer.c (read_sf):  Mark paths leading to generate_error()
2227         as unlikely.
2228         (readl_block_form):  Likewise.
2229         (read_block_direct):  Likewise.
2230         (write_block):  Likewise.
2231         (write_buf):  Likewise.
2232         (us_read):  Likewise.  Normal case is GFC_CONVERT_NATIVE.
2233         (next_record_w_unf):  Mark paths leading to generate_error()
2234         as unlikely.
2235
2236 2008-10-16  Thomas Koenig  <tkoenig@gcc.gnu.org>
2237
2238         PR libfortran/34670
2239         * generated/spread_r4.c: Regenerated.
2240
2241 2008-10-15  Thomas Koenig  <tkoenig@gcc.gnu.org>
2242
2243         PR libfortran/34670
2244         * intrinsics/reshape_generic.c:  Add bounds checking.
2245         * m4/reshape.m4:  Likewise.
2246         * generated/reshape_c10.c: Regenerated.
2247         * generated/reshape_c16.c: Regenerated.
2248         * generated/reshape_c4.c: Regenerated.
2249         * generated/reshape_c8.c: Regenerated.
2250         * generated/reshape_i16.c: Regenerated.
2251         * generated/reshape_i4.c: Regenerated.
2252         * generated/reshape_i8.c: Regenerated.
2253         * generated/reshape_r10.c: Regenerated.
2254         * generated/reshape_r16.c: Regenerated.
2255         * generated/reshape_r4.c: Regenerated.
2256         * generated/reshape_r8.c: Regenerated.
2257         * generated/spread_r4.c: Regenerated.
2258
2259 2008-10-13  Jerry DeLisle  <jvdelisle@gcc.gnu.org
2260
2261         PR libfortran/37083
2262         * io/list_read.c (next_char): Simplify EOF tests and set endfile flag.
2263         (finish_list_read): Add EOF check.
2264
2265 2008-10-09  Thomas Koenig  <tkoenig@gcc.gnu.org>
2266
2267         PR libfortran/37753
2268         * io/transfer.c (unformatted_read):  CONVERT_NATIVE
2269         is the usual case.  Check for kind==1 for non-byte-reversing
2270         operation.
2271         (unformatted_write):  Likewise.
2272
2273 2008-10-08  Jerry DeLisle  <jvdelisle@gcc.gnu.org
2274
2275         PR libfortran/37707
2276         * io/list_read.c (nml_get_obj_data): If the first namelist object rank
2277         is greater than zero, call nml_object_read with the first object rather
2278         than the sub-object.
2279
2280 2008-09-26  Peter O'Gorman  <pogma@thewrittenword.com>
2281             Steve Ellcey  <sje@cup.hp.com>
2282
2283         * configure: Regenerate for new libtool.
2284         * Makefile.in: Ditto.
2285
2286 2008-09-25  Jerry DeLisle  <jvdelisle@gcc.gnu.org
2287
2288         PR libfortran/37498
2289         * list_read.c (eat_separator): Revert previous patch and move
2290         delim_status, decimal_status, and pad_status to gfc_unit.
2291         (parse_real): Ditto. (read_real): Ditto.
2292         * read.c (read_a): Likewise. (read_a_char4): Likewise.
2293         (read_f): Likewise.
2294         * inquire.c (inquire_via_unit): Add missing check for
2295         IOPARM_INQUIRE_HAS_FLAGS2. (inquire_via_filename): Likewise.
2296         * io.h (unit_sign_s): Move delim_status, decimal_status, and pad_status
2297         to gfc_unit.
2298         * transfer.c (read_sf): Ditto. (read_block_form): Ditto.
2299         (formatted_transfer_scalar): Ditto. (data_transfer_init): Ditto.
2300         * write.c (write_default_char4): Ditto. (write_utf8_char4): Ditto.
2301         (write_character): Ditto. (write_real_g0): Ditto.
2302         (list_formatted_write_scalar): Ditto. (nml_write_obj): Ditto.
2303         (namelist_write): Ditto.
2304         * write_float.def (calculate_sign): Ditto. (output_float): Ditto.
2305
2306 2008-09-24  Tobias Burnus  <burnus@net-b.de>
2307
2308         * runtime/compile_options.c (init_compile_options):
2309         Sync flags with front end.
2310
2311 2008-09-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org
2312
2313         PR libfortran/37498
2314         * file_pos (st_endfile): Clear memory only for libfortran 4.3 private
2315         area.
2316         * list_read.c (eat_separator): Only access F2003 I/O parameters if
2317         IOPARM_DT_HAS_F2003 bit is set. (parse_real): Ditto.
2318         (read_real): Ditto.
2319         * read.c (read_a): Likewise. (read_a_char4): Likewise though not
2320         strictly necessary. (read_f): Likewise.
2321         * io.h (unit_sign_s): New enumerator to allow duplication of
2322         st_parameter structures. (IOPARM_DT_HAS_F2003): New mask bit.
2323         (st_parameter_43): New structure copied from 4.3 version of 
2324         st_paramater_dt private section. (st_parameter_44): New structure with
2325         F2003 items added. (st_parameter_dt): Modified to create union of new
2326         and old structures to allow correct memory setting for 4.3 ABI
2327         compatibility. Bumped the pad size.
2328         * transfer.c (read_sf): Do not use F2003 I/O memory areas unless
2329         IOPARM_DT_HAS_F2003 bit has been set. (read_block_form): Ditto.
2330         (formatted_transfer_scalar): Ditto. (data_transfer_init): Ditto and
2331         add comment, fix formatting.
2332         * write.c (write_default_char4): Likewise though not strictly necessary.
2333         (write_utf8_char4): Ditto. (write_character): Ditto.
2334         (write_real_g0): Ditto. (list_formatted_write_scalar): Ditto.
2335         (nml_write_obj): Ditto. (namelist_write): Ditto.
2336         * write_float.def (calculate_sign): Eliminate warning by including all
2337         cases in switch. (output_float): Output only decimal point of F2003 flag
2338         is not set.
2339
2340 2008-09-10  Tobias Burnus  <burnus@net-b.de>
2341             H. J. Lu  <hongjiu.lu@intel.com>
2342
2343         * mk-sik-inc.sh: Make -Wunused-variable proof.
2344         * mk-srk-inc.sh: Make -Wunused-variable proof.
2345
2346 2008-09-10  Tobias Burnus  <burnus@net-b.de>
2347
2348         * mk-kinds-h.sh: Make -Wunused-variable proof.
2349
2350 2008-09-07  Thomas Koenig  <tkoenig@gcc.gnu.org>
2351
2352         PR fortran/37203
2353         * intrinsics/reshape_generic.c:  Add checking on
2354         out-of-bounds and duplicate values of order argument.
2355         * m4/reshape.m4:  Likewise.
2356         * generated/reshape_c10.c: Regenerated.
2357         * generated/reshape_c16.c: Regenerated.
2358         * generated/reshape_c4.c: Regenerated.
2359         * generated/reshape_c8.c: Regenerated.
2360         * generated/reshape_i16.c: Regenerated.
2361         * generated/reshape_i4.c: Regenerated.
2362         * generated/reshape_i8.c: Regenerated.
2363         * generated/reshape_r10.c: Regenerated.
2364         * generated/reshape_r16.c: Regenerated.
2365         * generated/reshape_r4.c: Regenerated.
2366         * generated/reshape_r8.c: Regenerated.
2367
2368 2008-09-06  Tobias Burnus  <burnus@net-b.de>
2369
2370         * libgfortran.h (likely,unlikely): New makros.
2371         (runtime_warning_at,__mingw_snprintf): Add __attribute__(format()).
2372         * m4/spread.m4 (spread_'rtype_code`): Use unlikely for bounds_check.
2373         * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Ditto.
2374         * m4/matmull.m4 (matmul_'rtype_code`): Ditto.
2375         * m4/ifunction_logical.m4 (name`'rtype_qual`_'atype_code): Ditto.
2376         * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): Ditto.
2377         * m4/matmul.m4 (matmul_'rtype_code`): Ditto.
2378
2379         * generated/minval_r8.c: Regenerated.
2380         * generated/spread_r10.c: Regenerated.
2381         * generated/minloc1_16_r16.c: Regenerated.
2382         * generated/maxloc1_4_r8.c: Regenerated.
2383         * generated/sum_i8.c: Regenerated.
2384         * generated/any_l16.c: Regenerated.
2385         * generated/spread_i8.c: Regenerated.
2386         * generated/maxval_i2.c: Regenerated.
2387         * generated/any_l2.c: Regenerated.
2388         * generated/product_r4.c: Regenerated.
2389         * generated/maxloc1_8_i4.c: Regenerated.
2390         * generated/maxloc0_4_r4.c: Regenerated.
2391         * generated/all_l1.c: Regenerated.
2392         * generated/matmul_r8.c: Regenerated.
2393         * generated/product_i2.c: Regenerated.
2394         * generated/minloc0_4_r16.c: Regenerated.
2395         * generated/minloc0_4_i1.c: Regenerated.
2396         * generated/maxloc0_4_r16.c: Regenerated.
2397         * generated/maxloc0_4_i2.c: Regenerated.
2398         * generated/minloc1_8_r16.c: Regenerated.
2399         * generated/maxloc1_8_r16.c: Regenerated.
2400         * generated/maxloc0_8_i8.c: Regenerated.
2401         * generated/sum_r16.c: Regenerated.
2402         * generated/sum_i1.c: Regenerated.
2403         * generated/minloc1_4_r8.c: Regenerated.
2404         * generated/maxloc1_16_r16.c: Regenerated.
2405         * generated/minloc1_16_i4.c: Regenerated.
2406         * generated/maxloc1_16_i4.c: Regenerated.
2407         * generated/minloc0_16_i8.c: Regenerated.
2408         * generated/spread_i1.c: Regenerated.
2409         * generated/maxloc0_16_i8.c: Regenerated.
2410         * generated/maxval_r16.c: Regenerated.
2411         * generated/product_c10.c: Regenerated.
2412         * generated/minloc1_8_i4.c: Regenerated.
2413         * generated/minloc0_16_i16.c: Regenerated.
2414         * generated/matmul_r16.c: Regenerated.
2415         * generated/minloc0_4_r4.c: Regenerated.
2416         * generated/all_l2.c: Regenerated.
2417         * generated/product_c4.c: Regenerated.
2418         * generated/sum_r4.c: Regenerated.
2419         * generated/minloc0_4_i2.c: Regenerated.
2420         * generated/spread_c10.c: Regenerated.
2421         * generated/maxloc0_8_i1.c: Regenerated.
2422         * generated/spread_r4.c: Regenerated.
2423         * generated/minloc0_8_i8.c: Regenerated.
2424         * generated/matmul_c8.c: Regenerated.
2425         * generated/all_l16.c: Regenerated.
2426         * generated/minloc1_16_r10.c: Regenerated.
2427         * generated/sum_i2.c: Regenerated.
2428         * generated/minloc0_16_i1.c: Regenerated.
2429         * generated/maxloc0_16_i1.c: Regenerated.
2430         * generated/maxloc1_8_r8.c: Regenerated.
2431         * generated/minval_i16.c: Regenerated.
2432         * generated/spread_i2.c: Regenerated.
2433         * generated/maxval_i4.c: Regenerated.
2434         * generated/minval_i8.c: Regenerated.
2435         * generated/any_l4.c: Regenerated.
2436         * generated/maxloc1_4_i8.c: Regenerated.
2437         * generated/maxloc0_16_i16.c: Regenerated.
2438         * generated/maxloc0_8_r4.c: Regenerated.
2439         * generated/minloc1_4_i16.c: Regenerated.
2440         * generated/maxloc1_4_i16.c: Regenerated.
2441         * generated/minloc0_4_r10.c: Regenerated.
2442         * generated/minloc0_8_i16.c: Regenerated.
2443         * generated/maxloc0_4_r10.c: Regenerated.
2444         * generated/maxloc0_8_i16.c: Regenerated.
2445         * generated/minloc1_8_r10.c: Regenerated.
2446         * generated/product_i4.c: Regenerated.
2447         * generated/minloc0_16_r4.c: Regenerated.
2448         * generated/sum_c16.c: Regenerated.
2449         * generated/maxloc1_8_r10.c: Regenerated.
2450         * generated/maxloc0_16_r4.c: Regenerated.
2451         * generated/minloc1_16_r8.c: Regenerated.
2452         * generated/minloc0_8_i1.c: Regenerated.
2453         * generated/maxloc0_4_i4.c: Regenerated.
2454         * generated/maxloc1_16_r8.c: Regenerated.
2455         * generated/maxloc0_8_i2.c: Regenerated.
2456         * generated/sum_r10.c: Regenerated.
2457         * generated/count_4_l.c: Regenerated.
2458         * generated/sum_c4.c: Regenerated.
2459         * generated/count_8_l.c: Regenerated.
2460         * generated/maxloc1_16_r10.c: Regenerated.
2461         * generated/matmul_i8.c: Regenerated.
2462         * generated/minloc0_16_i2.c: Regenerated.
2463         * generated/minloc1_8_r8.c: Regenerated.
2464         * generated/maxloc0_16_i2.c: Regenerated.
2465         * generated/spread_c4.c: Regenerated.
2466         * generated/matmul_c16.c: Regenerated.
2467         * generated/maxval_r10.c: Regenerated.
2468         * generated/minval_i1.c: Regenerated.
2469         * generated/maxloc1_4_i1.c: Regenerated.
2470         * generated/matmul_r10.c: Regenerated.
2471         * generated/minloc1_4_i8.c: Regenerated.
2472         * generated/minloc0_8_r4.c: Regenerated.
2473         * generated/matmul_l4.c: Regenerated.
2474         * generated/product_i16.c: Regenerated.
2475         * generated/minloc0_16_r16.c: Regenerated.
2476         * generated/all_l4.c: Regenerated.
2477         * generated/minloc0_4_i4.c: Regenerated.
2478         * generated/minloc0_8_i2.c: Regenerated.
2479         * generated/matmul_i1.c: Regenerated.
2480         * generated/minval_r4.c: Regenerated.
2481         * generated/maxloc1_4_r4.c: Regenerated.
2482         * generated/spread_i16.c: Regenerated.
2483         * generated/sum_i4.c: Regenerated.
2484         * generated/maxval_r8.c: Regenerated.
2485         * generated/spread_i4.c: Regenerated.
2486         * generated/minloc1_4_i1.c: Regenerated.
2487         * generated/minval_r16.c: Regenerated.
2488         * generated/minval_i2.c: Regenerated.
2489         * generated/maxloc1_4_i2.c: Regenerated.
2490         * generated/product_r8.c: Regenerated.
2491         * generated/maxloc1_8_i8.c: Regenerated.
2492         * generated/maxloc0_4_r8.c: Regenerated.
2493         * generated/maxloc0_16_r16.c: Regenerated.
2494         * generated/matmul_r4.c: Regenerated.
2495         * generated/sum_c10.c: Regenerated.
2496         * generated/minloc1_4_r16.c: Regenerated.
2497         * generated/maxloc1_4_r16.c: Regenerated.
2498         * generated/minloc0_8_r16.c: Regenerated.
2499         * generated/maxloc0_8_r16.c: Regenerated.
2500         * generated/count_1_l.c: Regenerated.
2501         * generated/maxloc0_8_i4.c: Regenerated.
2502         * generated/matmul_i2.c: Regenerated.
2503         * generated/minloc1_4_r4.c: Regenerated.
2504         * generated/matmul_c10.c: Regenerated.
2505         * generated/minloc0_16_i4.c: Regenerated.
2506         * generated/maxloc0_16_i4.c: Regenerated.
2507         * generated/minloc1_16_i8.c: Regenerated.
2508         * generated/maxloc1_16_i8.c: Regenerated.
2509         * generated/minloc1_4_i2.c: Regenerated.
2510         * generated/matmul_l16.c: Regenerated.
2511         * generated/maxloc1_8_i1.c: Regenerated.
2512         * generated/minloc0_16_r10.c: Regenerated.
2513         * generated/minloc1_8_i8.c: Regenerated.
2514         * generated/minloc0_4_r8.c: Regenerated.
2515         * generated/product_r16.c: Regenerated.
2516         * generated/product_c8.c: Regenerated.
2517         * generated/sum_r8.c: Regenerated.
2518         * generated/minloc0_8_i4.c: Regenerated.
2519         * generated/matmul_c4.c: Regenerated.
2520         * generated/minloc1_16_i16.c: Regenerated.
2521         * generated/spread_r8.c: Regenerated.
2522         * generated/maxloc1_8_r4.c: Regenerated.
2523         * generated/minloc1_16_i1.c: Regenerated.
2524         * generated/maxloc1_16_i1.c: Regenerated.
2525         * generated/spread_r16.c: Regenerated.
2526         * generated/minval_r10.c: Regenerated.
2527         * generated/count_16_l.c: Regenerated.
2528         * generated/minval_i4.c: Regenerated.
2529         * generated/minloc1_8_i1.c: Regenerated.
2530         * generated/maxloc1_4_i4.c: Regenerated.
2531         * generated/maxloc1_8_i2.c: Regenerated.
2532         * generated/maxval_i8.c: Regenerated.
2533         * generated/any_l8.c: Regenerated.
2534         * generated/maxloc0_16_r10.c: Regenerated.
2535         * generated/minloc0_4_i16.c: Regenerated.
2536         * generated/maxloc0_8_r8.c: Regenerated.
2537         * generated/maxloc0_4_i16.c: Regenerated.
2538         * generated/minloc1_4_r10.c: Regenerated.
2539         * generated/minloc1_8_i16.c: Regenerated.
2540         * generated/maxloc1_4_r10.c: Regenerated.
2541         * generated/maxloc1_8_i16.c: Regenerated.
2542         * generated/minloc0_8_r10.c: Regenerated.
2543         * generated/maxloc0_8_r10.c: Regenerated.
2544         * generated/minloc1_16_r4.c: Regenerated.
2545         * generated/maxloc1_16_r4.c: Regenerated.
2546         * generated/minloc0_16_r8.c: Regenerated.
2547         * generated/product_i8.c: Regenerated.
2548         * generated/maxloc0_16_r8.c: Regenerated.
2549         * generated/sum_i16.c: Regenerated.
2550         * generated/count_2_l.c: Regenerated.
2551         * generated/maxloc0_4_i8.c: Regenerated.
2552         * generated/maxloc1_16_i16.c: Regenerated.
2553         * generated/matmul_i4.c: Regenerated.
2554         * generated/minloc1_8_r4.c: Regenerated.
2555         * generated/sum_c8.c: Regenerated.
2556         * generated/minloc1_16_i2.c: Regenerated.
2557         * generated/maxloc1_16_i2.c: Regenerated.
2558         * generated/maxval_i16.c: Regenerated.
2559         * generated/spread_c8.c: Regenerated.
2560         * generated/matmul_i16.c: Regenerated.
2561         * generated/minloc1_4_i4.c: Regenerated.
2562         * generated/maxval_i1.c: Regenerated.
2563         * generated/minloc1_8_i2.c: Regenerated.
2564         * generated/any_l1.c: Regenerated.
2565         * generated/product_c16.c: Regenerated.
2566         * generated/minloc0_8_r8.c: Regenerated.
2567         * generated/matmul_l8.c: Regenerated.
2568         * generated/product_r10.c: Regenerated.
2569         * generated/product_i1.c: Regenerated.
2570         * generated/all_l8.c: Regenerated.
2571         * generated/maxloc0_4_i1.c: Regenerated.
2572         * generated/minloc0_4_i8.c: Regenerated.
2573         * generated/spread_c16.c: Regenerated.
2574         * generated/maxval_r4.c: Regenerated.
2575
2576 2008-09-01  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2577
2578         PR libfortran/37301
2579         PR libfortran/37228
2580         * io/io.h (write_real_g0): Declare new function to handle g0.d format.
2581         * io/transfer.c (formatted_transfer_scalar): Use new function.
2582         * io/format.c (parse_format_list): Enable g0.d.
2583         * io/write.c (write_a_char4): Delete unused var.
2584         (set_fnode_default): New function to set the default fnode w, d, and e
2585         factored from write_real. (write_real): Use new factored function.
2586         (write_real_g0): New function that sets d to that passed by g0.d format
2587         specifier and set format to ES.  Default values for w and e are used
2588         from the new function, set_fnode_default.
2589
2590 2008-09-01  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2591
2592         * runtime/error.c: Fix cast for printf.
2593
2594 2008-08-30  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2595
2596         PR libfortran/36895
2597         * io/write.c (namelist_write_newline): New function to correctly mark
2598         next records in both external and internal units.
2599         (nml_write_obj): Use new function.
2600         (namelist_write: Use new function.
2601
2602 2008-08-19  Tobias Burnus  <burnus@net-b.de>
2603
2604         PR libfortran/35863
2605         * io/write.c (write_a_char4): Add missing variable declaration
2606         in HAVE_CRLF block.
2607
2608 2008-08-15  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2609
2610         PR libfortran/35863
2611         * intrinsics/selected_char_kind.c: Enable iso_10646.
2612         * io/read.c (typedef uchar): New type.
2613         (read_utf8): New function to read a single UTF-8 encoded character.
2614         (read_utf8_char1): New function to read UTF-8 into a KIND=1 string.
2615         (read_default_char1): New functio to read default into KIND=1 string.
2616         (read_utf8_char4): New function to read UTF-8 into a KIND=4 string.
2617         (read_default_char4): New function to read UTF-8 into a KIND=4 string.
2618         (read_a): Modify to use the new functions.
2619         (read_a_char4): Modify to use the new functions.
2620         * io/write.c (error.h): Add include. (typedef uchar): New type.
2621         (write_default_char4): New function to default write KIND=4 string.
2622         (write_utf8_char4): New function to UTF-8 write KIND=4 string.
2623         (write_a_char4): Modify to use new functions.
2624         (write_character): Modify to use new functions.
2625
2626 2008-08-14  H.J. Lu  <hongjiu.lu@intel.com>
2627
2628         PR libfortran/37123
2629         * intrinsics/cshift0.c (cshift0): Fix 2 typos.
2630
2631 2008-08-14  Thomas Koenig  <tkoenig@gcc.gnu.org>
2632
2633         PR libfortran/36886
2634         * Makefile.am:  Added $(i_cshift0_c).
2635         Added $(i_cshift0_c) to gfor_built_specific_src.
2636         Add rule to build from cshift0.m4.
2637         * Makefile.in:  Regenerated.
2638         * libgfortran.h:  Addedd prototypes for cshift0_i1,
2639         cshift0_i2, cshift0_i4, cshift0_i8, cshift0_i16,
2640         cshift0_r4, cshift0_r8, cshift0_r10, cshift0_r16,
2641         cshift0_c4, cshift0_c8, cshift0_c10, cshift0_c16.
2642         Define Macros GFC_UNALIGNED_C4 and GFC_UNALIGNED_C8.
2643         * intrinsics/cshift0.c:  Remove helper functions for
2644         the innter shift loop.
2645         (cshift0):  Call specific functions depending on type
2646         of array argument.  Only call specific functions for
2647         correct alignment for other types.
2648         * m4/cshift0.m4:  New file.
2649         * generated/cshift0_i1.c:  New file.
2650         * generated/cshift0_i2.c:  New file.
2651         * generated/cshift0_i4.c:  New file.
2652         * generated/cshift0_i8:.c  New file.
2653         * generated/cshift0_i16.c:  New file.
2654         * generated/cshift0_r4.c:  New file.
2655         * generated/cshift0_r8.c:  New file.
2656         * generated/cshift0_r10.c:  New file.
2657         * generated/cshift0_r16.c:  New file.
2658         * generated/cshift0_c4.c:  New file.
2659         * generated/cshift0_c8.c:  New file.
2660         * generated/cshift0_c10.c:  New file.
2661         * generated/cshift0_c16.c:  New file.
2662
2663 2008-07-27  Tobias Burnus  <burnus@net-b.de>
2664
2665         PR fortran/36132
2666         PR fortran/29952
2667         PR fortran/36909
2668         * runtime/error.c: New function runtime_error_at.
2669         * gfortran.map: Ditto.
2670         * libgfortran.h: Ditto.
2671
2672 2008-07-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2673
2674         PR fortran/36582
2675         * io/list_read.c: If variable rank is zero, do not adjust the found
2676         namelist object pointer.
2677
2678 2008-07-22  Daniel Kraft  <d@domob.eu>
2679
2680         PR fortran/29835
2681         * io/format.c (struct format_data):  New member error_element.
2682         (unexpected_element):  Added '%c' to message.
2683         (next_char):  Keep track of last parsed character in fmt->error_element.
2684         (format_error):  If the message is unexpected_element, output the
2685         offending character, too.
2686
2687 2008-07-22  Thomas Koenig  <tkoenig@gcc.gnu.org>
2688
2689         PR libfortran/36890
2690         * io/file_pos.c:  Declare READ_CHUNK as signed to avoid
2691         signed/unsigned comparison warning in formatted_backspace.
2692
2693 2008-07-21  Thomas Koenig  <tkoenig@gcc.gnu.org>
2694
2695         PR libfortran/36773
2696         * intrinsics/cshift0.c (cshift0):  Return early if size of array
2697         is zero.
2698         * intrinsics/eoshift0.c (eoshift0):  Return early if size of
2699         return array is zero.
2700         * intrinsics/eoshift2.c (eoshift2):  Likewise.
2701         * m4/eoshift1.m4 (eoshift1):  Return early if size of array
2702         is zero.
2703         * m4/eoshift3.m4 (eoshift3):  Likewise.
2704         * m4/eoshift2.m4 (eoshift2):  Return early if size of return
2705         array is zero.
2706         * m4/eoshift4.m4 (eoshift2):  Return early if size of return
2707         array is zero.
2708         * generated/cshift1_16.c: Regenerated.
2709         * generated/cshift1_4.c: Regenerated.
2710         * generated/cshift1_8.c: Regenerated.
2711         * generated/eoshift1_16.c: Regenerated.
2712         * generated/eoshift1_4.c: Regenerated.
2713         * generated/eoshift1_8.c: Regenerated.
2714         * generated/eoshift3_16.c: Regenerated.
2715         * generated/eoshift3_4.c: Regenerated.
2716         * generated/eoshift3_8.c: Regenerated.
2717
2718 2008-07-20  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2719
2720         PR fortran/36857
2721         * io/write_float.def: Comment out locale dependent code and fix general
2722         comments.
2723         
2724 2008-07-07  Thomas Koenig  <tkoenig@gcc.gnu.org>
2725
2726         PR fortran/36341
2727         PR fortran/34670
2728         * m4/matmul.m4:  Add bounds checking.
2729         * m4/matmull.m4:  Likewise.
2730         * generated/matmul_c10.c: Regenerated.
2731         * generated/matmul_c16.c: Regenerated.
2732         * generated/matmul_c4.c: Regenerated.
2733         * generated/matmul_c8.c: Regenerated.
2734         * generated/matmul_i1.c: Regenerated.
2735         * generated/matmul_i16.c: Regenerated.
2736         * generated/matmul_i2.c: Regenerated.
2737         * generated/matmul_i4.c: Regenerated.
2738         * generated/matmul_i8.c: Regenerated.
2739         * generated/matmul_l16.c: Regenerated.
2740         * generated/matmul_l4.c: Regenerated.
2741         * generated/matmul_l8.c: Regenerated.
2742         * generated/matmul_r10.c: Regenerated.
2743         * generated/matmul_r16.c: Regenerated.
2744         * generated/matmul_r4.c: Regenerated.
2745         * generated/matmul_r8.c: Regenerated.
2746
2747 2008-07-07  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
2748
2749         * acinclude.m4 (LIBGFOR_CHECK_GTHR_DEFAULT): Fix configure cache
2750         variable name.
2751         * configure: Regenerate.
2752
2753 2008-07-01  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2754
2755         PR fortran/36676
2756         * io/list_read.c (find_nml_name): Use eat_separator instead of eat_line.
2757         
2758 2008-06-28  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2759
2760         PR fortran/36657
2761         * io/list_read.c (read_character): Check for '!' along with separators.
2762         (find_nml_name): Likewise and eat the comment if found.
2763
2764 2008-06-17  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
2765
2766         * configure: Regenerate.
2767
2768 2008-06-16  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2769
2770         PR fortran/36546
2771         * io/list_read.c (eat_separator): Add tab character to condition
2772         for looping past whitespace.
2773
2774 2008-06-14  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2775
2776         PR fortran/36515
2777         * libgfortran.h (compile_options_t): Add int range_check to structure.
2778         * runtime/compile_options.c (set_options): Add range_check option.
2779         (init_compile_options): Likewise.
2780         *io/read.c (read_decimal): Change overflow checks to include
2781         range_check.
2782         
2783 2008-06-13  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2784
2785         PR fortran/36538
2786         * io/list_read.c (namelist_read): Add eat_separator to eliminate leading
2787         tabs.
2788
2789 2008-06-13  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2790
2791         PR fortran/35863
2792         * libgfortran.h: Change l8_to_l4_offset to big_endian and add endian_off.
2793         * runtime/main.c: Fix error in comment. Change l8_to_l4_offset to
2794         big_endian. (determine_endianness): Add endian_off and set its value
2795         according to big_endian.
2796         * gfortran.map: Add symbol for new _gfortran_transfer_character_wide.
2797         * io/io.h: Add prototype declarations for new functions.
2798         * io/list_read.c (list_formatted_read_scalar): Modify to handle kind=4.
2799         (list_formatted_read): Calculate stride based on kind for character type
2800         and use it when calling list_formatted_read_scalar.
2801         * io/inquire.c (inquire_via_unit): Change l8_to_l4_offset to big_endian.
2802         * io/open.c (st_open): Change l8_to_l4_offset to big_endian.
2803         * io/read.c (read_a_char4): New function to handle formatted read.
2804         * io/write.c: Define GFC_CHAR4(x) to improve readability of code.
2805         (write_a_char4): New function to handle formatted write.
2806         (write_character): Modify to accept the kind parameter and adjust for
2807         endianess of the machine. (list_formatted_write): Calculate the stride
2808         resulting from the kind and adjust the list_formatted_write_scalar call
2809         accordingly. (nml_write_obj): Adjust calls to write_character.
2810         (namelist_write): Likewise.
2811         * io/transfer.c (formatted_transfer_scaler): Rename 'len' argument to
2812         'kind' argument to better describe what it is. Add calls to new
2813         functions for kind == 4. (formatted_transfer): Modify to handle the case
2814         of type character and kind equals 4 to pass in the kind to the transfer
2815         routines. (transfer_character_wide): Add this new function.
2816         (transfer_array): Don't set kind to the character string length. Adjust
2817         strides bases on character kind.
2818         (unformatted_read): Adjust size based on kind for character types.
2819         (unformatted_write): Likewise. (data_transfer_init): Change
2820         l8_to_l4_offset to big_endian.
2821         io/fbuf.c (fbuf_seek): Add cast to eliminate warning.
2822
2823 2008-06-13  Tobias Burnus  <burnus@net-b.de>
2824
2825         * configure.ac (AM_CFLAGS): Remove -Werror again.
2826         * configure: Regenerate.
2827
2828 2008-06-13  Tobias Burnus  <burnus@net-b.de>
2829
2830         PR libgfortran/36518
2831         * configure.ac (AM_CFLAGS): Add -Werror.
2832         * configure: Regenerate.
2833         * m4/ifunction_logical.m4: Cast "n" to "(int)".
2834         * generated/any_l16.c: Regenerate.
2835         * generated/any_l2.c: Regenerate.
2836         * generated/all_l1.c: Regenerate.
2837         * generated/all_l2.c: Regenerate.
2838         * generated/all_l16.c: Regenerate.
2839         * generated/any_l4.c: Regenerate.
2840         * generated/count_4_l.c: Regenerate.
2841         * generated/count_8_l.c: Regenerate.
2842         * generated/all_l4.c: Regenerate.
2843         * generated/count_1_l.c: Regenerate.
2844         * generated/count_16_l.c: Regenerate.
2845         * generated/any_l8.c: Regenerate.
2846         * generated/count_2_l.c: Regenerate.
2847         * generated/any_l1.c: Regenerate.
2848         * generated/all_l8.c: Regenerate.
2849
2850 2008-06-13  Tobias Burnus  <burnus@net-b.de>
2851
2852         PR fortran/36495
2853         * configure.ac (AM_FCFLAGS): Add "-Werror -fimplicit-none".
2854         * configure: (generated) ditto.
2855         * intrinsics/dprod_r8.f90: Add "implicit none".
2856
2857 2008-06-07  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2858
2859         PR libfortran/36420
2860         PR libfortran/36421
2861         PR libfortran/36422
2862         * io/io.h: Add prototype for write_real.
2863         * io/transfer.c (formatted_transfer_scalar): For FMT_G and width zero,
2864         use write_real.
2865         * io/format.c: Add zero width error message. (parse_format_list): Use
2866         error message for FMT_A if followed by FMT_ZERO. Use zero width error
2867         message for FMT_G if mode is READ or if -std=f95 or f2003. (fmormat0):
2868         Fix typo in comment.
2869         * io/write.c(write_a): Set wlen to len if FMT_G and length is zero.
2870         (write_l): Add wlen variable and use it if FMT_G and width is zero.
2871         (write_decimal): If FMT_G, set m to -1 to flag processor dependent
2872         formatting. (write_real): Remove static declaration.
2873
2874 2008-05-28  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
2875
2876         PR fortran/36319
2877         * intrinsics/string_intrinsics_inc.c (string_index): Return
2878         correct value for zero-length substring.
2879         * intrinsics/cshift0.c: Add _char4 variant.
2880         * intrinsics/eoshift0.c (eoshift0): Allow filler to be a pattern
2881         wider than a single byte. Add _char4 variant and use above
2882         functionality.
2883         * intrinsics/eoshift2.c (eoshift2): Likewise.
2884         * m4/eoshift1.m4: Likewise.
2885         * m4/eoshift3.m4: Likewise.
2886         * m4/cshift1.m4: Add _char4 variants.
2887         * gfortran.map (GFORTRAN_1.1): Add _gfortran_cshift0_1_char4,
2888         _gfortran_cshift0_2_char4, _gfortran_cshift0_4_char4,
2889         _gfortran_cshift0_8_char4, _gfortran_cshift1_16_char4,
2890         _gfortran_cshift1_4_char4, _gfortran_cshift1_8_char4,
2891         _gfortran_eoshift0_1_char4, _gfortran_eoshift0_2_char4,
2892         _gfortran_eoshift0_4_char4, _gfortran_eoshift0_8_char4,
2893         _gfortran_eoshift1_16_char4, _gfortran_eoshift1_4_char4,
2894         _gfortran_eoshift1_8_char4, _gfortran_eoshift2_1_char4,
2895         _gfortran_eoshift2_2_char4, _gfortran_eoshift2_4_char4,
2896         _gfortran_eoshift2_8_char4, _gfortran_eoshift3_16_char4,
2897         _gfortran_eoshift3_4_char4 and _gfortran_eoshift3_8_char4.
2898         * generated/eoshift3_4.c: Regenerate.
2899         * generated/eoshift1_8.c: Regenerate.
2900         * generated/eoshift1_16.c: Regenerate.
2901         * generated/cshift1_4.c: Regenerate.
2902         * generated/eoshift1_4.c: Regenerate.
2903         * generated/eoshift3_8.c: Regenerate.
2904         * generated/eoshift3_16.c: Regenerate.
2905         * generated/cshift1_8.c: Regenerate.
2906         * generated/cshift1_16.c: Regenerate.
2907
2908 2008-05-25  Tobias Burnus  <burnus@net-b.de>
2909
2910         PR fortran/32600
2911         * intrinsics/iso_c_binding.c (c_f_procpointer): Remove.
2912         * intrinsics/iso_c_binding.h (c_f_procpointer): Remove.
2913         * gfortran.map (c_f_procpointer): Remove.
2914
2915 2008-05-22  Thomas Koenig  <tkoenig@gcc.gnu.org>
2916
2917         PR libgfortran/36302
2918         * gfortran.map (GFORTRAN_1.1): Add _gfortran_eoshift0_16,
2919         _gfortran_eoshift0_16_char, _gfortran_eoshift2_16,
2920         _gfortran_eoshift2_16_char,_gfortran_cshift0_16,
2921         _gfortran_cshift0_16_char.  Sort alphabetically.
2922         * intrinsics/eoshift0.c:  Add function for kind=16 integer.
2923         * intrinsics/eoshift2.c:  Likewise.
2924         * intrinsics/cshift0.c:  Likewise.
2925
2926 2008-05-18  Thomas Koenig  <tkoenig@gcc.gnu.org>
2927
2928         * m4/in_pack.m4 (internal_pack_'rtype_code`):  Destination
2929         pointer is restrict.
2930         * m4/transpose.m4 (transpose_'rtype_code`):  Likewise.
2931         * m4/pack.m4 (pack_'rtype_code`):  Likewise.
2932         * m4/spread.m4 (spread_'rtype_code`):  Likewise.
2933         (spread_scalar_'rtype_code`): Likewise.
2934         * m4/iforeach.m4 (name`'rtype_qual`_'atype_code):  Likewise.
2935         * m4/eoshift1.m4 (eoshift1):  Likewise.
2936         * m4/eoshift3.m4 (eoshift3):  Likewise.
2937         * m4/in_unpack.m4 (internal_unpack_'rtype_ccode`):  Likewise.
2938         * m4/unpack.m4 (unpack0_'rtype_code`):  Likewise.
2939         (unpack1_'rtype_code`):  Likewise.
2940         * intrinsics/pack_generic.c (pack_generic.c):  Likewise.
2941         * intrinsics/unpack_generic.c (unpack_internal):  Likewise.
2942         * intrinsics/eoshift0.c (eoshift0):  Likewise.
2943         * intrinsics/eoshift2.c (eoshift2):  Likewise.
2944         * intrinsics/reshape_generic.c (reshape_internal):  Likewise.
2945         * intrinsics/reshape_packed.c (reshape_packed):  Likewise.
2946         * generated/eoshift1_16.c: Regenerated.
2947         * generated/eoshift1_4.c: Regenerated.
2948         * generated/eoshift1_8.c: Regenerated.
2949         * generated/eoshift3_16.c: Regenerated.
2950         * generated/eoshift3_4.c: Regenerated.
2951         * generated/eoshift3_8.c: Regenerated.
2952         * generated/in_pack_c10.c: Regenerated.
2953         * generated/in_pack_c16.c: Regenerated.
2954         * generated/in_pack_c4.c: Regenerated.
2955         * generated/in_pack_c8.c: Regenerated.
2956         * generated/in_pack_i1.c: Regenerated.
2957         * generated/in_pack_i16.c: Regenerated.
2958         * generated/in_pack_i2.c: Regenerated.
2959         * generated/in_pack_i4.c: Regenerated.
2960         * generated/in_pack_i8.c: Regenerated.
2961         * generated/in_pack_r10.c: Regenerated.
2962         * generated/in_pack_r16.c: Regenerated.
2963         * generated/in_pack_r4.c: Regenerated.
2964         * generated/in_pack_r8.c: Regenerated.
2965         * generated/in_unpack_c10.c: Regenerated.
2966         * generated/in_unpack_c16.c: Regenerated.
2967         * generated/in_unpack_c4.c: Regenerated.
2968         * generated/in_unpack_c8.c: Regenerated.
2969         * generated/in_unpack_i1.c: Regenerated.
2970         * generated/in_unpack_i16.c: Regenerated.
2971         * generated/in_unpack_i2.c: Regenerated.
2972         * generated/in_unpack_i4.c: Regenerated.
2973         * generated/in_unpack_i8.c: Regenerated.
2974         * generated/in_unpack_r10.c: Regenerated.
2975         * generated/in_unpack_r16.c: Regenerated.
2976         * generated/in_unpack_r4.c: Regenerated.
2977         * generated/in_unpack_r8.c: Regenerated.
2978         * generated/maxloc0_16_i1.c: Regenerated.
2979         * generated/maxloc0_16_i16.c: Regenerated.
2980         * generated/maxloc0_16_i2.c: Regenerated.
2981         * generated/maxloc0_16_i4.c: Regenerated.
2982         * generated/maxloc0_16_i8.c: Regenerated.
2983         * generated/maxloc0_16_r10.c: Regenerated.
2984         * generated/maxloc0_16_r16.c: Regenerated.
2985         * generated/maxloc0_16_r4.c: Regenerated.
2986         * generated/maxloc0_16_r8.c: Regenerated.
2987         * generated/maxloc0_4_i1.c: Regenerated.
2988         * generated/maxloc0_4_i16.c: Regenerated.
2989         * generated/maxloc0_4_i2.c: Regenerated.
2990         * generated/maxloc0_4_i4.c: Regenerated.
2991         * generated/maxloc0_4_i8.c: Regenerated.
2992         * generated/maxloc0_4_r10.c: Regenerated.
2993         * generated/maxloc0_4_r16.c: Regenerated.
2994         * generated/maxloc0_4_r4.c: Regenerated.
2995         * generated/maxloc0_4_r8.c: Regenerated.
2996         * generated/maxloc0_8_i1.c: Regenerated.
2997         * generated/maxloc0_8_i16.c: Regenerated.
2998         * generated/maxloc0_8_i2.c: Regenerated.
2999         * generated/maxloc0_8_i4.c: Regenerated.
3000         * generated/maxloc0_8_i8.c: Regenerated.
3001         * generated/maxloc0_8_r10.c: Regenerated.
3002         * generated/maxloc0_8_r16.c: Regenerated.
3003         * generated/maxloc0_8_r4.c: Regenerated.
3004         * generated/maxloc0_8_r8.c: Regenerated.
3005         * generated/minloc0_16_i1.c: Regenerated.
3006         * generated/minloc0_16_i16.c: Regenerated.
3007         * generated/minloc0_16_i2.c: Regenerated.
3008         * generated/minloc0_16_i4.c: Regenerated.
3009         * generated/minloc0_16_i8.c: Regenerated.
3010         * generated/minloc0_16_r10.c: Regenerated.
3011         * generated/minloc0_16_r16.c: Regenerated.
3012         * generated/minloc0_16_r4.c: Regenerated.
3013         * generated/minloc0_16_r8.c: Regenerated.
3014         * generated/minloc0_4_i1.c: Regenerated.
3015         * generated/minloc0_4_i16.c: Regenerated.
3016         * generated/minloc0_4_i2.c: Regenerated.
3017         * generated/minloc0_4_i4.c: Regenerated.
3018         * generated/minloc0_4_i8.c: Regenerated.
3019         * generated/minloc0_4_r10.c: Regenerated.
3020         * generated/minloc0_4_r16.c: Regenerated.
3021         * generated/minloc0_4_r4.c: Regenerated.
3022         * generated/minloc0_4_r8.c: Regenerated.
3023         * generated/minloc0_8_i1.c: Regenerated.
3024         * generated/minloc0_8_i16.c: Regenerated.
3025         * generated/minloc0_8_i2.c: Regenerated.
3026         * generated/minloc0_8_i4.c: Regenerated.
3027         * generated/minloc0_8_i8.c: Regenerated.
3028         * generated/minloc0_8_r10.c: Regenerated.
3029         * generated/minloc0_8_r16.c: Regenerated.
3030         * generated/minloc0_8_r4.c: Regenerated.
3031         * generated/minloc0_8_r8.c: Regenerated.
3032         * generated/pack_c10.c: Regenerated.
3033         * generated/pack_c16.c: Regenerated.
3034         * generated/pack_c4.c: Regenerated.
3035         * generated/pack_c8.c: Regenerated.
3036         * generated/pack_i1.c: Regenerated.
3037         * generated/pack_i16.c: Regenerated.
3038         * generated/pack_i2.c: Regenerated.
3039         * generated/pack_i4.c: Regenerated.
3040         * generated/pack_i8.c: Regenerated.
3041         * generated/pack_r10.c: Regenerated.
3042         * generated/pack_r16.c: Regenerated.
3043         * generated/pack_r4.c: Regenerated.
3044         * generated/pack_r8.c: Regenerated.
3045         * generated/spread_c10.c: Regenerated.
3046         * generated/spread_c16.c: Regenerated.
3047         * generated/spread_c4.c: Regenerated.
3048         * generated/spread_c8.c: Regenerated.
3049         * generated/spread_i1.c: Regenerated.
3050         * generated/spread_i16.c: Regenerated.
3051         * generated/spread_i2.c: Regenerated.
3052         * generated/spread_i4.c: Regenerated.
3053         * generated/spread_i8.c: Regenerated.
3054         * generated/spread_r10.c: Regenerated.
3055         * generated/spread_r16.c: Regenerated.
3056         * generated/spread_r4.c: Regenerated.
3057         * generated/spread_r8.c: Regenerated.
3058         * generated/transpose_c10.c: Regenerated.
3059         * generated/transpose_c16.c: Regenerated.
3060         * generated/transpose_c4.c: Regenerated.
3061         * generated/transpose_c8.c: Regenerated.
3062         * generated/transpose_i16.c: Regenerated.
3063         * generated/transpose_i4.c: Regenerated.
3064         * generated/transpose_i8.c: Regenerated.
3065         * generated/transpose_r10.c: Regenerated.
3066         * generated/transpose_r16.c: Regenerated.
3067         * generated/transpose_r4.c: Regenerated.
3068         * generated/transpose_r8.c: Regenerated.
3069         * generated/unpack_c10.c: Regenerated.
3070         * generated/unpack_c16.c: Regenerated.
3071         * generated/unpack_c4.c: Regenerated.
3072         * generated/unpack_c8.c: Regenerated.
3073         * generated/unpack_i1.c: Regenerated.
3074         * generated/unpack_i16.c: Regenerated.
3075         * generated/unpack_i2.c: Regenerated.
3076         * generated/unpack_i4.c: Regenerated.
3077         * generated/unpack_i8.c: Regenerated.
3078         * generated/unpack_r10.c: Regenerated.
3079         * generated/unpack_r16.c: Regenerated.
3080         * generated/unpack_r4.c: Regenerated.
3081         * generated/unpack_r8.c: Regenerated.
3082
3083 2008-05-18  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
3084
3085         * runtime/select.c: Moved content to select_inc.c. Include it. 
3086         Add macros for different character types.
3087         * runtime/select_inc.c: New file.
3088         * runtime/convert_char.c: New file.
3089         * intrinsics/pack_generic.c (pack_char4, pack_s_char4): New
3090         functions.
3091         * intrinsics/transpose_generic.c (transpose_char4): New function.
3092         * intrinsics/spread_generic.c (spread_char4, spread_char4_scalar):
3093         New functions.
3094         * intrinsics/unpack_generic.c (unpack1_char4, unpack0_char4): 
3095         New functions.
3096         * intrinsics/reshape_generic.c (reshape_char): Use
3097         gfc_charlen_type as type for length variables.
3098         (reshape_char4): New function.
3099         * gfortran.map (GFORTRAN_1.1): Add _gfortran_select_string_char4,
3100         _gfortran_convert_char1_to_char4, _gfortran_convert_char4_to_char1,
3101         _gfortran_transpose_char4, _gfortran_spread_char4,
3102         _gfortran_spread_char4_scalar, _gfortran_reshape_char4,
3103         _gfortran_pack_char4, _gfortran_pack_s_char4,
3104         _gfortran_unpack0_char4 and _gfortran_unpack1_char4.
3105         * Makefile.am: Add runtime/convert_char.c.
3106         * Makefile.in: Regenerate.
3107
3108 2008-05-17  Thomas Koenig  <tkoenig@gcc.gnu.org>
3109
3110         * io/list_read.c (list_formatted_read_scalar):  Declare
3111         type as volatile to shut up compiler warning.
3112
3113 2008-05-16  Janne Blomqvist  <jb@gcc.gnu.org>
3114
3115         PR libfortran/25561
3116         * io/io.h (struct fbuf): Change pointer to position offset.
3117         * io/fbuf.c (fbuf_init): Reduce default size of buffer, ptr=>pos
3118         changes.
3119         (fbuf_reset): ptr=>pos changes.
3120         (fbuf_alloc): If the request doesn't fit, don't waste memory by
3121         keeping flushed bytes. ptr=>pos changes.
3122         (fbuf_flush): ptr=>pos changes.
3123         (fbuf_seek): Don't seek past the left tab limit, don't update active
3124         byte count.
3125         * io/open.c (new_unit): If RECL has been specified, used that as
3126         initial buffer size.
3127
3128 2008-05-16  Janne Blomqvist  <jb@gcc.gnu.org>
3129
3130         PR libfortran/35632
3131         * io/open.c (new_unit): Set stream position to correct value.
3132
3133 2008-05-15  Janne Blomqvist  <jb@gcc.gnu.org>
3134
3135         PR libfortran/25561
3136         * Makefile.am: Add fbuf.c to gfor_io_src.
3137         * Makefile.in: Regenerate.
3138         * io/io.h (read_block): Remove.
3139         (struct stream): Remove alloc_r_at function pointer.
3140         (salloc_r): Remove.
3141         (salloc_r_at): Remove.
3142         (salloc_w_at): Remove.
3143         (salloc_w): Remove offset argument.
3144         (struct fbuf): New struct for format buffer.
3145         (struct gfc_unit): Add fbuf.
3146         (read_block_form): New prototype.
3147         (fbuf_init): Likewise.
3148         (fbuf_destroy): Likewise.
3149         (fbuf_reset): Likewise.
3150         (fbuf_alloc): Likewise.
3151         (fbuf_flush): Likewise.
3152         (fbuf_seek): Likewise.
3153         * io/file_pos.c (formatted_backspace): Change to use sread.
3154         (unformatted_backspace): Likewise.
3155         (st_backspace): Flush format buffer.
3156         (st_rewind): Likewise.
3157         * io/list_read.c (next_char): Likewise.
3158         (nml_query): Tidying, flush format buffer.
3159         * io/open.c (new_unit): Init format buffer.
3160         * io/read.c (read_l): Change to use read_block_form.
3161         (read_a): Likewise.
3162         (read_decimal): Likewise.
3163         (read_radix): Likewise.
3164         (read_f): Likewise.
3165         (read_x): Empty reads also for stream I/O.
3166         * io/transfer.c (read_sf): Change to use sread.
3167         (read_block): Rename to read_block_form, change prototype, use sread.
3168         (read_block_direct): Don't seek stream files.
3169         (write_block): Change to use fbuf if external file, don't seek stream
3170         files.
3171         (write_buf): Don't seek stream files.
3172         (formatted_transfer_scalar): Use fbuf for external files.
3173         (us_read): Change to use sread.
3174         (pre_position): Do nothing for stream I/O.
3175         (data_transfer_init): Flush fbuf when switching from write to read, if
3176         POS is specified, seek stream file to correct offset.
3177         (skip_record): Change to use sread.
3178         (min_off): New function.
3179         (next_record_r): Change to use sread.
3180         (next_record_w): Change to use sset/sseek, flush fbuf.
3181         (finalize_transfer): Flush fbuf.
3182         * io/unit.c (init_units): Init fbuf for stdout, stderr.
3183         (close_unit_1): Destroy fbuf.
3184         (finish_last_advance_record): Flush fbuf, no need to seek.
3185         * io/unix.c (fd_alloc_r_at): Remove unused where argument.
3186         (fd_alloc_w_at): Likewise.
3187         (fd_read): Remove third argument to fd_alloc_r_at.
3188         (fd_write): Remove third argument to fd_alloc_w_at.
3189         (fd_sset): Likewise.
3190         (fd_open): Don't set alloc_r_at.
3191         (mem_alloc_r_at): Remove unused where argument.
3192         (mem_alloc_w_at): Likewise.
3193         (mem_read): Don't incorrectly return previous errno, remove unused
3194         third argument to alloc function.
3195         (mem_write): Likewise.
3196         (mem_set): Likewise.
3197         (open_internal): Don't set alloc_r_at pointer.
3198         * io/fbuf.c: New file.
3199
3200 2008-05-14  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
3201
3202         * libgfortran.h (gfc_char4_t): New type.
3203         (GFC_SIZE_OF_CHAR_KIND): New macro.
3204         (compare_string): Adjust prototype.
3205         (compare_string_char4): New prototype.
3206         * gfortran.map (GFORTRAN_1.1): Add _gfortran_adjustl_char4,
3207         _gfortran_adjustr_char4, _gfortran_compare_string_char4,
3208         _gfortran_concat_string_char4, _gfortran_string_index_char4,
3209         _gfortran_string_len_trim_char4, _gfortran_string_minmax_char4,
3210         _gfortran_string_scan_char4, _gfortran_string_trim_char4 and
3211         _gfortran_string_verify_char4.
3212         * intrinsics/string_intrinsics_inc.c: New file from content of
3213         string_intrinsics.c with types replaced by macros.
3214         * intrinsics/string_intrinsics.c: Move content to
3215         string_intrinsics_inc.c.
3216
3217 2008-05-11  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3218
3219         PR libfortran/36202
3220         * io/list_read (eat_separator): Handle the CR-LF case correctly.
3221
3222 2008-05-09  Julian Brown  <julian@codesourcery.com>
3223
3224         * Makefile.am (LTLDFLAGS): New.
3225         (libgfortran_la_LDFLAGS): Use above.
3226         * Makefile.in: Regenerate.
3227
3228 2008-05-05  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
3229
3230         PR libfortran/36131
3231         * io/transfer.c (formatted_transfer_scalar): Revert patch for PR34974.
3232         (next_record_w): Likewise.
3233
3234 2008-05-04  Thomas Koenig  <tkoenig@gcc.gnu.org>
3235
3236         PR libfortran/35995
3237         * m4/ifunction_logical.m4:  If the extent of "array"
3238         is less than zero, set it to zero.  Use an explicit
3239         flag for breaking out of the main loop to avoid, because
3240         the data pointer for "array" may be NULL for an empty
3241         array.
3242         * m4/ifunction.m4:  Likewise.
3243         * generated/all_l1.c: Regenerated.
3244         * generated/all_l16.c: Regenerated.
3245         * generated/all_l2.c: Regenerated.
3246         * generated/all_l4.c: Regenerated.
3247         * generated/all_l8.c: Regenerated.
3248         * generated/any_l1.c: Regenerated.
3249         * generated/any_l16.c: Regenerated.
3250         * generated/any_l2.c: Regenerated.
3251         * generated/any_l4.c: Regenerated.
3252         * generated/any_l8.c: Regenerated.
3253         * generated/count_16_l.c: Regenerated.
3254         * generated/count_1_l.c: Regenerated.
3255         * generated/count_2_l.c: Regenerated.
3256         * generated/count_4_l.c: Regenerated.
3257         * generated/count_8_l.c: Regenerated.
3258         * generated/maxloc1_16_i1.c: Regenerated.
3259         * generated/maxloc1_16_i16.c: Regenerated.
3260         * generated/maxloc1_16_i2.c: Regenerated.
3261         * generated/maxloc1_16_i4.c: Regenerated.
3262         * generated/maxloc1_16_i8.c: Regenerated.
3263         * generated/maxloc1_16_r10.c: Regenerated.
3264         * generated/maxloc1_16_r16.c: Regenerated.
3265         * generated/maxloc1_16_r4.c: Regenerated.
3266         * generated/maxloc1_16_r8.c: Regenerated.
3267         * generated/maxloc1_4_i1.c: Regenerated.
3268      &nb