| blob | f46f11a861efb534e0b39a6aa27dcaa08ca1d90f |
1 2009-09-09 Paolo Bonzini <bonzini@gnu.org>
3 * configure: Regenerate.
5 2009-09-08 Paolo Bonzini <bonzini@gnu.org>
7 * configure: Regenerate.
9 2009-09-07 Jerry DeLisle <jvdelisle@gcc.gnu.org>
11 PR libgfortran/41192
12 * io/list_read.c (eat_line): Enable eat_line to function on
13 internal units.
15 PR libgfortran/41219
16 * io/list_read.c (nml_read_obj): Replace GFC_DTYPE_UNKNOWN with
17 BT_NULL to get rid of warning.
19 2009-09-04 Tobias Burnus <burnus@net-b.de>
21 PR fortran/41219
22 * intrinsics/getlog.c: Define _POSIX for MINGW32.
24 2009-09-03 Tobias Burnus <burnus@net-b.de>
26 PR fortran/41219
27 * intrinsics/iso_c_binding.c (c_f_pointer_u0): Move variable
28 declaration out of the loop.
30 2009-08-30 Thomas Koenig <tkoenig@gcc.gnu.org>
32 * m4/pack.m4 (pack_'rtype_code`): Use count_0 for counting true
33 values in a logical array. Mark bounds checking tests as
34 unlikely.
35 * intrinsics/pack_generic.c (pack_internal): Likewise.
36 * runtime/bounds.c (count_0): Fix off-by-one error in detecting
37 empty arrays.
38 * generated/pack_c4.c: Regenerated.
39 * generated/pack_c8.c: Regenerated.
40 * generated/pack_c10.c: Regenerated.
41 * generated/pack_c16.c: Regenerated.
42 * generated/pack_i1.c: Regenerated.
43 * generated/pack_i16.c: Regenerated.
44 * generated/pack_i2.c: Regenerated.
45 * generated/pack_i4.c: Regenerated.
46 * generated/pack_i8.c: Regenerated.
47 * generated/pack_r4.c: Regenerated.
48 * generated/pack_r8.c: Regenerated.
49 * generated/pack_r10.c: Regenerated.
50 * generated/pack_r16.c: Regenerated.
52 2009-08-25 Thomas Koenig <tkoenig@gcc.gnu.org>
54 PR libfortran/34670
55 * runtime/bounds.c (count_0): New function.
56 * intrinsics/unpack_generic (unpack_bounds): New function.
57 (unpack_internal): Remove zero stride checks.
58 (unpack1): Use unpack_bounds.
59 (unpack1_char): Likeweise.
60 (unpack1_char4): Likewise
61 (unpack0): Likewise.
62 (unpack0_char): Likewise.
63 (unpack0_char4): Likewise.
65 2009-08-24 Steven G. Kargl <kargl@gcc.gnu.org>
67 PR fortran/41157
68 * dtime.c (dtime_sub): Fix computing time increment.
69 * time_1.h: Add <sys/types.h> header. Use RUSAGE_SELF macro instead
70 of a hardcoded 0.
72 2009-08-24 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
74 * configure.ac (AC_PREREQ): Bump to 2.64.
76 2009-08-23 Steven G. Kargl <kargl@gcc.gnu.org>
78 * intrinsics/cshift0.c: Update license to GPL3+exception.
79 * runtime/fpu.c: Add a GPL3+exception statement.
81 2009-08-22 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
83 * Makefile.am (install-html, install-pdf): Remove.
84 * Makefile.in: Regenerate.
86 * Makefile.in: Regenerate.
87 * aclocal.m4: Regenerate.
88 * config.h.in: Regenerate.
89 * configure: Regenerate.
91 2009-08-22 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
93 * Makefile.am (libgfortran_la_LINK): Add $(libgfortran_la_LDFLAGS).
94 * Makefile.in: Regenerate.
96 2009-08-20 Thomas Koenig <tkoenig@gcc.gnu.org>
98 PR libfortran/40962
99 * iso_c_binding.c (c_f_pointer_u0): Multiply stride by
100 previous stride.
102 2009-08-20 Dave Korn <dave.korn.cygwin@gmail.com>
104 * Makefile.am (LTLDFLAGS): Add -bindir flag.
105 * Makefile.in: Regenerate.
107 2009-08-17 Jerry DeLisle <jvdelisle@gcc.gnu.org>
109 PR fortran/41075
110 * io/io.h (enum format_token): Add FMT_STAR.
111 * io/format.c (format_lex): Add case for FMT_STAR.
112 (parse_format_list): Parse FMT_STAR and check for left paren
113 after. (next_format0): Modify helper function to check for
114 unimited format and return the repeated format node. Update
115 comments to clarify.
117 2009-08-15 Kai Tietz <kai.tietz@onevision.com>
119 * intrinsics/string_intrinsics_inc.c (string_len_trim): Use
120 __INTPTR_TYPE__ to cast from pointer to scalar integer, if
121 __INTPTR_TYPE is defined.
123 2009-08-14 Janne Blomqvist <jb@gcc.gnu.org>
125 * fmain.c: Add comment saying file is deprecated.
127 2009-08-14 Janne Blomqvist <jb@gcc.gnu.org>
129 PR libfortran/40863
130 * gfortran.map: Move new symbols to GFORTRAN_C99_1.1 version node.
132 2009-08-09 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
134 PR libfortran/40549
135 * Makefile.in (LTLDFLAGS): Add -no-undefined.
136 * Makefile.am: Regenerate.
137 * libgfortran.h: Remove unused block of code.
139 2009-08-02 Jerry DeLisle <jvdelisle@gcc.gnu.org>
141 PR libfortran/40853
142 * io/list_read.c (nml_get_obj_data): Do not set nl
143 pointer to first_nl if nl->next is NULL.
145 2009-07-31 Kaz Kojima <kkojima@gcc.gnu.org>
147 * Makefile.am: Don't set SECTION_FLAGS with @SECTION_FLAGS@.
148 Don't set IEEE_FLAGS with @IEEE_FLAGS@.
149 * Makefile.in: Regenerate.
151 2009-07-30 Kaz Kojima <kkojima@gcc.gnu.org>
153 * configure.host: Define ieee_flags and set it to -mieee for sh.
154 * configure.ac: Set IEEE_FLAGS with ieee_flags.
155 * Makefile.am: Add IEEE_FLAGS to AM_CFLAGS.
156 * configure: Regenerate.
157 * Makefile.in: Regenerate.
159 2009-07-30 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
161 * configure.ac (_AC_ARG_VAR_PRECIOUS): Use m4_rename_force.
163 2009-07-27 Tobias Burnus <burnus@net-b.de>
165 PR fortran/40863
166 * c99_functions.c: Define complex I, if not defined.
167 Create prototypes for C99 functions to silence warnings.
168 * gfortran.map: Add missing functions to GFORTRAN_C99_1.0
169 and new GFORTRAN_C99_1.1.
171 2009-07-25 Tobias Burnus <burnus@net-b.de>
173 PR fortran/33197
174 * intrinsics/c99_functions.c (cacosf,cacos,cacosl,casinf,
175 casin,casind,catanf,catan,catanl,cacoshf,cacosh,cacoshl,
176 casinhf,casinh,casinhf,catanhf,catanh,catanhl): New functions.
177 * c99_protos.h: Add prototypes for those.
179 2009-07-24 Jakub Jelinek <jakub@redhat.com>
181 PR fortran/40643
182 PR fortran/31067
183 * libgfortran.h (GFC_REAL_4_INFINITY, GFC_REAL_8_INFINITY,
184 GFC_REAL_10_INFINITY, GFC_REAL_16_INFINITY, GFC_REAL_4_QUIET_NAN,
185 GFC_REAL_8_QUIET_NAN, GFC_REAL_10_QUIET_NAN, GFC_REAL_16_QUIET_NAN):
186 Define.
187 * m4/iparm.m4 (atype_inf, atype_nan): Define.
188 * m4/ifunction.m4: Formatting.
189 * m4/iforeach.m4: Likewise.
190 (START_FOREACH_FUNCTION): Initialize dest to all 1s, not all 0s.
191 (START_FOREACH_BLOCK, FINISH_FOREACH_FUNCTION,
192 FINISH_MASKED_FOREACH_FUNCTION): Run foreach block inside a loop
193 until count[0] == extent[0].
194 * m4/minval.m4: Formatting. Handle NaNs and infinities. Optimize.
195 * m4/maxval.m4: Likewise.
196 * m4/minloc0.m4: Likewise.
197 * m4/maxloc0.m4: Likewise.
198 * m4/minloc1.m4: Likewise.
199 * m4/maxloc1.m4: Likewise.
200 * generated/maxloc0_16_i16.c: Regenerated.
201 * generated/maxloc0_16_i1.c: Likewise.
202 * generated/maxloc0_16_i2.c: Likewise.
203 * generated/maxloc0_16_i4.c: Likewise.
204 * generated/maxloc0_16_i8.c: Likewise.
205 * generated/maxloc0_16_r10.c: Likewise.
206 * generated/maxloc0_16_r16.c: Likewise.
207 * generated/maxloc0_16_r4.c: Likewise.
208 * generated/maxloc0_16_r8.c: Likewise.
209 * generated/maxloc0_4_i16.c: Likewise.
210 * generated/maxloc0_4_i1.c: Likewise.
211 * generated/maxloc0_4_i2.c: Likewise.
212 * generated/maxloc0_4_i4.c: Likewise.
213 * generated/maxloc0_4_i8.c: Likewise.
214 * generated/maxloc0_4_r10.c: Likewise.
215 * generated/maxloc0_4_r16.c: Likewise.
216 * generated/maxloc0_4_r4.c: Likewise.
217 * generated/maxloc0_4_r8.c: Likewise.
218 * generated/maxloc0_8_i16.c: Likewise.
219 * generated/maxloc0_8_i1.c: Likewise.
220 * generated/maxloc0_8_i2.c: Likewise.
221 * generated/maxloc0_8_i4.c: Likewise.
222 * generated/maxloc0_8_i8.c: Likewise.
223 * generated/maxloc0_8_r10.c: Likewise.
224 * generated/maxloc0_8_r16.c: Likewise.
225 * generated/maxloc0_8_r4.c: Likewise.
226 * generated/maxloc0_8_r8.c: Likewise.
227 * generated/maxloc1_16_i16.c: Likewise.
228 * generated/maxloc1_16_i1.c: Likewise.
229 * generated/maxloc1_16_i2.c: Likewise.
230 * generated/maxloc1_16_i4.c: Likewise.
231 * generated/maxloc1_16_i8.c: Likewise.
232 * generated/maxloc1_16_r10.c: Likewise.
233 * generated/maxloc1_16_r16.c: Likewise.
234 * generated/maxloc1_16_r4.c: Likewise.
235 * generated/maxloc1_16_r8.c: Likewise.
236 * generated/maxloc1_4_i16.c: Likewise.
237 * generated/maxloc1_4_i1.c: Likewise.
238 * generated/maxloc1_4_i2.c: Likewise.
239 * generated/maxloc1_4_i4.c: Likewise.
240 * generated/maxloc1_4_i8.c: Likewise.
241 * generated/maxloc1_4_r10.c: Likewise.
242 * generated/maxloc1_4_r16.c: Likewise.
243 * generated/maxloc1_4_r4.c: Likewise.
244 * generated/maxloc1_4_r8.c: Likewise.
245 * generated/maxloc1_8_i16.c: Likewise.
246 * generated/maxloc1_8_i1.c: Likewise.
247 * generated/maxloc1_8_i2.c: Likewise.
248 * generated/maxloc1_8_i4.c: Likewise.
249 * generated/maxloc1_8_i8.c: Likewise.
250 * generated/maxloc1_8_r10.c: Likewise.
251 * generated/maxloc1_8_r16.c: Likewise.
252 * generated/maxloc1_8_r4.c: Likewise.
253 * generated/maxloc1_8_r8.c: Likewise.
254 * generated/maxval_i16.c: Likewise.
255 * generated/maxval_i1.c: Likewise.
256 * generated/maxval_i2.c: Likewise.
257 * generated/maxval_i4.c: Likewise.
258 * generated/maxval_i8.c: Likewise.
259 * generated/maxval_r10.c: Likewise.
260 * generated/maxval_r16.c: Likewise.
261 * generated/maxval_r4.c: Likewise.
262 * generated/maxval_r8.c: Likewise.
263 * generated/minloc0_16_i16.c: Likewise.
264 * generated/minloc0_16_i1.c: Likewise.
265 * generated/minloc0_16_i2.c: Likewise.
266 * generated/minloc0_16_i4.c: Likewise.
267 * generated/minloc0_16_i8.c: Likewise.
268 * generated/minloc0_16_r10.c: Likewise.
269 * generated/minloc0_16_r16.c: Likewise.
270 * generated/minloc0_16_r4.c: Likewise.
271 * generated/minloc0_16_r8.c: Likewise.
272 * generated/minloc0_4_i16.c: Likewise.
273 * generated/minloc0_4_i1.c: Likewise.
274 * generated/minloc0_4_i2.c: Likewise.
275 * generated/minloc0_4_i4.c: Likewise.
276 * generated/minloc0_4_i8.c: Likewise.
277 * generated/minloc0_4_r10.c: Likewise.
278 * generated/minloc0_4_r16.c: Likewise.
279 * generated/minloc0_4_r4.c: Likewise.
280 * generated/minloc0_4_r8.c: Likewise.
281 * generated/minloc0_8_i16.c: Likewise.
282 * generated/minloc0_8_i1.c: Likewise.
283 * generated/minloc0_8_i2.c: Likewise.
284 * generated/minloc0_8_i4.c: Likewise.
285 * generated/minloc0_8_i8.c: Likewise.
286 * generated/minloc0_8_r10.c: Likewise.
287 * generated/minloc0_8_r16.c: Likewise.
288 * generated/minloc0_8_r4.c: Likewise.
289 * generated/minloc0_8_r8.c: Likewise.
290 * generated/minloc1_16_i16.c: Likewise.
291 * generated/minloc1_16_i1.c: Likewise.
292 * generated/minloc1_16_i2.c: Likewise.
293 * generated/minloc1_16_i4.c: Likewise.
294 * generated/minloc1_16_i8.c: Likewise.
295 * generated/minloc1_16_r10.c: Likewise.
296 * generated/minloc1_16_r16.c: Likewise.
297 * generated/minloc1_16_r4.c: Likewise.
298 * generated/minloc1_16_r8.c: Likewise.
299 * generated/minloc1_4_i16.c: Likewise.
300 * generated/minloc1_4_i1.c: Likewise.
301 * generated/minloc1_4_i2.c: Likewise.
302 * generated/minloc1_4_i4.c: Likewise.
303 * generated/minloc1_4_i8.c: Likewise.
304 * generated/minloc1_4_r10.c: Likewise.
305 * generated/minloc1_4_r16.c: Likewise.
306 * generated/minloc1_4_r4.c: Likewise.
307 * generated/minloc1_4_r8.c: Likewise.
308 * generated/minloc1_8_i16.c: Likewise.
309 * generated/minloc1_8_i1.c: Likewise.
310 * generated/minloc1_8_i2.c: Likewise.
311 * generated/minloc1_8_i4.c: Likewise.
312 * generated/minloc1_8_i8.c: Likewise.
313 * generated/minloc1_8_r10.c: Likewise.
314 * generated/minloc1_8_r16.c: Likewise.
315 * generated/minloc1_8_r4.c: Likewise.
316 * generated/minloc1_8_r8.c: Likewise.
317 * generated/minval_i16.c: Likewise.
318 * generated/minval_i1.c: Likewise.
319 * generated/minval_i2.c: Likewise.
320 * generated/minval_i4.c: Likewise.
321 * generated/minval_i8.c: Likewise.
322 * generated/minval_r10.c: Likewise.
323 * generated/minval_r16.c: Likewise.
324 * generated/minval_r4.c: Likewise.
325 * generated/minval_r8.c: Likewise.
326 * generated/product_c10.c: Likewise.
327 * generated/product_c16.c: Likewise.
328 * generated/product_c4.c: Likewise.
329 * generated/product_c8.c: Likewise.
330 * generated/product_i16.c: Likewise.
331 * generated/product_i1.c: Likewise.
332 * generated/product_i2.c: Likewise.
333 * generated/product_i4.c: Likewise.
334 * generated/product_i8.c: Likewise.
335 * generated/product_r10.c: Likewise.
336 * generated/product_r16.c: Likewise.
337 * generated/product_r4.c: Likewise.
338 * generated/product_r8.c: Likewise.
339 * generated/sum_c10.c: Likewise.
340 * generated/sum_c16.c: Likewise.
341 * generated/sum_c4.c: Likewise.
342 * generated/sum_c8.c: Likewise.
343 * generated/sum_i16.c: Likewise.
344 * generated/sum_i1.c: Likewise.
345 * generated/sum_i2.c: Likewise.
346 * generated/sum_i4.c: Likewise.
347 * generated/sum_i8.c: Likewise.
348 * generated/sum_r10.c: Likewise.
349 * generated/sum_r16.c: Likewise.
350 * generated/sum_r4.c: Likewise.
351 * generated/sum_r8.c: Likewise.
353 2009-07-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
355 PR libfortran/32784
356 * unix.c (regular_file): Check for CONIN$ CONOUT$, and CONERR$ and open
357 the respective /dev/conin or /dev/conout devices. This is Cygwin
358 specific.
360 2009-07-19 Thomas Koenig <tkoenig@gcc.gnu.org>
362 PR libfortran/34670
363 PR libfortran/36874
364 * Makefile.am: Add bounds.c
365 * libgfortran.h (bounds_equal_extents): Add prototype.
366 (bounds_iforeach_return): Likewise.
367 (bounds_ifunction_return): Likewise.
368 (bounds_reduced_extents): Likewise.
369 * runtime/bounds.c: New file.
370 (bounds_iforeach_return): New function; correct typo in
371 error message.
372 (bounds_ifunction_return): New function.
373 (bounds_equal_extents): New function.
374 (bounds_reduced_extents): Likewise.
375 * intrinsics/cshift0.c (cshift0): Use new functions
376 for bounds checking.
377 * intrinsics/eoshift0.c (eoshift0): Likewise.
378 * intrinsics/eoshift2.c (eoshift2): Likewise.
379 * m4/iforeach.m4: Likewise.
380 * m4/eoshift1.m4: Likewise.
381 * m4/eoshift3.m4: Likewise.
382 * m4/cshift1.m4: Likewise.
383 * m4/ifunction.m4: Likewise.
384 * Makefile.in: Regenerated.
385 * generated/cshift1_16.c: Regenerated.
386 * generated/cshift1_4.c: Regenerated.
387 * generated/cshift1_8.c: Regenerated.
388 * generated/eoshift1_16.c: Regenerated.
389 * generated/eoshift1_4.c: Regenerated.
390 * generated/eoshift1_8.c: Regenerated.
391 * generated/eoshift3_16.c: Regenerated.
392 * generated/eoshift3_4.c: Regenerated.
393 * generated/eoshift3_8.c: Regenerated.
394 * generated/maxloc0_16_i1.c: Regenerated.
395 * generated/maxloc0_16_i16.c: Regenerated.
396 * generated/maxloc0_16_i2.c: Regenerated.
397 * generated/maxloc0_16_i4.c: Regenerated.
398 * generated/maxloc0_16_i8.c: Regenerated.
399 * generated/maxloc0_16_r10.c: Regenerated.
400 * generated/maxloc0_16_r16.c: Regenerated.
401 * generated/maxloc0_16_r4.c: Regenerated.
402 * generated/maxloc0_16_r8.c: Regenerated.
403 * generated/maxloc0_4_i1.c: Regenerated.
404 * generated/maxloc0_4_i16.c: Regenerated.
405 * generated/maxloc0_4_i2.c: Regenerated.
406 * generated/maxloc0_4_i4.c: Regenerated.
407 * generated/maxloc0_4_i8.c: Regenerated.
408 * generated/maxloc0_4_r10.c: Regenerated.
409 * generated/maxloc0_4_r16.c: Regenerated.
410 * generated/maxloc0_4_r4.c: Regenerated.
411 * generated/maxloc0_4_r8.c: Regenerated.
412 * generated/maxloc0_8_i1.c: Regenerated.
413 * generated/maxloc0_8_i16.c: Regenerated.
414 * generated/maxloc0_8_i2.c: Regenerated.
415 * generated/maxloc0_8_i4.c: Regenerated.
416 * generated/maxloc0_8_i8.c: Regenerated.
417 * generated/maxloc0_8_r10.c: Regenerated.
418 * generated/maxloc0_8_r16.c: Regenerated.
419 * generated/maxloc0_8_r4.c: Regenerated.
420 * generated/maxloc0_8_r8.c: Regenerated.
421 * generated/maxloc1_16_i1.c: Regenerated.
422 * generated/maxloc1_16_i16.c: Regenerated.
423 * generated/maxloc1_16_i2.c: Regenerated.
424 * generated/maxloc1_16_i4.c: Regenerated.
425 * generated/maxloc1_16_i8.c: Regenerated.
426 * generated/maxloc1_16_r10.c: Regenerated.
427 * generated/maxloc1_16_r16.c: Regenerated.
428 * generated/maxloc1_16_r4.c: Regenerated.
429 * generated/maxloc1_16_r8.c: Regenerated.
430 * generated/maxloc1_4_i1.c: Regenerated.
431 * generated/maxloc1_4_i16.c: Regenerated.
432 * generated/maxloc1_4_i2.c: Regenerated.
433 * generated/maxloc1_4_i4.c: Regenerated.
434 * generated/maxloc1_4_i8.c: Regenerated.
435 * generated/maxloc1_4_r10.c: Regenerated.
436 * generated/maxloc1_4_r16.c: Regenerated.
437 * generated/maxloc1_4_r4.c: Regenerated.
438 * generated/maxloc1_4_r8.c: Regenerated.
439 * generated/maxloc1_8_i1.c: Regenerated.
440 * generated/maxloc1_8_i16.c: Regenerated.
441 * generated/maxloc1_8_i2.c: Regenerated.
442 * generated/maxloc1_8_i4.c: Regenerated.
443 * generated/maxloc1_8_i8.c: Regenerated.
444 * generated/maxloc1_8_r10.c: Regenerated.
445 * generated/maxloc1_8_r16.c: Regenerated.
446 * generated/maxloc1_8_r4.c: Regenerated.
447 * generated/maxloc1_8_r8.c: Regenerated.
448 * generated/maxval_i1.c: Regenerated.
449 * generated/maxval_i16.c: Regenerated.
450 * generated/maxval_i2.c: Regenerated.
451 * generated/maxval_i4.c: Regenerated.
452 * generated/maxval_i8.c: Regenerated.
453 * generated/maxval_r10.c: Regenerated.
454 * generated/maxval_r16.c: Regenerated.
455 * generated/maxval_r4.c: Regenerated.
456 * generated/maxval_r8.c: Regenerated.
457 * generated/minloc0_16_i1.c: Regenerated.
458 * generated/minloc0_16_i16.c: Regenerated.
459 * generated/minloc0_16_i2.c: Regenerated.
460 * generated/minloc0_16_i4.c: Regenerated.
461 * generated/minloc0_16_i8.c: Regenerated.
462 * generated/minloc0_16_r10.c: Regenerated.
463 * generated/minloc0_16_r16.c: Regenerated.
464 * generated/minloc0_16_r4.c: Regenerated.
465 * generated/minloc0_16_r8.c: Regenerated.
466 * generated/minloc0_4_i1.c: Regenerated.
467 * generated/minloc0_4_i16.c: Regenerated.
468 * generated/minloc0_4_i2.c: Regenerated.
469 * generated/minloc0_4_i4.c: Regenerated.
470 * generated/minloc0_4_i8.c: Regenerated.
471 * generated/minloc0_4_r10.c: Regenerated.
472 * generated/minloc0_4_r16.c: Regenerated.
473 * generated/minloc0_4_r4.c: Regenerated.
474 * generated/minloc0_4_r8.c: Regenerated.
475 * generated/minloc0_8_i1.c: Regenerated.
476 * generated/minloc0_8_i16.c: Regenerated.
477 * generated/minloc0_8_i2.c: Regenerated.
478 * generated/minloc0_8_i4.c: Regenerated.
479 * generated/minloc0_8_i8.c: Regenerated.
480 * generated/minloc0_8_r10.c: Regenerated.
481 * generated/minloc0_8_r16.c: Regenerated.
482 * generated/minloc0_8_r4.c: Regenerated.
483 * generated/minloc0_8_r8.c: Regenerated.
484 * generated/minloc1_16_i1.c: Regenerated.
485 * generated/minloc1_16_i16.c: Regenerated.
486 * generated/minloc1_16_i2.c: Regenerated.
487 * generated/minloc1_16_i4.c: Regenerated.
488 * generated/minloc1_16_i8.c: Regenerated.
489 * generated/minloc1_16_r10.c: Regenerated.
490 * generated/minloc1_16_r16.c: Regenerated.
491 * generated/minloc1_16_r4.c: Regenerated.
492 * generated/minloc1_16_r8.c: Regenerated.
493 * generated/minloc1_4_i1.c: Regenerated.
494 * generated/minloc1_4_i16.c: Regenerated.
495 * generated/minloc1_4_i2.c: Regenerated.
496 * generated/minloc1_4_i4.c: Regenerated.
497 * generated/minloc1_4_i8.c: Regenerated.
498 * generated/minloc1_4_r10.c: Regenerated.
499 * generated/minloc1_4_r16.c: Regenerated.
500 * generated/minloc1_4_r4.c: Regenerated.
501 * generated/minloc1_4_r8.c: Regenerated.
502 * generated/minloc1_8_i1.c: Regenerated.
503 * generated/minloc1_8_i16.c: Regenerated.
504 * generated/minloc1_8_i2.c: Regenerated.
505 * generated/minloc1_8_i4.c: Regenerated.
506 * generated/minloc1_8_i8.c: Regenerated.
507 * generated/minloc1_8_r10.c: Regenerated.
508 * generated/minloc1_8_r16.c: Regenerated.
509 * generated/minloc1_8_r4.c: Regenerated.
510 * generated/minloc1_8_r8.c: Regenerated.
511 * generated/minval_i1.c: Regenerated.
512 * generated/minval_i16.c: Regenerated.
513 * generated/minval_i2.c: Regenerated.
514 * generated/minval_i4.c: Regenerated.
515 * generated/minval_i8.c: Regenerated.
516 * generated/minval_r10.c: Regenerated.
517 * generated/minval_r16.c: Regenerated.
518 * generated/minval_r4.c: Regenerated.
519 * generated/minval_r8.c: Regenerated.
520 * generated/product_c10.c: Regenerated.
521 * generated/product_c16.c: Regenerated.
522 * generated/product_c4.c: Regenerated.
523 * generated/product_c8.c: Regenerated.
524 * generated/product_i1.c: Regenerated.
525 * generated/product_i16.c: Regenerated.
526 * generated/product_i2.c: Regenerated.
527 * generated/product_i4.c: Regenerated.
528 * generated/product_i8.c: Regenerated.
529 * generated/product_r10.c: Regenerated.
530 * generated/product_r16.c: Regenerated.
531 * generated/product_r4.c: Regenerated.
532 * generated/product_r8.c: Regenerated.
533 * generated/sum_c10.c: Regenerated.
534 * generated/sum_c16.c: Regenerated.
535 * generated/sum_c4.c: Regenerated.
536 * generated/sum_c8.c: Regenerated.
537 * generated/sum_i1.c: Regenerated.
538 * generated/sum_i16.c: Regenerated.
539 * generated/sum_i2.c: Regenerated.
540 * generated/sum_i4.c: Regenerated.
541 * generated/sum_i8.c: Regenerated.
542 * generated/sum_r10.c: Regenerated.
543 * generated/sum_r16.c: Regenerated.
544 * generated/sum_r4.c: Regenerated.
545 * generated/sum_r8.c: Regenerated.
547 2009-07-17 Janne Blomqvist <jb@gcc.gnu.org>
548 Jerry DeLisle <jvdelisle@gcc.gnu.org>
550 PR libfortran/40714
551 * io/transfer.c (finalize_transfer): Set current_record to 0
552 before returning in case of error.
554 2009-07-12 Tobias Burnus <burnus@net-b.de>
556 PR libfortran/22423
557 * io/io.h (namelist_type): Use the proper enum for GFC_DTYPE_*.
558 * intrinsics/iso_c_binding.c (c_f_pointer_u0): Make sure
559 variable is initialized to silence warning.
561 2009-07-10 Steven G. Kargl <kargl@gcc.gnu.org>
563 * c99_functions.c (ccoshf, ccosh, ccoshl, ctanhf, ctanh, ctanl):
564 Fix errant minus.
566 2009-07-08 Jerry DeLisle <jvdelisle@gcc.gnu.org>
568 PR libfortran/40330
569 PR libfortran/40662
570 * io/io.h (st_parameter_dt): Define format_not_saved bit used to signal
571 whether the parsed format data was previously saved. Used to determine
572 if the current format data should be freed or not.
573 * io/transfer.c (st_read_done): Use the format_not_saved bit.
574 (st_write_done): Likewise.
575 * io/format.c (parse_format_list): Add boolean pointer to arg list. This
576 pointer is used to return status to the caller regarding whether it is
577 safe to cache the parsed format data. Currently, if a FMT_STRING token
578 is encounetered, it is not safe to cache. Also, added a local boolean
579 variable to hold this information as recursive calls to
580 parse_format_list are made. Remove previous save_format logic.
581 (parse_format): Do not use the format caching facility if the current
582 unit is an internal unit or if it is not safe to save parsed format
583 data.
585 2009-06-29 Jerry DeLisle <jvdelisle@gcc.gnu.org>
587 PR libfortran/40576
588 * io/transfer.c (sset): Adjust exit condition for loop.
590 2009-06-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
592 PR libfortran/40508
593 * io/format.c: Don't save parsed format data for internal units.
595 2009-06-21 Thomas Koenig <tkoenig@gcc.gnu.org>
597 PR fortran/37577
598 Port from fortran-dev
599 * runtime/in_pack_generic (internal_pack): Remove unnecessary
600 test for stride == 0.
601 * runtime/in_unpack_generic.c (internal_unpack): Likewise.
602 * intrinsics/iso_c_binding.c (c_f_pointer_u0): Take care
603 of stride in "shape" argument. Use array access macros for
604 accessing array descriptors.
605 * libgfortran.h (struct descriptor_dimension): Change stride
606 to _stride, lbound to _lbound and ubound to _ubound.
607 (GFC_DIMENSION_LBOUND): Use new name(s) in struct
608 descriptor_dimension.
609 (GFC_DIMENSION_UBOUND): Likewise.
610 (GFC_DIMENSION_STRIDE): Likewise.
611 (GFC_DIMENSION_EXTENT): Likewise.
612 (GFC_DIMENSION_SET): Likewise.
613 (GFC_DESCRIPTOR_LBOUND): Likewise.
614 (GFC_DESCRIPTOR_UBOUND): Likewise.
615 (GFC_DESCRIPTOR_EXTENT): Likewise.
616 (GFC_DESCRIPTOR_STRIDE): Likewise.
617 * io/transfer.c (transfer_array): Use array access macros.
618 Use byte-sized strides.
619 * intrinsics/eoshift0.c (eoshift0): Use array access
620 macros everywhere.
621 * m4/in_pack.m4 (internal_pack_'rtype_ccode`): Use
622 array access macros for accessing array descriptors.
623 * m4/in_unpack.m4 (internal_unpack_'rtype_ccode`):
624 Likewise.
625 * m4/matmull.m4 (matmul_'rtype_code`): Likewise.
626 * m4/matmul.m4 (matmul_'rtype_code`): Likewise.
627 * m4/unpack.m4 (unpack0_'rtype_code`): Likewise.
628 (unpack1_'rtype_code`): Likewise.
629 * m4/ifunction_logical.m4 (name`'rtype_qual`_'atype_code): Likewise.
630 * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): Use array access
631 macros everywhere.
632 * intrinsics/dtime.c (dtime_sub): Use array access macros
633 for accessing array descriptors.
634 * intrinsics/cshift0 (cshift0): Likewise.
635 * intrinsics/etime.c: Likewise. Remove redundant calculation
636 of rdim.
637 * m4/cshift0.m4 (cshift0_'rtype_code`): Use array access macros
638 for accessing array descriptors.
639 * m4/pack.m4 (pack_'rtype_code`): Likewise.
640 * m4/spread.m4 (spread_'rtype_code`): Likewise.
641 (spread_scalar_'rtype_code`): Likewise.
642 * m4/transpose.m4 (transpose_'rtype_code`): Likewise.
643 * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Likewise.
644 * m4/eoshift1.m4 (eoshift1): Likewise. Remove size argument,
645 calculate within function.
646 (eoshift1_'atype_kind`): Remove size argument from call
647 to eoshift1.
648 (eoshift1_'atype_kind`_char): Likewise.
649 (eoshift1_'atype_kind`_char4): Likewise.
650 * m4/eoshift3.m4 (eoshift3): Remove size argument, calculate
651 within function. Use array access macros for accessing array
652 descriptors.
653 (eoshift3_'atype_kind`): Remove size argument from call
654 to eoshift1.
655 (eoshift3_'atype_kind`_char): Likewise.
656 (eoshift3_'atype_kind`_char4): Likewise.
657 * m4/shape.m4 (shape_'rtype_kind`): Use array access macros
658 for accessing array descriptors.
659 * m4/cshift1.m4 (cshift1): Remove size argument, calculate
660 within function. Use array access macros for accessing array
661 descriptors.
662 (cshift1_'atype_kind`): Remove size argument from call to
663 cshift1.
664 (cshift1_'atype_kind`_char): Remove size argument from call to
665 cshift1.
666 (cshift1_'atype_kind`_char4): Remove size argument from call to
667 cshift1.
668 * m4/reshape.m4 (reshape_'rtype_ccode`): Use array access macros
669 for accessing array descriptors.
670 * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): Likewise.
671 * intrinsics/pack_generic.c (pack_internal): Use array access
672 macros for accessing array descriptors.
673 (pack_s_internal): Likewise.
674 * intrinsics/transpose_generic.c (transpose_internal): Remove
675 size argument, calculate from array descriptor. Use array
676 access macros for accessing array descriptors.
677 (transpose): Remove size argument from call.
678 (transpoe_char): Likewise.
679 (transpose_char4): Likewise.
680 * intrinsics/move_alloc.c (move_alloc): Use array access macros
681 for accessing array descriptors.
682 * intrinsics/spread_generic.c (spread_internal): Remove size
683 argument, calculate from array descriptor. Use array access
684 macros for accessing array descriptors.
685 (spread_internal_scalar): Likewise.
686 (spread): Remove size argument from call to spread_internal.
687 (spread_char): Mark argument source_length as unused.
688 Remove size argument from call to spread_internal.
689 (spread_char4): Likewise.
690 (spread_char_scalar): Likewise.
691 (spread_char4_scalar): Likewise.
692 * intrinsics/unpack_generic.c (unpack_internal): Use array access
693 macros for accessing array descriptors.
694 * intrinsics/eoshift2.c (eoshift2): Remove size argument, calculate
695 from array descriptor instead. Use array access macros for
696 accessing array descriptors.
697 (eoshift2_##N): Remove size argument from call to eoshift2.
698 (eoshift2_##N_##char): Likewise.
699 (eoshift2_##N_##char4): Likewise.
700 * intrinsics/reshape_generic.c (reshape_internal): Use array
701 access macross for accessing array descriptors.
702 * libgfortran.h: Introduce new macros GFC_DIMENSION_LBOUND,
703 GFC_DIMENSION_UBOUND,GFC_DIMENSION_STRIDE, GFC_DIMENSION_EXTENT,
704 GFC_DIMENSION_SET, GFC_DESCRIPTOR_LBOUND, GFC_DESCRIPTOR_UBOUND,
705 GFC_DESCRIPTOR_EXTENT, GFC_DESCRIPTOR_EXTENT_BYTES,
706 GFC_DESCRIPTOR_STRIDE, GFC_DESCRIPTOR_STRIDE_BYTES
707 * runtime/in_pack_generic.c (internal_pack): Use new macros
708 for array descriptor access.
709 * runtime/in_unpack_generic.c (internal_unpack): Likewise.
710 * intrinsics/dtime.c (dtime_sub): Likewise.
711 * intrinsics/cshift0 (cshift0): Remove argument size,
712 calculate directly from the array descriptor. Use new macros
713 for array descriptor access.
714 * cshift0_##N: Remove shift argument in call to cshift0.
715 * cshift0_##N_char: Mark array_length as unused. Remove
716 array_length in call to cshift0.
717 * cshift0_##N_char4: Likewise.
718 * intrisics/etime.c: Use new macros for array descriptor access.
719 * intrinsics/stat.c (stat_i4_sub_0): Likewise.
720 (stat_i8_sub_0): Likewise.
721 (fstat_i4_sub): Likewise.
722 (fstat_i8_sub): Likewise.
723 * intrinsics/date_and_time.c (date_and_time): Likewise.
724 (secnds): Likewise.
725 (itime_i4): Likewise.
726 (itime_i8): Likewise.
727 (idate_i4): Likewise.
728 (idate_i8): Likewise.
729 (gmtime_i4): Likewise.
730 (gmtime_i8): Likewise.
731 (ltime_i4): Likewise.
732 (litme_i8): Likewise.
733 * intrinsics/associated.c (associated): Likewise.
734 * intrinsics/eoshift0.c (eoshift0): Likewise.
735 * intriniscs/size.c (size0): Likewise.
736 * intrinsics/random.c (arandom_r4): Likewise.
737 (arandom_r8): Likewise.
738 (arandom_r10): Likewise.
739 (arandom_r16): Likewise.
740 (random_seed_i4): Likewise.
741 (random_seed_i8): Likewise.
742 * io/list_read.c (nml_parse_qualifier): Likewise.
743 (nml_touch_nodes): Likewise.
744 (nml_read_obj): Likewise.
745 (get_name): Likewise.
746 * io/transfer.c (transfer_array): Likewise.
747 (init_loop_spec): Likewise.
748 (st_set_nml_var_dim): Likewise.
749 * io/write.c (nml_write_obj): Likewise.
750 (obj_loop): Likewise.
751 * generated/all_l1.c: Regenerated.
752 * generated/all_l16.c: Regenerated.
753 * generated/all_l2.c: Regenerated.
754 * generated/all_l4.c: Regenerated.
755 * generated/all_l8.c: Regenerated.
756 * generated/any_l1.c: Regenerated.
757 * generated/any_l16.c: Regenerated.
758 * generated/any_l2.c: Regenerated.
759 * generated/any_l4.c: Regenerated.
760 * generated/any_l8.c: Regenerated.
761 * generated/count_16_l.c: Regenerated.
762 * generated/count_1_l.c: Regenerated.
763 * generated/count_2_l.c: Regenerated.
764 * generated/count_4_l.c: Regenerated.
765 * generated/count_8_l.c: Regenerated.
766 * generated/cshift0_c10.c: Regenerated.
767 * generated/cshift0_c16.c: Regenerated.
768 * generated/cshift0_c4.c: Regenerated.
769 * generated/cshift0_c8.c: Regenerated.
770 * generated/cshift0_i1.c: Regenerated.
771 * generated/cshift0_i16.c: Regenerated.
772 * generated/cshift0_i2.c: Regenerated.
773 * generated/cshift0_i4.c: Regenerated.
774 * generated/cshift0_i8.c: Regenerated.
775 * generated/cshift0_r10.c: Regenerated.
776 * generated/cshift0_r16.c: Regenerated.
777 * generated/cshift0_r4.c: Regenerated.
778 * generated/cshift0_r8.c: Regenerated.
779 * generated/cshift1_16.c: Regenerated.
780 * generated/cshift1_4.c: Regenerated.
781 * generated/cshift1_8.c: Regenerated.
782 * generated/eoshift1_16.c: Regenerated.
783 * generated/eoshift1_4.c: Regenerated.
784 * generated/eoshift1_8.c: Regenerated.
785 * generated/eoshift3_16.c: Regenerated.
786 * generated/eoshift3_4.c: Regenerated.
787 * generated/eoshift3_8.c: Regenerated.
788 * generated/in_pack_c10.c: Regenerated.
789 * generated/in_pack_c16.c: Regenerated.
790 * generated/in_pack_c4.c: Regenerated.
791 * generated/in_pack_c8.c: Regenerated.
792 * generated/in_pack_i1.c: Regenerated.
793 * generated/in_pack_i16.c: Regenerated.
794 * generated/in_pack_i2.c: Regenerated.
795 * generated/in_pack_i4.c: Regenerated.
796 * generated/in_pack_i8.c: Regenerated.
797 * generated/in_pack_r10.c: Regenerated.
798 * generated/in_pack_r16.c: Regenerated.
799 * generated/in_pack_r4.c: Regenerated.
800 * generated/in_pack_r8.c: Regenerated.
801 * generated/in_unpack_c10.c: Regenerated.
802 * generated/in_unpack_c16.c: Regenerated.
803 * generated/in_unpack_c4.c: Regenerated.
804 * generated/in_unpack_c8.c: Regenerated.
805 * generated/in_unpack_i1.c: Regenerated.
806 * generated/in_unpack_i16.c: Regenerated.
807 * generated/in_unpack_i2.c: Regenerated.
808 * generated/in_unpack_i4.c: Regenerated.
809 * generated/in_unpack_i8.c: Regenerated.
810 * generated/in_unpack_r10.c: Regenerated.
811 * generated/in_unpack_r16.c: Regenerated.
812 * generated/in_unpack_r4.c: Regenerated.
813 * generated/in_unpack_r8.c: Regenerated.
814 * generated/matmul_c10.c: Regenerated.
815 * generated/matmul_c16.c: Regenerated.
816 * generated/matmul_c4.c: Regenerated.
817 * generated/matmul_c8.c: Regenerated.
818 * generated/matmul_i1.c: Regenerated.
819 * generated/matmul_i16.c: Regenerated.
820 * generated/matmul_i2.c: Regenerated.
821 * generated/matmul_i4.c: Regenerated.
822 * generated/matmul_i8.c: Regenerated.
823 * generated/matmul_l16.c: Regenerated.
824 * generated/matmul_l4.c: Regenerated.
825 * generated/matmul_l8.c: Regenerated.
826 * generated/matmul_r10.c: Regenerated.
827 * generated/matmul_r16.c: Regenerated.
828 * generated/matmul_r4.c: Regenerated.
829 * generated/matmul_r8.c: Regenerated.
830 * generated/maxloc0_16_i1.c: Regenerated.
831 * generated/maxloc0_16_i16.c: Regenerated.
832 * generated/maxloc0_16_i2.c: Regenerated.
833 * generated/maxloc0_16_i4.c: Regenerated.
834 * generated/maxloc0_16_i8.c: Regenerated.
835 * generated/maxloc0_16_r10.c: Regenerated.
836 * generated/maxloc0_16_r16.c: Regenerated.
837 * generated/maxloc0_16_r4.c: Regenerated.
838 * generated/maxloc0_16_r8.c: Regenerated.
839 * generated/maxloc0_4_i1.c: Regenerated.
840 * generated/maxloc0_4_i16.c: Regenerated.
841 * generated/maxloc0_4_i2.c: Regenerated.
842 * generated/maxloc0_4_i4.c: Regenerated.
843 * generated/maxloc0_4_i8.c: Regenerated.
844 * generated/maxloc0_4_r10.c: Regenerated.
845 * generated/maxloc0_4_r16.c: Regenerated.
846 * generated/maxloc0_4_r4.c: Regenerated.
847 * generated/maxloc0_4_r8.c: Regenerated.
848 * generated/maxloc0_8_i1.c: Regenerated.
849 * generated/maxloc0_8_i16.c: Regenerated.
850 * generated/maxloc0_8_i2.c: Regenerated.
851 * generated/maxloc0_8_i4.c: Regenerated.
852 * generated/maxloc0_8_i8.c: Regenerated.
853 * generated/maxloc0_8_r10.c: Regenerated.
854 * generated/maxloc0_8_r16.c: Regenerated.
855 * generated/maxloc0_8_r4.c: Regenerated.
856 * generated/maxloc0_8_r8.c: Regenerated.
857 * generated/maxloc1_16_i1.c: Regenerated.
858 * generated/maxloc1_16_i16.c: Regenerated.
859 * generated/maxloc1_16_i2.c: Regenerated.
860 * generated/maxloc1_16_i4.c: Regenerated.
861 * generated/maxloc1_16_i8.c: Regenerated.
862 * generated/maxloc1_16_r10.c: Regenerated.
863 * generated/maxloc1_16_r16.c: Regenerated.
864 * generated/maxloc1_16_r4.c: Regenerated.
865 * generated/maxloc1_16_r8.c: Regenerated.
866 * generated/maxloc1_4_i1.c: Regenerated.
867 * generated/maxloc1_4_i16.c: Regenerated.
868 * generated/maxloc1_4_i2.c: Regenerated.
869 * generated/maxloc1_4_i4.c: Regenerated.
870 * generated/maxloc1_4_i8.c: Regenerated.
871 * generated/maxloc1_4_r10.c: Regenerated.
872 * generated/maxloc1_4_r16.c: Regenerated.
873 * generated/maxloc1_4_r4.c: Regenerated.
874 * generated/maxloc1_4_r8.c: Regenerated.
875 * generated/maxloc1_8_i1.c: Regenerated.
876 * generated/maxloc1_8_i16.c: Regenerated.
877 * generated/maxloc1_8_i2.c: Regenerated.
878 * generated/maxloc1_8_i4.c: Regenerated.
879 * generated/maxloc1_8_i8.c: Regenerated.
880 * generated/maxloc1_8_r10.c: Regenerated.
881 * generated/maxloc1_8_r16.c: Regenerated.
882 * generated/maxloc1_8_r4.c: Regenerated.
883 * generated/maxloc1_8_r8.c: Regenerated.
884 * generated/maxval_i1.c: Regenerated.
885 * generated/maxval_i16.c: Regenerated.
886 * generated/maxval_i2.c: Regenerated.
887 * generated/maxval_i4.c: Regenerated.
888 * generated/maxval_i8.c: Regenerated.
889 * generated/maxval_r10.c: Regenerated.
890 * generated/maxval_r16.c: Regenerated.
891 * generated/maxval_r4.c: Regenerated.
892 * generated/maxval_r8.c: Regenerated.
893 * generated/minloc0_16_i1.c: Regenerated.
894 * generated/minloc0_16_i16.c: Regenerated.
895 * generated/minloc0_16_i2.c: Regenerated.
896 * generated/minloc0_16_i4.c: Regenerated.
897 * generated/minloc0_16_i8.c: Regenerated.
898 * generated/minloc0_16_r10.c: Regenerated.
899 * generated/minloc0_16_r16.c: Regenerated.
900 * generated/minloc0_16_r4.c: Regenerated.
901 * generated/minloc0_16_r8.c: Regenerated.
902 * generated/minloc0_4_i1.c: Regenerated.
903 * generated/minloc0_4_i16.c: Regenerated.
904 * generated/minloc0_4_i2.c: Regenerated.
905 * generated/minloc0_4_i4.c: Regenerated.
906 * generated/minloc0_4_i8.c: Regenerated.
907 * generated/minloc0_4_r10.c: Regenerated.
908 * generated/minloc0_4_r16.c: Regenerated.
909 * generated/minloc0_4_r4.c: Regenerated.
910 * generated/minloc0_4_r8.c: Regenerated.
911 * generated/minloc0_8_i1.c: Regenerated.
912 * generated/minloc0_8_i16.c: Regenerated.
913 * generated/minloc0_8_i2.c: Regenerated.
914 * generated/minloc0_8_i4.c: Regenerated.
915 * generated/minloc0_8_i8.c: Regenerated.
916 * generated/minloc0_8_r10.c: Regenerated.
917 * generated/minloc0_8_r16.c: Regenerated.
918 * generated/minloc0_8_r4.c: Regenerated.
919 * generated/minloc0_8_r8.c: Regenerated.
920 * generated/minloc1_16_i1.c: Regenerated.
921 * generated/minloc1_16_i16.c: Regenerated.
922 * generated/minloc1_16_i2.c: Regenerated.
923 * generated/minloc1_16_i4.c: Regenerated.
924 * generated/minloc1_16_i8.c: Regenerated.
925 * generated/minloc1_16_r10.c: Regenerated.
926 * generated/minloc1_16_r16.c: Regenerated.
927 * generated/minloc1_16_r4.c: Regenerated.
928 * generated/minloc1_16_r8.c: Regenerated.
929 * generated/minloc1_4_i1.c: Regenerated.
930 * generated/minloc1_4_i16.c: Regenerated.
931 * generated/minloc1_4_i2.c: Regenerated.
932 * generated/minloc1_4_i4.c: Regenerated.
933 * generated/minloc1_4_i8.c: Regenerated.
934 * generated/minloc1_4_r10.c: Regenerated.
935 * generated/minloc1_4_r16.c: Regenerated.
936 * generated/minloc1_4_r4.c: Regenerated.
937 * generated/minloc1_4_r8.c: Regenerated.
938 * generated/minloc1_8_i1.c: Regenerated.
939 * generated/minloc1_8_i16.c: Regenerated.
940 * generated/minloc1_8_i2.c: Regenerated.
941 * generated/minloc1_8_i4.c: Regenerated.
942 * generated/minloc1_8_i8.c: Regenerated.
943 * generated/minloc1_8_r10.c: Regenerated.
944 * generated/minloc1_8_r16.c: Regenerated.
945 * generated/minloc1_8_r4.c: Regenerated.
946 * generated/minloc1_8_r8.c: Regenerated.
947 * generated/minval_i1.c: Regenerated.
948 * generated/minval_i16.c: Regenerated.
949 * generated/minval_i2.c: Regenerated.
950 * generated/minval_i4.c: Regenerated.
951 * generated/minval_i8.c: Regenerated.
952 * generated/minval_r10.c: Regenerated.
953 * generated/minval_r16.c: Regenerated.
954 * generated/minval_r4.c: Regenerated.
955 * generated/minval_r8.c: Regenerated.
956 * generated/pack_c10.c: Regenerated.
957 * generated/pack_c16.c: Regenerated.
958 * generated/pack_c4.c: Regenerated.
959 * generated/pack_c8.c: Regenerated.
960 * generated/pack_i1.c: Regenerated.
961 * generated/pack_i16.c: Regenerated.
962 * generated/pack_i2.c: Regenerated.
963 * generated/pack_i4.c: Regenerated.
964 * generated/pack_i8.c: Regenerated.
965 * generated/pack_r10.c: Regenerated.
966 * generated/pack_r16.c: Regenerated.
967 * generated/pack_r4.c: Regenerated.
968 * generated/pack_r8.c: Regenerated.
969 * generated/product_c10.c: Regenerated.
970 * generated/product_c16.c: Regenerated.
971 * generated/product_c4.c: Regenerated.
972 * generated/product_c8.c: Regenerated.
973 * generated/product_i1.c: Regenerated.
974 * generated/product_i16.c: Regenerated.
975 * generated/product_i2.c: Regenerated.
976 * generated/product_i4.c: Regenerated.
977 * generated/product_i8.c: Regenerated.
978 * generated/product_r10.c: Regenerated.
979 * generated/product_r16.c: Regenerated.
980 * generated/product_r4.c: Regenerated.
981 * generated/product_r8.c: Regenerated.
982 * generated/reshape_c10.c: Regenerated.
983 * generated/reshape_c16.c: Regenerated.
984 * generated/reshape_c4.c: Regenerated.
985 * generated/reshape_c8.c: Regenerated.
986 * generated/reshape_i16.c: Regenerated.
987 * generated/reshape_i4.c: Regenerated.
988 * generated/reshape_i8.c: Regenerated.
989 * generated/reshape_r10.c: Regenerated.
990 * generated/reshape_r16.c: Regenerated.
991 * generated/reshape_r4.c: Regenerated.
992 * generated/reshape_r8.c: Regenerated.
993 * generated/shape_i16.c: Regenerated.
994 * generated/shape_i4.c: Regenerated.
995 * generated/shape_i8.c: Regenerated.
996 * generated/spread_c10.c: Regenerated.
997 * generated/spread_c16.c: Regenerated.
998 * generated/spread_c4.c: Regenerated.
999 * generated/spread_c8.c: Regenerated.
1000 * generated/spread_i1.c: Regenerated.
1001 * generated/spread_i16.c: Regenerated.
1002 * generated/spread_i2.c: Regenerated.
1003 * generated/spread_i4.c: Regenerated.
1004 * generated/spread_i8.c: Regenerated.
1005 * generated/spread_r10.c: Regenerated.
1006 * generated/spread_r16.c: Regenerated.
1007 * generated/spread_r4.c: Regenerated.
1008 * generated/spread_r8.c: Regenerated.
1009 * generated/sum_c10.c: Regenerated.
1010 * generated/sum_c16.c: Regenerated.
1011 * generated/sum_c4.c: Regenerated.
1012 * generated/sum_c8.c: Regenerated.
1013 * generated/sum_i1.c: Regenerated.
1014 * generated/sum_i16.c: Regenerated.
1015 * generated/sum_i2.c: Regenerated.
1016 * generated/sum_i4.c: Regenerated.
1017 * generated/sum_i8.c: Regenerated.
1018 * generated/sum_r10.c: Regenerated.
1019 * generated/sum_r16.c: Regenerated.
1020 * generated/sum_r4.c: Regenerated.
1021 * generated/sum_r8.c: Regenerated.
1022 * generated/transpose_c10.c: Regenerated.
1023 * generated/transpose_c16.c: Regenerated.
1024 * generated/transpose_c4.c: Regenerated.
1025 * generated/transpose_c8.c: Regenerated.
1026 * generated/transpose_i16.c: Regenerated.
1027 * generated/transpose_i4.c: Regenerated.
1028 * generated/transpose_i8.c: Regenerated.
1029 * generated/transpose_r10.c: Regenerated.
1030 * generated/transpose_r16.c: Regenerated.
1031 * generated/transpose_r4.c: Regenerated.
1032 * generated/transpose_r8.c: Regenerated.
1033 * generated/unpack_c10.c: Regenerated.
1034 * generated/unpack_c16.c: Regenerated.
1035 * generated/unpack_c4.c: Regenerated.
1036 * generated/unpack_c8.c: Regenerated.
1037 * generated/unpack_i1.c: Regenerated.
1038 * generated/unpack_i16.c: Regenerated.
1039 * generated/unpack_i2.c: Regenerated.
1040 * generated/unpack_i4.c: Regenerated.
1041 * generated/unpack_i8.c: Regenerated.
1042 * generated/unpack_r10.c: Regenerated.
1043 * generated/unpack_r16.c: Regenerated.
1044 * generated/unpack_r4.c: Regenerated.
1045 * generated/unpack_r8.c: Regenerated.
1047 2009-06-14 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
1049 * fmain.c (main): Don't PREFIX set_args.
1050 * libgfortran.h (set_args): Use iexport_proto.
1051 * runtime/main.c (set_args): Use iexport.
1053 2009-06-07 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1055 PR libfortran/40008
1056 * libgfortran.h: Define IOPARM_OPEN_HAS_NEWUNIT.
1057 * io/open.c (st_open): Don't error on negative unit number if NEWUNIT
1058 was specified. If NEWUNIT is specified, call new function to get the
1059 unique unit number and assign it.
1060 * io/io.h (st_parameter_open): Add pointer to newunit. Add prototype for
1061 next_available_newunit. Add prototype for new function,
1062 get_unique_unit_number.
1063 * io/unit.c: Declare next_available_newunit. Define the first newunit
1064 number. (init_units): Initialize next_available_unit.
1065 (get_unique_unit_number): New function. Fix whitespace and comments.
1066 * io/transfer.c (data_transfer_init): Update error message to not be
1067 specific to OPEN statements.
1069 2009-06-07 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1071 PR libfortran/40334
1072 * io/list_read.c (list_formatted_read_scalar): Set the end file
1073 conditions after a return from EOF error.
1075 2009-06-04 Janne Blomqvist <jb@gcc.gnu.org>
1077 PR libfortran/40330
1078 * io/format.c (free_format_hash_table): Also free and nullify hash key.
1079 (save_parsed_format): Copy string rather than pointer copy.
1081 2009-05-29 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
1083 PR fortran/40019
1084 * intrinsics/bit_intrinsics.c: New file.
1085 * gfortran.map (GFORTRAN_1.2): New list.
1086 * Makefile.am: Add intrinsics/bit_intrinsics.c.
1087 * Makefile.in: Regenerate.
1089 2009-05-29 Janne Blomqvist <jb@gcc.gnu.org>
1091 PR libfortran/40190
1092 * configure.ac: Check for localtime_r and gmtime_r.
1093 * intrinsics/date_and_time.c: Add fallback implementations for
1094 localtime_r and gmtime_r.
1095 (date_and_time): Change to use localtime_r and gmtime_r instead of
1096 localtime and gmtime, respectively.
1097 (itime0): Use localtime_r instead of localtime.
1098 (ltime_0): Likewise.
1099 (gmtime_0): Use gmtime_r instead of gmtime.
1100 * config.h.in: Regenerated
1101 * configure: Regenerated.
1103 2009-05-27 Janne Blomqvist <jb@gcc.gnu.org>
1105 PR fortran/39178
1106 * runtime/main.c (store_exe_path): Remove static attribute.
1107 * libgfortran.h: Add back store_exe_path prototype.
1109 2009-05-27 Thomas Koenig <tkoenig@gcc.gnu.org>
1111 PR libfortran/40187
1112 * intrinsics/iso_c_binding.c (c_f_pointer_u0): Take care
1113 of stride in "shape" argument.
1115 2009-05-26 Tobias Burnus <burnus@net-b.de>
1117 PR fortran/39178
1118 * runtime/main.c (store_exe_path): Make static
1119 and multiple-times callable.
1120 (set_args): Call store_exe_path.
1121 * libgfortran.h: Remove store_exe_path prototype.
1122 * fmain.c (main): Remove store_exe_path call.
1124 2009-05-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1126 PR libfortran/37754
1127 * io/write_float.def: Simplify format calculation.
1129 2009-05-07 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
1131 PR fortran/22423
1132 * io/transfer.c (read_block_direct): Avoid warning.
1133 * runtime/string.c (compare0): Avoid warning.
1135 2009-04-30 Janne Blomqvist <jb@gcc.gnu.org>
1137 PR libfortran/39667
1138 * io/file_pos.c (st_rewind): Don't truncate or flush.
1139 * io/intrinsics.c (fgetc): Flush if switching mode.
1140 (fputc): Likewise.
1142 2009-04-18 Janne Blomqvist <jb@gcc.gnu.org>
1144 PR libfortran/39782
1145 * io/transfer.c (data_transfer_init): Don't flush before seek.
1146 (finalize_transfer): Remove extra flush.
1148 2009-04-17 Janne Blomqvist <jb@gcc.gnu.org>
1150 * io/io.h (is_preconnected): Remove prototype.
1151 * io/unix.c (is_preconnected): Remove function.
1153 2009-04-17 Ulrich Weigand <Ulrich.Weigand@de.ibm.com>
1155 * configure.ac: Test for -ffunction-sections -fdata-sections and
1156 set SECTION_FLAGS accordingly.
1157 * configure: Regenerate.
1159 * Makefile.am: Add SECTION_FLAGS to AM_CFLAGS.
1160 * Makefile.in: Regenerate.
1162 2009-04-15 Janne Blomqvist <jb@gcc.gnu.org>
1164 PR libfortran/38668
1165 * io/transfer.c (finalize_transfer): Don't flush for advance='no'.
1167 2009-04-15 Danny Smith <dannysmith@clear.net.nz>
1169 * io/write.c (itoa) : Rename back to gfc_itoa.
1170 (write_i): Adjust call to write_decimal.
1171 (write_integer): Use gfc_itoa.
1173 2009-04-10 Janne Blomqvist <jb@gcc.gnu.org>
1175 * io/io.h (move_pos_offset): Remove prototype.
1176 * io/transfer.c (formatted_transfer_scalar_read): Use sseek
1177 instead of move_pos_offset.
1178 * io/unix.c (move_pos_offset): Remove.
1180 2009-04-10 Janne Blomqvist <jb@gcc.gnu.org>
1182 PR libfortran/39665 libfortran/39702 libfortran/39709
1183 * io/io.h (st_parameter_dt): Revert aligned attribute from u.p.value.
1184 * io/list_read.c (read_complex): Read directly into user pointer.
1185 (read_real): Likewise.
1186 (list_formatted_read_scalar): Update read_complex and read_real calls.
1187 (nml_read_obj): Read directly into user pointer.
1189 2009-04-09 Janne Blomqvist <jb@gcc.gnu.org>
1191 PR libfortran/39665
1192 * io/io.h (st_parameter_dt): Add aligned attribute to u.p.value.
1193 * io/read.c (convert_real): Add note about alignment requirements.
1195 2009-04-09 Nick Clifton <nickc@redhat.com>
1197 * m4/cshift0.m4: Change copyright header to refer to version 3
1198 of the GNU General Public License with version 3.1 of the GCC
1199 Runtime Library Exception and to point readers at the COPYING3
1200 and COPYING3.RUNTIME files and the FSF's license web page.
1201 * c99_protos.h: Likewise.
1202 * config/fpu-387.h: Likewise.
1203 * config/fpu-aix.h: Likewise.
1204 * config/fpu-generic.h: Likewise.
1205 * config/fpu-glibc.h: Likewise.
1206 * config/fpu-sysv.h: Likewise.
1207 * intrinsics/abort.c: Likewise.
1208 * intrinsics/access.c: Likewise.
1209 * intrinsics/args.c: Likewise.
1210 * intrinsics/associated.c: Likewise.
1211 * intrinsics/c99_functions.c: Likewise.
1212 * intrinsics/chdir.c: Likewise.
1213 * intrinsics/chmod.c: Likewise.
1214 * intrinsics/clock.c: Likewise.
1215 * intrinsics/cpu_time.c: Likewise.
1216 * intrinsics/cshift0.c: Likewise.
1217 * intrinsics/ctime.c: Likewise.
1218 * intrinsics/date_and_time.c: Likewise.
1219 * intrinsics/dprod_r8.f90: Likewise.
1220 * intrinsics/dtime.c: Likewise.
1221 * intrinsics/env.c: Likewise.
1222 * intrinsics/eoshift0.c: Likewise.
1223 * intrinsics/eoshift2.c: Likewise.
1224 * intrinsics/erfc_scaled.c: Likewise.
1225 * intrinsics/erfc_scaled_inc.c: Likewise.
1226 * intrinsics/etime.c: Likewise.
1227 * intrinsics/exit.c: Likewise.
1228 * intrinsics/f2c_specifics.F90: Likewise.
1229 * intrinsics/fnum.c: Likewise.
1230 * intrinsics/gerror.c: Likewise.
1231 * intrinsics/getXid.c: Likewise.
1232 * intrinsics/getcwd.c: Likewise.
1233 * intrinsics/getlog.c: Likewise.
1234 * intrinsics/hostnm.c: Likewise.
1235 * intrinsics/ierrno.c: Likewise.
1236 * intrinsics/ishftc.c: Likewise.
1237 * intrinsics/iso_c_binding.c: Likewise.
1238 * intrinsics/iso_c_binding.h: Likewise.
1239 * intrinsics/iso_c_generated_procs.c: Likewise.
1240 * intrinsics/kill.c: Likewise.
1241 * intrinsics/link.c: Likewise.
1242 * intrinsics/malloc.c: Likewise.
1243 * intrinsics/move_alloc.c: Likewise.
1244 * intrinsics/mvbits.c: Likewise.
1245 * intrinsics/pack_generic.c: Likewise.
1246 * intrinsics/perror.c: Likewise.
1247 * intrinsics/rand.c: Likewise.
1248 * intrinsics/random.c: Likewise.
1249 * intrinsics/rename.c: Likewise.
1250 * intrinsics/reshape_generic.c: Likewise.
1251 * intrinsics/reshape_packed.c: Likewise.
1252 * intrinsics/selected_char_kind.c: Likewise.
1253 * intrinsics/selected_int_kind.f90: Likewise.
1254 * intrinsics/selected_real_kind.f90: Likewise.
1255 * intrinsics/signal.c: Likewise.
1256 * intrinsics/size.c: Likewise.
1257 * intrinsics/sleep.c: Likewise.
1258 * intrinsics/spread_generic.c: Likewise.
1259 * intrinsics/stat.c: Likewise.
1260 * intrinsics/string_intrinsics.c: Likewise.
1261 * intrinsics/string_intrinsics_inc.c: Likewise.
1262 * intrinsics/symlnk.c: Likewise.
1263 * intrinsics/system.c: Likewise.
1264 * intrinsics/system_clock.c: Likewise.
1265 * intrinsics/time.c: Likewise.
1266 * intrinsics/time_1.h: Likewise.
1267 * intrinsics/transpose_generic.c: Likewise.
1268 * intrinsics/umask.c: Likewise.
1269 * intrinsics/unlink.c: Likewise.
1270 * intrinsics/unpack_generic.c: Likewise.
1271 * io/close.c: Likewise.
1272 * io/fbuf.c: Likewise.
1273 * io/file_pos.c: Likewise.
1274 * io/format.c: Likewise.
1275 * io/inquire.c: Likewise.
1276 * io/intrinsics.c: Likewise.
1277 * io/io.h: Likewise.
1278 * io/list_read.c: Likewise.
1279 * io/lock.c: Likewise.
1280 * io/open.c: Likewise.
1281 * io/read.c: Likewise.
1282 * io/size_from_kind.c: Likewise.
1283 * io/transfer.c: Likewise.
1284 * io/unit.c: Likewise.
1285 * io/unix.c: Likewise.
1286 * io/write.c: Likewise.
1287 * io/write_float.def: Likewise.
1288 * libgfortran.h: Likewise.
1289 * m4/all.m4: Likewise.
1290 * m4/any.m4: Likewise.
1291 * m4/count.m4: Likewise.
1292 * m4/cshift1.m4: Likewise.
1293 * m4/eoshift1.m4: Likewise.
1294 * m4/eoshift3.m4: Likewise.
1295 * m4/exponent.m4: Likewise.
1296 * m4/fraction.m4: Likewise.
1297 * m4/head.m4: Likewise.
1298 * m4/in_pack.m4: Likewise.
1299 * m4/in_unpack.m4: Likewise.
1300 * m4/matmul.m4: Likewise.
1301 * m4/matmull.m4: Likewise.
1302 * m4/maxloc0.m4: Likewise.
1303 * m4/maxloc1.m4: Likewise.
1304 * m4/maxval.m4: Likewise.
1305 * m4/minloc0.m4: Likewise.
1306 * m4/minloc1.m4: Likewise.
1307 * m4/minval.m4: Likewise.
1308 * m4/nearest.m4: Likewise.
1309 * m4/pack.m4: Likewise.
1310 * m4/pow.m4: Likewise.
1311 * m4/product.m4: Likewise.
1312 * m4/reshape.m4: Likewise.
1313 * m4/rrspacing.m4: Likewise.
1314 * m4/set_exponent.m4: Likewise.
1315 * m4/shape.m4: Likewise.
1316 * m4/spacing.m4: Likewise.
1317 * m4/spread.m4: Likewise.
1318 * m4/sum.m4: Likewise.
1319 * m4/transpose.m4: Likewise.
1320 * m4/unpack.m4: Likewise.
1321 * runtime/backtrace.c: Likewise.
1322 * runtime/compile_options.c: Likewise.
1323 * runtime/convert_char.c: Likewise.
1324 * runtime/environ.c: Likewise.
1325 * runtime/error.c: Likewise.
1326 * runtime/in_pack_generic.c: Likewise.
1327 * runtime/in_unpack_generic.c: Likewise.
1328 * runtime/main.c: Likewise.
1329 * runtime/memory.c: Likewise.
1330 * runtime/pause.c: Likewise.
1331 * runtime/select.c: Likewise.
1332 * runtime/select_inc.c: Likewise.
1333 * runtime/stop.c: Likewise.
1334 * runtime/string.c: Likewise.
1335 * generated/_abs_c10.F90: Regenerate.
1336 * generated/_abs_c16.F90: Regenerate.
1337 * generated/_abs_c4.F90: Regenerate.
1338 * generated/_abs_c8.F90: Regenerate.
1339 * generated/_abs_i16.F90: Regenerate.
1340 * generated/_abs_i4.F90: Regenerate.
1341 * generated/_abs_i8.F90: Regenerate.
1342 * generated/_abs_r10.F90: Regenerate.
1343 * generated/_abs_r16.F90: Regenerate.
1344 * generated/_abs_r4.F90: Regenerate.
1345 * generated/_abs_r8.F90: Regenerate.
1346 * generated/_acos_r10.F90: Regenerate.
1347 * generated/_acos_r16.F90: Regenerate.
1348 * generated/_acos_r4.F90: Regenerate.
1349 * generated/_acos_r8.F90: Regenerate.
1350 * generated/_acosh_r10.F90: Regenerate.
1351 * generated/_acosh_r16.F90: Regenerate.
1352 * generated/_acosh_r4.F90: Regenerate.
1353 * generated/_acosh_r8.F90: Regenerate.
1354 * generated/_aimag_c10.F90: Regenerate.
1355 * generated/_aimag_c16.F90: Regenerate.
1356 * generated/_aimag_c4.F90: Regenerate.
1357 * generated/_aimag_c8.F90: Regenerate.
1358 * generated/_aint_r10.F90: Regenerate.
1359 * generated/_aint_r16.F90: Regenerate.
1360 * generated/_aint_r4.F90: Regenerate.
1361 * generated/_aint_r8.F90: Regenerate.
1362 * generated/_anint_r10.F90: Regenerate.
1363 * generated/_anint_r16.F90: Regenerate.
1364 * generated/_anint_r4.F90: Regenerate.
1365 * generated/_anint_r8.F90: Regenerate.
1366 * generated/_asin_r10.F90: Regenerate.
1367 * generated/_asin_r16.F90: Regenerate.
1368 * generated/_asin_r4.F90: Regenerate.
1369 * generated/_asin_r8.F90: Regenerate.
1370 * generated/_asinh_r10.F90: Regenerate.
1371 * generated/_asinh_r16.F90: Regenerate.
1372 * generated/_asinh_r4.F90: Regenerate.
1373 * generated/_asinh_r8.F90: Regenerate.
1374 * generated/_atan2_r10.F90: Regenerate.
1375 * generated/_atan2_r16.F90: Regenerate.
1376 * generated/_atan2_r4.F90: Regenerate.
1377 * generated/_atan2_r8.F90: Regenerate.
1378 * generated/_atan_r10.F90: Regenerate.
1379 * generated/_atan_r16.F90: Regenerate.
1380 * generated/_atan_r4.F90: Regenerate.
1381 * generated/_atan_r8.F90: Regenerate.
1382 * generated/_atanh_r10.F90: Regenerate.
1383 * generated/_atanh_r16.F90: Regenerate.
1384 * generated/_atanh_r4.F90: Regenerate.
1385 * generated/_atanh_r8.F90: Regenerate.
1386 * generated/_conjg_c10.F90: Regenerate.
1387 * generated/_conjg_c16.F90: Regenerate.
1388 * generated/_conjg_c4.F90: Regenerate.
1389 * generated/_conjg_c8.F90: Regenerate.
1390 * generated/_cos_c10.F90: Regenerate.
1391 * generated/_cos_c16.F90: Regenerate.
1392 * generated/_cos_c4.F90: Regenerate.
1393 * generated/_cos_c8.F90: Regenerate.
1394 * generated/_cos_r10.F90: Regenerate.
1395 * generated/_cos_r16.F90: Regenerate.
1396 * generated/_cos_r4.F90: Regenerate.
1397 * generated/_cos_r8.F90: Regenerate.
1398 * generated/_cosh_r10.F90: Regenerate.
1399 * generated/_cosh_r16.F90: Regenerate.
1400 * generated/_cosh_r4.F90: Regenerate.
1401 * generated/_cosh_r8.F90: Regenerate.
1402 * generated/_dim_i16.F90: Regenerate.
1403 * generated/_dim_i4.F90: Regenerate.
1404 * generated/_dim_i8.F90: Regenerate.
1405 * generated/_dim_r10.F90: Regenerate.
1406 * generated/_dim_r16.F90: Regenerate.
1407 * generated/_dim_r4.F90: Regenerate.
1408 * generated/_dim_r8.F90: Regenerate.
1409 * generated/_exp_c10.F90: Regenerate.
1410 * generated/_exp_c16.F90: Regenerate.
1411 * generated/_exp_c4.F90: Regenerate.
1412 * generated/_exp_c8.F90: Regenerate.
1413 * generated/_exp_r10.F90: Regenerate.
1414 * generated/_exp_r16.F90: Regenerate.
1415 * generated/_exp_r4.F90: Regenerate.
1416 * generated/_exp_r8.F90: Regenerate.
1417 * generated/_log10_r10.F90: Regenerate.
1418 * generated/_log10_r16.F90: Regenerate.
1419 * generated/_log10_r4.F90: Regenerate.
1420 * generated/_log10_r8.F90: Regenerate.
1421 * generated/_log_c10.F90: Regenerate.
1422 * generated/_log_c16.F90: Regenerate.
1423 * generated/_log_c4.F90: Regenerate.
1424 * generated/_log_c8.F90: Regenerate.
1425 * generated/_log_r10.F90: Regenerate.
1426 * generated/_log_r16.F90: Regenerate.
1427 * generated/_log_r4.F90: Regenerate.
1428 * generated/_log_r8.F90: Regenerate.
1429 * generated/_mod_i16.F90: Regenerate.
1430 * generated/_mod_i4.F90: Regenerate.
1431 * generated/_mod_i8.F90: Regenerate.
1432 * generated/_mod_r10.F90: Regenerate.
1433 * generated/_mod_r16.F90: Regenerate.
1434 * generated/_mod_r4.F90: Regenerate.
1435 * generated/_mod_r8.F90: Regenerate.
1436 * generated/_sign_i16.F90: Regenerate.
1437 * generated/_sign_i4.F90: Regenerate.
1438 * generated/_sign_i8.F90: Regenerate.
1439 * generated/_sign_r10.F90: Regenerate.
1440 * generated/_sign_r16.F90: Regenerate.
1441 * generated/_sign_r4.F90: Regenerate.
1442 * generated/_sign_r8.F90: Regenerate.
1443 * generated/_sin_c10.F90: Regenerate.
1444 * generated/_sin_c16.F90: Regenerate.
1445 * generated/_sin_c4.F90: Regenerate.
1446 * generated/_sin_c8.F90: Regenerate.
1447 * generated/_sin_r10.F90: Regenerate.
1448 * generated/_sin_r16.F90: Regenerate.
1449 * generated/_sin_r4.F90: Regenerate.
1450 * generated/_sin_r8.F90: Regenerate.
1451 * generated/_sinh_r10.F90: Regenerate.
1452 * generated/_sinh_r16.F90: Regenerate.
1453 * generated/_sinh_r4.F90: Regenerate.
1454 * generated/_sinh_r8.F90: Regenerate.
1455 * generated/_sqrt_c10.F90: Regenerate.
1456 * generated/_sqrt_c16.F90: Regenerate.
1457 * generated/_sqrt_c4.F90: Regenerate.
1458 * generated/_sqrt_c8.F90: Regenerate.
1459 * generated/_sqrt_r10.F90: Regenerate.
1460 * generated/_sqrt_r16.F90: Regenerate.
1461 * generated/_sqrt_r4.F90: Regenerate.
1462 * generated/_sqrt_r8.F90: Regenerate.
1463 * generated/_tan_r10.F90: Regenerate.
1464 * generated/_tan_r16.F90: Regenerate.
1465 * generated/_tan_r4.F90: Regenerate.
1466 * generated/_tan_r8.F90: Regenerate.
1467 * generated/_tanh_r10.F90: Regenerate.
1468 * generated/_tanh_r16.F90: Regenerate.
1469 * generated/_tanh_r4.F90: Regenerate.
1470 * generated/_tanh_r8.F90: Regenerate.
1471 * generated/all_l1.c: Regenerate.
1472 * generated/all_l16.c: Regenerate.
1473 * generated/all_l2.c: Regenerate.
1474 * generated/all_l4.c: Regenerate.
1475 * generated/all_l8.c: Regenerate.
1476 * generated/any_l1.c: Regenerate.
1477 * generated/any_l16.c: Regenerate.
1478 * generated/any_l2.c: Regenerate.
1479 * generated/any_l4.c: Regenerate.
1480 * generated/any_l8.c: Regenerate.
1481 * generated/count_16_l.c: Regenerate.
1482 * generated/count_1_l.c: Regenerate.
1483 * generated/count_2_l.c: Regenerate.
1484 * generated/count_4_l.c: Regenerate.
1485 * generated/count_8_l.c: Regenerate.
1486 * generated/cshift0_c10.c: Regenerate.
1487 * generated/cshift0_c16.c: Regenerate.
1488 * generated/cshift0_c4.c: Regenerate.
1489 * generated/cshift0_c8.c: Regenerate.
1490 * generated/cshift0_i1.c: Regenerate.
1491 * generated/cshift0_i16.c: Regenerate.
1492 * generated/cshift0_i2.c: Regenerate.
1493 * generated/cshift0_i4.c: Regenerate.
1494 * generated/cshift0_i8.c: Regenerate.
1495 * generated/cshift0_r10.c: Regenerate.
1496 * generated/cshift0_r16.c: Regenerate.
1497 * generated/cshift0_r4.c: Regenerate.
1498 * generated/cshift0_r8.c: Regenerate.
1499 * generated/cshift1_16.c: Regenerate.
1500 * generated/cshift1_4.c: Regenerate.
1501 * generated/cshift1_8.c: Regenerate.
1502 * generated/eoshift1_16.c: Regenerate.
1503 * generated/eoshift1_4.c: Regenerate.
1504 * generated/eoshift1_8.c: Regenerate.
1505 * generated/eoshift3_16.c: Regenerate.
1506 * generated/eoshift3_4.c: Regenerate.
1507 * generated/eoshift3_8.c: Regenerate.
1508 * generated/exponent_r10.c: Regenerate.
1509 * generated/exponent_r16.c: Regenerate.
1510 * generated/exponent_r4.c: Regenerate.
1511 * generated/exponent_r8.c: Regenerate.
1512 * generated/fraction_r10.c: Regenerate.
1513 * generated/fraction_r16.c: Regenerate.
1514 * generated/fraction_r4.c: Regenerate.
1515 * generated/fraction_r8.c: Regenerate.
1516 * generated/in_pack_c10.c: Regenerate.
1517 * generated/in_pack_c16.c: Regenerate.
1518 * generated/in_pack_c4.c: Regenerate.
1519 * generated/in_pack_c8.c: Regenerate.
1520 * generated/in_pack_i1.c: Regenerate.
1521 * generated/in_pack_i16.c: Regenerate.
1522 * generated/in_pack_i2.c: Regenerate.
1523 * generated/in_pack_i4.c: Regenerate.
1524 * generated/in_pack_i8.c: Regenerate.
1525 * generated/in_pack_r10.c: Regenerate.
1526 * generated/in_pack_r16.c: Regenerate.
1527 * generated/in_pack_r4.c: Regenerate.
1528 * generated/in_pack_r8.c: Regenerate.
1529 * generated/in_unpack_c10.c: Regenerate.
1530 * generated/in_unpack_c16.c: Regenerate.
1531 * generated/in_unpack_c4.c: Regenerate.
1532 * generated/in_unpack_c8.c: Regenerate.
1533 * generated/in_unpack_i1.c: Regenerate.
1534 * generated/in_unpack_i16.c: Regenerate.
1535 * generated/in_unpack_i2.c: Regenerate.
1536 * generated/in_unpack_i4.c: Regenerate.
1537 * generated/in_unpack_i8.c: Regenerate.
1538 * generated/in_unpack_r10.c: Regenerate.
1539 * generated/in_unpack_r16.c: Regenerate.
1540 * generated/in_unpack_r4.c: Regenerate.
1541 * generated/in_unpack_r8.c: Regenerate.
1542 * generated/matmul_c10.c: Regenerate.
1543 * generated/matmul_c16.c: Regenerate.
1544 * generated/matmul_c4.c: Regenerate.
1545 * generated/matmul_c8.c: Regenerate.
1546 * generated/matmul_i1.c: Regenerate.
1547 * generated/matmul_i16.c: Regenerate.
1548 * generated/matmul_i2.c: Regenerate.
1549 * generated/matmul_i4.c: Regenerate.
1550 * generated/matmul_i8.c: Regenerate.
1551 * generated/matmul_l16.c: Regenerate.
1552 * generated/matmul_l4.c: Regenerate.
1553 * generated/matmul_l8.c: Regenerate.
1554 * generated/matmul_r10.c: Regenerate.
1555 * generated/matmul_r16.c: Regenerate.
1556 * generated/matmul_r4.c: Regenerate.
1557 * generated/matmul_r8.c: Regenerate.
1558 * generated/maxloc0_16_i1.c: Regenerate.
1559 * generated/maxloc0_16_i16.c: Regenerate.
1560 * generated/maxloc0_16_i2.c: Regenerate.
1561 * generated/maxloc0_16_i4.c: Regenerate.
1562 * generated/maxloc0_16_i8.c: Regenerate.
1563 * generated/maxloc0_16_r10.c: Regenerate.
1564 * generated/maxloc0_16_r16.c: Regenerate.
1565 * generated/maxloc0_16_r4.c: Regenerate.
1566 * generated/maxloc0_16_r8.c: Regenerate.
1567 * generated/maxloc0_4_i1.c: Regenerate.
1568 * generated/maxloc0_4_i16.c: Regenerate.
1569 * generated/maxloc0_4_i2.c: Regenerate.
1570 * generated/maxloc0_4_i4.c: Regenerate.
1571 * generated/maxloc0_4_i8.c: Regenerate.
1572 * generated/maxloc0_4_r10.c: Regenerate.
1573 * generated/maxloc0_4_r16.c: Regenerate.
1574 * generated/maxloc0_4_r4.c: Regenerate.
1575 * generated/maxloc0_4_r8.c: Regenerate.
1576 * generated/maxloc0_8_i1.c: Regenerate.
1577 * generated/maxloc0_8_i16.c: Regenerate.
1578 * generated/maxloc0_8_i2.c: Regenerate.
1579 * generated/maxloc0_8_i4.c: Regenerate.
1580 * generated/maxloc0_8_i8.c: Regenerate.
1581 * generated/maxloc0_8_r10.c: Regenerate.
1582 * generated/maxloc0_8_r16.c: Regenerate.
1583 * generated/maxloc0_8_r4.c: Regenerate.
1584 * generated/maxloc0_8_r8.c: Regenerate.
1585 * generated/maxloc1_16_i1.c: Regenerate.
1586 * generated/maxloc1_16_i16.c: Regenerate.
1587 * generated/maxloc1_16_i2.c: Regenerate.
1588 * generated/maxloc1_16_i4.c: Regenerate.
1589 * generated/maxloc1_16_i8.c: Regenerate.
1590 * generated/maxloc1_16_r10.c: Regenerate.
1591 * generated/maxloc1_16_r16.c: Regenerate.
1592 * generated/maxloc1_16_r4.c: Regenerate.
1593 * generated/maxloc1_16_r8.c: Regenerate.
1594 * generated/maxloc1_4_i1.c: Regenerate.
1595 * generated/maxloc1_4_i16.c: Regenerate.
1596 * generated/maxloc1_4_i2.c: Regenerate.
1597 * generated/maxloc1_4_i4.c: Regenerate.
1598 * generated/maxloc1_4_i8.c: Regenerate.
1599 * generated/maxloc1_4_r10.c: Regenerate.
1600 * generated/maxloc1_4_r16.c: Regenerate.
1601 * generated/maxloc1_4_r4.c: Regenerate.
1602 * generated/maxloc1_4_r8.c: Regenerate.
1603 * generated/maxloc1_8_i1.c: Regenerate.
1604 * generated/maxloc1_8_i16.c: Regenerate.
1605 * generated/maxloc1_8_i2.c: Regenerate.
1606 * generated/maxloc1_8_i4.c: Regenerate.
1607 * generated/maxloc1_8_i8.c: Regenerate.
1608 * generated/maxloc1_8_r10.c: Regenerate.
1609 * generated/maxloc1_8_r16.c: Regenerate.
1610 * generated/maxloc1_8_r4.c: Regenerate.
1611 * generated/maxloc1_8_r8.c: Regenerate.
1612 * generated/maxval_i1.c: Regenerate.
1613 * generated/maxval_i16.c: Regenerate.
1614 * generated/maxval_i2.c: Regenerate.
1615 * generated/maxval_i4.c: Regenerate.
1616 * generated/maxval_i8.c: Regenerate.
1617 * generated/maxval_r10.c: Regenerate.
1618 * generated/maxval_r16.c: Regenerate.
1619 * generated/maxval_r4.c: Regenerate.
1620 * generated/maxval_r8.c: Regenerate.
1621 * generated/minloc0_16_i1.c: Regenerate.
1622 * generated/minloc0_16_i16.c: Regenerate.
1623 * generated/minloc0_16_i2.c: Regenerate.
1624 * generated/minloc0_16_i4.c: Regenerate.
1625 * generated/minloc0_16_i8.c: Regenerate.
1626 * generated/minloc0_16_r10.c: Regenerate.
1627 * generated/minloc0_16_r16.c: Regenerate.
1628 * generated/minloc0_16_r4.c: Regenerate.
1629 * generated/minloc0_16_r8.c: Regenerate.
1630 * generated/minloc0_4_i1.c: Regenerate.
1631 * generated/minloc0_4_i16.c: Regenerate.
1632 * generated/minloc0_4_i2.c: Regenerate.
1633 * generated/minloc0_4_i4.c: Regenerate.
1634 * generated/minloc0_4_i8.c: Regenerate.
1635 * generated/minloc0_4_r10.c: Regenerate.
1636 * generated/minloc0_4_r16.c: Regenerate.
1637 * generated/minloc0_4_r4.c: Regenerate.
1638 * generated/minloc0_4_r8.c: Regenerate.
1639 * generated/minloc0_8_i1.c: Regenerate.
1640 * generated/minloc0_8_i16.c: Regenerate.
1641 * generated/minloc0_8_i2.c: Regenerate.
1642 * generated/minloc0_8_i4.c: Regenerate.
1643 * generated/minloc0_8_i8.c: Regenerate.
1644 * generated/minloc0_8_r10.c: Regenerate.
1645 * generated/minloc0_8_r16.c: Regenerate.
1646 * generated/minloc0_8_r4.c: Regenerate.
1647 * generated/minloc0_8_r8.c: Regenerate.
1648 * generated/minloc1_16_i1.c: Regenerate.
1649 * generated/minloc1_16_i16.c: Regenerate.
1650 * generated/minloc1_16_i2.c: Regenerate.
1651 * generated/minloc1_16_i4.c: Regenerate.
1652 * generated/minloc1_16_i8.c: Regenerate.
1653 * generated/minloc1_16_r10.c: Regenerate.
1654 * generated/minloc1_16_r16.c: Regenerate.
1655 * generated/minloc1_16_r4.c: Regenerate.
1656 * generated/minloc1_16_r8.c: Regenerate.
1657 * generated/minloc1_4_i1.c: Regenerate.
1658 * generated/minloc1_4_i16.c: Regenerate.
1659 * generated/minloc1_4_i2.c: Regenerate.
1660 * generated/minloc1_4_i4.c: Regenerate.
1661 * generated/minloc1_4_i8.c: Regenerate.
1662 * generated/minloc1_4_r10.c: Regenerate.
1663 * generated/minloc1_4_r16.c: Regenerate.
1664 * generated/minloc1_4_r4.c: Regenerate.
1665 * generated/minloc1_4_r8.c: Regenerate.
1666 * generated/minloc1_8_i1.c: Regenerate.
1667 * generated/minloc1_8_i16.c: Regenerate.
1668 * generated/minloc1_8_i2.c: Regenerate.
1669 * generated/minloc1_8_i4.c: Regenerate.
1670 * generated/minloc1_8_i8.c: Regenerate.
1671 * generated/minloc1_8_r10.c: Regenerate.
1672 * generated/minloc1_8_r16.c: Regenerate.
1673 * generated/minloc1_8_r4.c: Regenerate.
1674 * generated/minloc1_8_r8.c: Regenerate.
1675 * generated/minval_i1.c: Regenerate.
1676 * generated/minval_i16.c: Regenerate.
1677 * generated/minval_i2.c: Regenerate.
1678 * generated/minval_i4.c: Regenerate.
1679 * generated/minval_i8.c: Regenerate.
1680 * generated/minval_r10.c: Regenerate.
1681 * generated/minval_r16.c: Regenerate.
1682 * generated/minval_r4.c: Regenerate.
1683 * generated/minval_r8.c: Regenerate.
1684 * generated/misc_specifics.F90: Regenerate.
1685 * generated/nearest_r10.c: Regenerate.
1686 * generated/nearest_r16.c: Regenerate.
1687 * generated/nearest_r4.c: Regenerate.
1688 * generated/nearest_r8.c: Regenerate.
1689 * generated/pack_c10.c: Regenerate.
1690 * generated/pack_c16.c: Regenerate.
1691 * generated/pack_c4.c: Regenerate.
1692 * generated/pack_c8.c: Regenerate.
1693 * generated/pack_i1.c: Regenerate.
1694 * generated/pack_i16.c: Regenerate.
1695 * generated/pack_i2.c: Regenerate.
1696 * generated/pack_i4.c: Regenerate.
1697 * generated/pack_i8.c: Regenerate.
1698 * generated/pack_r10.c: Regenerate.
1699 * generated/pack_r16.c: Regenerate.
1700 * generated/pack_r4.c: Regenerate.
1701 * generated/pack_r8.c: Regenerate.
1702 * generated/pow_c10_i16.c: Regenerate.
1703 * generated/pow_c10_i4.c: Regenerate.
1704 * generated/pow_c10_i8.c: Regenerate.
1705 * generated/pow_c16_i16.c: Regenerate.
1706 * generated/pow_c16_i4.c: Regenerate.
1707 * generated/pow_c16_i8.c: Regenerate.
1708 * generated/pow_c4_i16.c: Regenerate.
1709 * generated/pow_c4_i4.c: Regenerate.
1710 * generated/pow_c4_i8.c: Regenerate.
1711 * generated/pow_c8_i16.c: Regenerate.
1712 * generated/pow_c8_i4.c: Regenerate.
1713 * generated/pow_c8_i8.c: Regenerate.
1714 * generated/pow_i16_i16.c: Regenerate.
1715 * generated/pow_i16_i4.c: Regenerate.
1716 * generated/pow_i16_i8.c: Regenerate.
1717 * generated/pow_i4_i16.c: Regenerate.
1718 * generated/pow_i4_i4.c: Regenerate.
1719 * generated/pow_i4_i8.c: Regenerate.
1720 * generated/pow_i8_i16.c: Regenerate.
1721 * generated/pow_i8_i4.c: Regenerate.
1722 * generated/pow_i8_i8.c: Regenerate.
1723 * generated/pow_r10_i16.c: Regenerate.
1724 * generated/pow_r10_i8.c: Regenerate.
1725 * generated/pow_r16_i16.c: Regenerate.
1726 * generated/pow_r16_i8.c: Regenerate.
1727 * generated/pow_r4_i16.c: Regenerate.
1728 * generated/pow_r4_i8.c: Regenerate.
1729 * generated/pow_r8_i16.c: Regenerate.
1730 * generated/pow_r8_i8.c: Regenerate.
1731 * generated/product_c10.c: Regenerate.
1732 * generated/product_c16.c: Regenerate.
1733 * generated/product_c4.c: Regenerate.
1734 * generated/product_c8.c: Regenerate.
1735 * generated/product_i1.c: Regenerate.
1736 * generated/product_i16.c: Regenerate.
1737 * generated/product_i2.c: Regenerate.
1738 * generated/product_i4.c: Regenerate.
1739 * generated/product_i8.c: Regenerate.
1740 * generated/product_r10.c: Regenerate.
1741 * generated/product_r16.c: Regenerate.
1742 * generated/product_r4.c: Regenerate.
1743 * generated/product_r8.c: Regenerate.
1744 * generated/reshape_c10.c: Regenerate.
1745 * generated/reshape_c16.c: Regenerate.
1746 * generated/reshape_c4.c: Regenerate.
1747 * generated/reshape_c8.c: Regenerate.
1748 * generated/reshape_i16.c: Regenerate.
1749 * generated/reshape_i4.c: Regenerate.
1750 * generated/reshape_i8.c: Regenerate.
1751 * generated/reshape_r10.c: Regenerate.
1752 * generated/reshape_r16.c: Regenerate.
1753 * generated/reshape_r4.c: Regenerate.
1754 * generated/reshape_r8.c: Regenerate.
1755 * generated/rrspacing_r10.c: Regenerate.
1756 * generated/rrspacing_r16.c: Regenerate.
1757 * generated/rrspacing_r4.c: Regenerate.
1758 * generated/rrspacing_r8.c: Regenerate.
1759 * generated/set_exponent_r10.c: Regenerate.
1760 * generated/set_exponent_r16.c: Regenerate.
1761 * generated/set_exponent_r4.c: Regenerate.
1762 * generated/set_exponent_r8.c: Regenerate.
1763 * generated/shape_i16.c: Regenerate.
1764 * generated/shape_i4.c: Regenerate.
1765 * generated/shape_i8.c: Regenerate.
1766 * generated/spacing_r10.c: Regenerate.
1767 * generated/spacing_r16.c: Regenerate.
1768 * generated/spacing_r4.c: Regenerate.
1769 * generated/spacing_r8.c: Regenerate.
1770 * generated/spread_c10.c: Regenerate.
1771 * generated/spread_c16.c: Regenerate.
1772 * generated/spread_c4.c: Regenerate.
1773 * generated/spread_c8.c: Regenerate.
1774 * generated/spread_i1.c: Regenerate.
1775 * generated/spread_i16.c: Regenerate.
1776 * generated/spread_i2.c: Regenerate.
1777 * generated/spread_i4.c: Regenerate.
1778 * generated/spread_i8.c: Regenerate.
1779 * generated/spread_r10.c: Regenerate.
1780 * generated/spread_r16.c: Regenerate.
1781 * generated/spread_r4.c: Regenerate.
1782 * generated/spread_r8.c: Regenerate.
1783 * generated/sum_c10.c: Regenerate.
1784 * generated/sum_c16.c: Regenerate.
1785 * generated/sum_c4.c: Regenerate.
1786 * generated/sum_c8.c: Regenerate.
1787 * generated/sum_i1.c: Regenerate.
1788 * generated/sum_i16.c: Regenerate.
1789 * generated/sum_i2.c: Regenerate.
1790 * generated/sum_i4.c: Regenerate.
1791 * generated/sum_i8.c: Regenerate.
1792 * generated/sum_r10.c: Regenerate.
1793 * generated/sum_r16.c: Regenerate.
1794 * generated/sum_r4.c: Regenerate.
1795 * generated/sum_r8.c: Regenerate.
1796 * generated/transpose_c10.c: Regenerate.
1797 * generated/transpose_c16.c: Regenerate.
1798 * generated/transpose_c4.c: Regenerate.
1799 * generated/transpose_c8.c: Regenerate.
1800 * generated/transpose_i16.c: Regenerate.
1801 * generated/transpose_i4.c: Regenerate.
1802 * generated/transpose_i8.c: Regenerate.
1803 * generated/transpose_r10.c: Regenerate.
1804 * generated/transpose_r16.c: Regenerate.
1805 * generated/transpose_r4.c: Regenerate.
1806 * generated/transpose_r8.c: Regenerate.
1807 * generated/unpack_c10.c: Regenerate.
1808 * generated/unpack_c16.c: Regenerate.
1809 * generated/unpack_c4.c: Regenerate.
1810 * generated/unpack_c8.c: Regenerate.
1811 * generated/unpack_i1.c: Regenerate.
1812 * generated/unpack_i16.c: Regenerate.
1813 * generated/unpack_i2.c: Regenerate.
1814 * generated/unpack_i4.c: Regenerate.
1815 * generated/unpack_i8.c: Regenerate.
1816 * generated/unpack_r10.c: Regenerate.
1817 * generated/unpack_r16.c: Regenerate.
1818 * generated/unpack_r4.c: Regenerate.
1819 * generated/unpack_r8.c: Regenerate.
1821 2009-04-08 Janne Blomqvist <jb@gcc.gnu.org>
1823 * io/open.c (already_open): Test for POSIX close return value.
1824 * io/unit.c (close_unit_1): Likewise.
1825 * io/unix.c (raw_close): Return 0 for success for preconnected units.
1827 2009-04-08 Janne Blomqvist <jb@gcc.gnu.org>
1829 * runtime/string.c (compare0): Use gfc_charlen_type.
1830 * runtime/error.c (gfc_itoa): Move to io/write.c
1831 (xtoa): Rename to gfc_xtoa.
1832 * runtime/backtrace.c (show_backtrace): Call gfc_xtoa.
1833 * intrinsics/cshift0.c (cshift0): Use index_type for shift arg.
1834 * intrinsics/date_and_time.c (date_and_time): Use index_type.
1835 (itime_i4): Likewise.
1836 (itime_i8): Likewise.
1837 (idate_i4): Likewise.
1838 (idate_i8): Likewise.
1839 (gmtime_i4): Likewise.
1840 (gmtime_i8): Likewise.
1841 (ltime_i4): Likewise.
1842 (ltime_i8): Likewise.
1843 * libgfortran.h (gfc_itoa): Remove prototype.
1844 (xtoa): Rename prototype to gfc_xtoa.
1845 * io/list_read.c (nml_read_obj): Use size_t for string length.
1846 * io/transfer.c (read_block_direct): Change nbytes arg from
1847 pointer to value.
1848 (unformatted_read): Minor cleanup, call read_block_directly properly.
1849 (skip_record): Use ssize_t.
1850 (next_record_w_unf): Avoid stell() call by calling sseek with SEEK_CUR.
1851 (iolength_transfer): Make sure to multiply before cast.
1852 * io/intrinsics.c (fgetc): Remove unnecessary variable.
1853 * io/format.c (format_hash): Use gfc_charlen_type.
1854 * io/write.c (itoa): Move from runtime/error.c:gfc_itoa, rename,
1855 make static.
1856 (write_i): Call with pointer to itoa.
1857 (write_z): Call with pointer to gfc_xtoa.
1858 (write_integer): Pointer to itoa.
1859 (nml_write_obj): Type cleanup, don't call strlen in loop.
1861 2009-04-06 H.J. Lu <hongjiu.lu@intel.com>
1863 PR libgfortran/39664
1864 * io/unix.c (raw_close): Don't close STDOUT_FILENO,
1865 STDERR_FILENO nor STDIN_FILENO.
1867 2009-04-06 David Edelsohn <edelsohn@gnu.org>
1869 * io/io.h (struct stream): Rename truncate to trunc.
1870 (struncate): Same.
1871 * io/unix.c (raw_init): Rename truncate to trunc.
1872 (buf_init): Same.
1873 (open_internal): Same.
1875 2009-04-05 Daniel Kraft <d@domob.eu>
1877 PR fortran/38654
1878 * io/read.c (read_f): Reworked to speed up floating point parsing.
1879 (convert_real): Use pointer-casting instead of memcpy and temporaries.
1881 2009-04-05 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1883 PR libfortran/37754
1884 * io/io.h (format_hash_entry): New structure for hash table.
1885 (format_hash_table): The hash table itself.
1886 (free_format_data): Revise function prototype.
1887 (free_format_hash_table, init_format_hash,
1888 free_format_hash): New function prototypes.
1889 * io/unit.c (close_unit_1): Use free_format_hash_table.
1890 * io/transfer.c (st_read_done, st_write_done): Free format data if
1891 internal unit.
1892 * io/format.c (free_format_hash_table): New function that frees any
1893 memory allocated previously for cached format data.
1894 (reset_node): New static helper function to reset the format counters
1895 for a format node.
1896 (reset_fnode_counters): New static function recursively calls reset_node
1897 to traverse the fnode tree.
1898 (format_hash): New simple hash function based on XOR, probabalistic,
1899 tosses collisions.
1900 (save_parsed_format): New static function to save the parsed format
1901 data to use again.
1902 (find_parsed_format): New static function searches the hash table
1903 looking for a match.
1904 (free_format_data): Revised to accept pointer to format data rather than
1905 the dtp pointer so that the function can be used in more places.
1906 (format_lex): Editorial.
1907 (parse_format_list): Set flag used to determine of format data hashing
1908 is to be used. Internal units are not persistent enough for this.
1909 (revert): Move to ne location in file.
1910 (parse_format): Use new functions to look for previously parsed
1911 format strings and use them rather than re-parse. If not found, saves
1912 the parsed format data for later use.
1914 2009-04-05 Jerry DeLisle <jvdelisle@gcc.gnu.org>
1916 PR libfortran/37754
1917 * io/transfer.c (formatted_transfer_scalar): Remove this function by
1918 factoring it into two new functions, one for read and one for write,
1919 eliminating all the conditionals for read or write mode.
1920 (formatted transfer_scalar_read): New function.
1921 (formatted transfer_scalar_write): New function.
1922 (formatted_transfer): Use new functions.
1924 2009-04-05 Janne Blomqvist <jb@gcc.gnu.org>
1926 PR libfortran/25561 libfortran/37754
1927 * io/io.h (struct stream): Define new stream interface function
1928 pointers, and inline functions for accessing it.
1929 (struct fbuf): Use int instead of size_t, remove flushed element.
1930 (mem_alloc_w): New prototype.
1931 (mem_alloc_r): New prototype.
1932 (stream_at_bof): Remove prototype.
1933 (stream_at_eof): Remove prototype.
1934 (file_position): Remove prototype.
1935 (flush): Remove prototype.
1936 (stream_offset): Remove prototype.
1937 (unit_truncate): New prototype.
1938 (read_block_form): Change to return pointer, int* argument.
1939 (hit_eof): New prototype.
1940 (fbuf_init): Change prototype.
1941 (fbuf_reset): Change prototype.
1942 (fbuf_alloc): Change prototype.
1943 (fbuf_flush): Change prototype.
1944 (fbuf_seek): Change prototype.
1945 (fbuf_read): New prototype.
1946 (fbuf_getc_refill): New prototype.
1947 (fbuf_getc): New inline function.
1948 * io/fbuf.c (fbuf_init): Use int, get rid of flushed.
1949 (fbuf_debug): New function.
1950 (fbuf_reset): Flush, and return position offset.
1951 (fbuf_alloc): Simplify, don't flush, just realloc.
1952 (fbuf_flush): Make usable for read mode, salvage remaining bytes.
1953 (fbuf_seek): New whence argument.
1954 (fbuf_read): New function.
1955 (fbuf_getc_refill): New function.
1956 * io/file_pos.c (formatted_backspace): Use new stream interface.
1957 (unformatted_backspace): Likewise.
1958 (st_backspace): Make sure format buffer is reset, use new stream
1959 interface, use unit_truncate.
1960 (st_endfile): Likewise.
1961 (st_rewind): Likewise.
1962 * io/intrinsics.c: Use new stream interface.
1963 * io/list_read.c (push_char): Don't use u.p.scratch, use realloc
1964 to resize.
1965 (free_saved): Don't check u.p.scratch.
1966 (next_char): Use new stream interface, use fbuf_getc() for external files.
1967 (finish_list_read): flush format buffer.
1968 (nml_query): Update to use modified interface:s
1969 * io/open.c (test_endfile): Use new stream interface.
1970 (edit_modes): Likewise.
1971 (new_unit): Likewise, set bytes_left to 1 for stream files.
1972 * io/read.c (read_l): Use new read_block_form interface.
1973 (read_utf8): Likewise.
1974 (read_utf8_char1): Likewise.
1975 (read_default_char1): Likewise.
1976 (read_utf8_char4): Likewise.
1977 (read_default_char4): Likewise.
1978 (read_a): Likewise.
1979 (read_a_char4): Likewise.
1980 (read_decimal): Likewise.
1981 (read_radix): Likewise.
1982 (read_f): Likewise.
1983 * io/transfer.c (read_sf): Use fbuf_read and mem_alloc_r, remove
1984 usage of u.p.line_buffer.
1985 (read_block_form): Update interface to return pointer, use
1986 fbuf_read for direct access.
1987 (read_block_direct): Update to new stream interface.
1988 (write_block): Use mem_alloc_w for internal I/O.
1989 (write_buf): Update to new stream interface.
1990 (formatted_transfer_scalar): Don't use u.p.line_buffer, use
1991 fbuf_seek for external files.
1992 (us_read): Update to new stream interface.
1993 (us_write): Likewise.
1994 (data_transfer_init): Always check if we switch modes and flush.
1995 (skip_record): Use new stream interface, fix comparison.
1996 (next_record_r): Check for and reset u.p.at_eof, use new stream
1997 interface, use fbuf_getc for spacing.
1998 (write_us_marker): Update to new stream interface, don't inline.
1999 (next_record_w_unf): Likewise.
2000 (sset): New function.
2001 (next_record_w): Use new stream interface, use fbuf for printing
2002 newline.
2003 (next_record): Use new stream interface.
2004 (finalize_transfer): Remove sfree call, use new stream interface.
2005 (st_iolength_done): Don't use u.p.scratch.
2006 (st_read): Don't check for end of file.
2007 (st_read_done): Don't use u.p.scratch, use unit_truncate.
2008 (hit_eof): New function.
2009 * io/unit.c (init_units): Always init fbuf for formatted units.
2010 (update_position): Use new stream interface.
2011 (unit_truncate): New function.
2012 (finish_last_advance_record): Use fbuf to print newline.
2013 * io/unix.c: Remove unused SSIZE_MAX macro.
2014 (BUFFER_SIZE): Make static const variable rather than macro.
2015 (struct unix_stream): Remove dirty_offset, len, method,
2016 small_buffer. Order elements by decreasing size.
2017 (struct int_stream): Remove.
2018 (move_pos_offset): Remove usage of dirty_offset.
2019 (reset_stream): Remove.
2020 (do_read): Rename to raw_read, update to match new stream
2021 interface.
2022 (do_write): Rename to raw_write, update to new stream interface.
2023 (raw_seek): New function.
2024 (raw_tell): New function.
2025 (raw_truncate): New function.
2026 (raw_close): New function.
2027 (raw_flush): New function.
2028 (raw_init): New function.
2029 (fd_alloc): Remove.
2030 (fd_alloc_r_at): Remove.
2031 (fd_alloc_w_at): Remove.
2032 (fd_sfree): Remove.
2033 (fd_seek): Remove.
2034 (fd_truncate): Remove.
2035 (fd_sset): Remove.
2036 (fd_read): Remove.
2037 (fd_write): Remove.
2038 (fd_close): Remove.
2039 (fd_open): Remove.
2040 (fd_flush): Rename to buf_flush, update to new stream interface
2041 and unix_stream.
2042 (buf_read): New function.
2043 (buf_write): New function.
2044 (buf_seek): New function.
2045 (buf_tell): New function.
2046 (buf_truncate): New function.
2047 (buf_close): New function.
2048 (buf_init): New function.
2049 (mem_alloc_r_at): Rename to mem_alloc_r, change prototype.
2050 (mem_alloc_w_at): Rename to mem_alloc_w, change prototype.
2051 (mem_read): Change to match new stream interface.
2052 (mem_write): Likewise.
2053 (mem_seek): Likewise.
2054 (mem_tell): Likewise.
2055 (mem_truncate): Likewise.
2056 (mem_close): Likewise.
2057 (mem_flush): New function.
2058 (mem_sfree): Remove.
2059 (empty_internal_buffer): Cast to correct type.
2060 (open_internal): Use correct type, init function pointers.
2061 (fd_to_stream): Test whether to open file as buffered or raw.
2062 (output_stream): Remove mode set.
2063 (error_stream): Likewise.
2064 (flush_all_units_1): Use new stream interface.
2065 (flush_all_units): Likewise.
2066 (stream_at_bof): Remove.
2067 (stream_at_eof): Remove.
2068 (file_position): Remove.
2069 (file_length): Update logic to use stream interface.
2070 (flush): Remove.
2071 (stream_offset): Remove.
2072 * io/write.c (write_utf8_char4): Use int instead of size_t.
2073 (write_x): Extra safety check.
2074 (namelist_write_newline): Use new stream interface.
2076 2009-03-29 John David Anglin <dave.anglin@nrc-cnrc.gc.ca>
2078 PR fortran/33595
2079 * intrinsics/c99_functions.c (round): Use floor instead of ceil.
2080 Revise checks to round up.
2081 (roundf): Likewise.
2083 2009-03-28 Daniel Kraft <d@domob.eu>
2085 * intrinsics/string_intrinsics.c: #include <assert.h>
2086 * intrinsics/string_intrinsics_inc.c (string_trim): Use string_len_trim
2087 instead of calculating the length directly.
2088 (string_len_trim): For KIND=1, speed search up.
2090 2009-03-24 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2092 PR libfortran/39528
2093 * io/list_read.c (list_formatted_read_scalar): Move check for read
2094 completion to just after the check for a repeated value.
2096 2009-03-08 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2098 PR libfortran/39402
2099 * io/write_float.def (output_float): Handle F0.d formatting correctly
2100 for any d when value is 0.0.
2102 2009-03-01 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
2104 * configure: Regenerate.
2106 2009-01-21 Daniel Kraft <d@domob.eu>
2108 PR fortran/38887
2109 * runtime/in_unpack_generic.c (internal_unpack): Return instead of
2110 abort when called with empty array.
2111 * m4/in_unpack.m4: Ditto.
2112 * generated/in_unpack_i1.c: Regenerated.
2113 * generated/in_unpack_i2.c: Regenerated.
2114 * generated/in_unpack_i4.c: Regenerated.
2115 * generated/in_unpack_i8.c: Regenerated.
2116 * generated/in_unpack_i16.c: Regenerated.
2117 * generated/in_unpack_r4.c: Regenerated.
2118 * generated/in_unpack_r8.c: Regenerated.
2119 * generated/in_unpack_r10.c: Regenerated.
2120 * generated/in_unpack_r16.c: Regenerated.
2121 * generated/in_unpack_c4.c: Regenerated.
2122 * generated/in_unpack_c8.c: Regenerated.
2123 * generated/in_unpack_c10.c: Regenerated.
2124 * generated/in_unpack_c16.c: Regenerated.
2126 2009-01-12 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2128 PR libfortran/38772
2129 * io/read.c (read_f): Clean up loop conditions for BZ/BN,
2130 allowing proper digit testing. White space fix.
2132 2009-01-05 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2134 PR libfortran/38735
2135 * io/unit.c (get_internal_unit): Set default BLANK= status to NULL for
2136 internal units.
2138 2008-12-29 John David Anglin <dave.anglin@nrc-cnrc.gc.ca>
2140 PR fortran/31832
2141 * acinclude.m4 (LIBGFOR_CHECK_FOR_BROKEN_POWF): New autoconf check for
2142 broken powf.
2143 * configure.ac (LIBGFOR_CHECK_FOR_BROKEN_POWF): Use it.
2144 * intrinsics/c99_functions.c: Use internal powf implementation if
2145 HAVE_BROKEN_POWF is defined.
2146 * configure: Rebuilt.
2147 * config.h.in: Rebuilt.
2149 2008-12-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2151 PR libfortran/37472
2152 * io/write_float.def (output_float_FMT_G_): Modify calculation of temp
2153 to avoid sensitivity to round-off.
2155 2008-12-21 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2157 PR libfortran/38398
2158 * io/io.h (st_parameter_dt): Add new bit to keep track of when to
2159 suppress blanks for g0 formatting.
2160 * io/transfer.c (formatted_transfer_scalar): Always call write_real_g0
2161 for g0 formatting.
2162 * io.c (write.c): Do not use ES formatting and use new bit to suppress
2163 blanks.
2164 * io/write_float.def (output_float): Adjust the location of setting the
2165 width so that it can be adjusted when suppressing blanks. Set number of
2166 blanks to zero when dtp->u.p.g0_no_blanks is set. Do some minor code
2167 clean-up and add some white space for readability.
2169 2008-12-18 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
2171 * configure: Regenerate.
2173 2008-12-13 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2175 PR libfortran/38504
2176 io/write.c (write_decimal): Skip extra sign '-' at beginning of string
2177 returned by gfc_itoa.
2179 2008-12-08 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2181 PR libfortran/38430
2182 * io/transfer.c (data_transfer_init): Move constraint check for REC=
2183 and STREAM access into condition for other REC= constraints to simplify.
2184 Comment out this constraint to avoid breaking compatibility with 4.3
2185 until later. Added a TODO for above comment and this one.
2186 Fix test for max pos.
2188 2008-12-06 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2190 PR libfortran/38291
2191 * io/transfer.c (data_transfer_init): Add fbuf_flush inadvertently
2192 ommitted. Add check for invalid use of REC= with ACCESS="stream". Fix
2193 comment.
2195 2008-12-06 Adam Nemet <anemet@caviumnetworks.com>
2197 * runtime/main.c (store_exe_path): Don't crash if argv0 is NULL.
2199 2008-12-05 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2201 PR libfortran/38291
2202 * io/transfer.c (data_transfer_init): Add checks for POS= valid range.
2203 Add check for unit opened with ACCESS="stream". Flush and seek if
2204 current stream position does not match. Check ENDFILE on read.
2206 2008-12-04 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2208 PR fortran/38285
2209 * write_float.def (WRITE_FLOAT): Zero the float value for special case
2210 only if scale_factor = 0.
2212 2008-11-23 Thomas Koenig <tkoenig@gcc.gnu.org>
2214 PR libfortran/38234
2215 * intrinsics/reshape_generic.c (reshape_internal):
2216 Source can be larger than shape.
2217 * m4/reshape.m4: Likewise.
2218 * generated/reshape_c10.c Regenerated.
2219 * generated/reshape_c16.c Regenerated.
2220 * generated/reshape_c4.c Regenerated.
2221 * generated/reshape_c8.c Regenerated.
2222 * generated/reshape_i16.c Regenerated.
2223 * generated/reshape_i4.c Regenerated.
2224 * generated/reshape_i8.c Regenerated.
2225 * generated/reshape_r10.c Regenerated.
2226 * generated/reshape_r16.c Regenerated.
2227 * generated/reshape_r4.c Regenerated.
2228 * generated/reshape_r8.c Regenerated.
2230 2008-11-22 Danny Smith <dannysmith@users.sourceforge.net>
2232 * libgfortran.h (__mingw_snprintf): Declare with gnu_printf
2233 format attribute.
2236 2008-11-22 Thomas Koenig <tkoenig@gcc.gnu.org>
2238 PR libfortran/38225
2239 * intrinsics/reshape_generic.c (reshape_internal):
2240 Use all dimensions of source for bounds checking.
2241 * m4/reshape.m4: Likewise.
2242 * generated/reshape_c10.c Regenerated.
2243 * generated/reshape_c16.c Regenerated.
2244 * generated/reshape_c4.c Regenerated.
2245 * generated/reshape_c8.c Regenerated.
2246 * generated/reshape_i16.c Regenerated.
2247 * generated/reshape_i4.c Regenerated.
2248 * generated/reshape_i8.c Regenerated.
2249 * generated/reshape_r10.c Regenerated.
2250 * generated/reshape_r16.c Regenerated.
2251 * generated/reshape_r4.c Regenerated.
2252 * generated/reshape_r8.c Regenerated.
2254 2008-11-22 Jakub Jelinek <jakub@redhat.com>
2256 PR libfortran/37839
2257 * io/io.h (IOPARM_INQUIRE_HAS_ROUND, IOPARM_INQUIRE_HAS_SIGN,
2258 IOPARM_INQUIRE_HAS_PENDING): Adjust values.
2259 (st_parameter_inquire): Reorder and fix types of round, sign and
2260 pending fields.
2261 (st_parameter_43, st_parameter_44): Removed.
2262 (st_parameter_dt): Put back struct definition directly to u.p
2263 declaration. Change type of u.p.size_used from gfc_offset to
2264 GFC_IO_INT. Decrease back size of u.pad to 16 pointers and
2265 32 ints. Put id, pos, asynchronous, blank, decimal, delim,
2266 pad, round and sign fields after the union.
2267 * io/inquire.c (inquire_via_unit, inquire_via_filename): Only read
2268 flags2 if it is defined.
2269 * io/transfer.c (read_sf, read_block_form, write_block): Cast
2270 additions to size_used to GFC_IO_INT instead of gfc_offset.
2271 (data_transfer_init): Clear whole u.p struct. Adjust
2272 for moving id, pos, asynchronous, blank, decimal, delim, pad,
2273 round and sign fields from u.p directly into st_parameter_dt.
2274 (finalize_transfer): Don't cast size_used to GFC_IO_INT.
2275 * io/file_pos.c (st_endfile): Clear whole u.p struct.
2277 2008-11-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2279 PR libfortran/37472
2280 * io/write_float.def (output_float_FMT_G_): Adjust conversion of
2281 G format specification to F format.
2283 2008-11-18 Thomas Koenig <tkoenig@gcc.gnu.org>
2285 PR libfortran/38135
2286 * m4/reshape.m4: Correct bounds checking when PAD is present.
2287 Treat PAD as if it were SOURCE when SOURCE is empty.
2288 * intrinsics/reshape_generic.c: Likewise.
2289 * generated/reshape_c10.c Regenerated.
2290 * generated/reshape_c16.c Regenerated.
2291 * generated/reshape_c4.c Regenerated.
2292 * generated/reshape_c8.c Regenerated.
2293 * generated/reshape_i16.c Regenerated.
2294 * generated/reshape_i4.c Regenerated.
2295 * generated/reshape_i8.c Regenerated.
2296 * generated/reshape_r10.c Regenerated.
2297 * generated/reshape_r16.c Regenerated.
2298 * generated/reshape_r4.c Regenerated.
2299 * generated/reshape_r8.c Regenerated.
2301 2008-11-16 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2303 PR libfortran/38097
2304 * io/read.c (read_f): Initialize exponent. Fix comment. Set loop
2305 conditions for BZ/BN.
2306 * io/unit.c (get_internal_unit): Initialize flags.blank.
2307 * io/transfer.c (data_transfer_init): Fix whitespace.
2309 2008-11-15 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2311 PR libfortran/37294
2312 * io/write.c (namelist_write_newline): Use array loop specification to
2313 advance to next internal array unit record. (namelist_write): Adjust to
2314 accomodate the internal array unit behavior.
2316 2008-11-01 Dennis Wassel <dennis.wassel@gmail.com>
2318 PR fortran/37159
2319 * intrinsics/random.c: Added comment to adapt check.c, should
2320 kiss_size change.
2321 Few cosmetic changes to existing comments.
2323 2008-10-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2325 PR libfortran/37707
2326 * io/list_read.c (read_character): Remove code to look ahead in namelist
2327 reads to descriminate non-delimited strings from namelist objects.
2328 * io/write.c (namelist_write): Delimit character strings with quote or
2329 apostrophe, defaulting to quote.
2331 2008-10-21 Thomas Koenig <tkoenig@gcc.gnu.org>
2333 PR libfortran/34670
2334 * intrinsics/transpose_generic.c: Implement bounds checking.
2335 * m4/transpose.m4: Likewise.
2336 * generated/transpose_c8.c: Regenerated.
2337 * generated/transpose_c16.c: Regenerated.
2338 * generated/transpose_r10.c: Regenerated.
2339 * generated/transpose_i8.c: Regenerated.
2340 * generated/transpose_c10.c: Regenerated.
2341 * generated/transpose_r4.c: Regenerated.
2342 * generated/transpose_c4.c: Regenerated.
2343 * generated/transpose_i16.c: Regenerated.
2344 * generated/transpose_i4.c: Regenerated.
2345 * generated/transpose_r8.c: Regenerated.
2346 * generated/transpose_r16.c: Regenerated.
2348 2008-10-19 Jerry DeLisle <jvdelisle@gcc.gnu.org
2350 PR libfortran/37834
2351 * io/write_float.def (output_float): Emit '0.' for special case of
2352 format specifier 'f0.0' and value of zero. Likewise emit '0' for 'f1.0'.
2354 2008-10-17 Jerry DeLisle <jvdelisle@gcc.gnu.org
2356 PR libfortran/37863
2357 * io/write_float.def (WRITE_FLOAT): Round to 1.0 correctly.
2358 * io/io.h (st_parameter_44): Fix id type declaration.
2360 2008-10-16 Thomas Koenig <tkoenig@gcc.gnu.org>
2362 * io/file_pos.c (unformatted_backspace): Normal case is
2363 GFC_CONVERT_NATIVE.
2364 * io/transfer.c (read_sf): Mark paths leading to generate_error()
2365 as unlikely.
2366 (readl_block_form): Likewise.
2367 (read_block_direct): Likewise.
2368 (write_block): Likewise.
2369 (write_buf): Likewise.
2370 (us_read): Likewise. Normal case is GFC_CONVERT_NATIVE.
2371 (next_record_w_unf): Mark paths leading to generate_error()
2372 as unlikely.
2374 2008-10-16 Thomas Koenig <tkoenig@gcc.gnu.org>
2376 PR libfortran/34670
2377 * generated/spread_r4.c: Regenerated.
2379 2008-10-15 Thomas Koenig <tkoenig@gcc.gnu.org>
2381 PR libfortran/34670
2382 * intrinsics/reshape_generic.c: Add bounds checking.
2383 * m4/reshape.m4: Likewise.
2384 * generated/reshape_c10.c: Regenerated.
2385 * generated/reshape_c16.c: Regenerated.
2386 * generated/reshape_c4.c: Regenerated.
2387 * generated/reshape_c8.c: Regenerated.
2388 * generated/reshape_i16.c: Regenerated.
2389 * generated/reshape_i4.c: Regenerated.
2390 * generated/reshape_i8.c: Regenerated.
2391 * generated/reshape_r10.c: Regenerated.
2392 * generated/reshape_r16.c: Regenerated.
2393 * generated/reshape_r4.c: Regenerated.
2394 * generated/reshape_r8.c: Regenerated.
2395 * generated/spread_r4.c: Regenerated.
2397 2008-10-13 Jerry DeLisle <jvdelisle@gcc.gnu.org
2399 PR libfortran/37083
2400 * io/list_read.c (next_char): Simplify EOF tests and set endfile flag.
2401 (finish_list_read): Add EOF check.
2403 2008-10-09 Thomas Koenig <tkoenig@gcc.gnu.org>
2405 PR libfortran/37753
2406 * io/transfer.c (unformatted_read): CONVERT_NATIVE
2407 is the usual case. Check for kind==1 for non-byte-reversing
2408 operation.
2409 (unformatted_write): Likewise.
2411 2008-10-08 Jerry DeLisle <jvdelisle@gcc.gnu.org
2413 PR libfortran/37707
2414 * io/list_read.c (nml_get_obj_data): If the first namelist object rank
2415 is greater than zero, call nml_object_read with the first object rather
2416 than the sub-object.
2418 2008-09-26 Peter O'Gorman <pogma@thewrittenword.com>
2419 Steve Ellcey <sje@cup.hp.com>
2421 * configure: Regenerate for new libtool.
2422 * Makefile.in: Ditto.
2424 2008-09-25 Jerry DeLisle <jvdelisle@gcc.gnu.org
2426 PR libfortran/37498
2427 * list_read.c (eat_separator): Revert previous patch and move
2428 delim_status, decimal_status, and pad_status to gfc_unit.
2429 (parse_real): Ditto. (read_real): Ditto.
2430 * read.c (read_a): Likewise. (read_a_char4): Likewise.
2431 (read_f): Likewise.
2432 * inquire.c (inquire_via_unit): Add missing check for
2433 IOPARM_INQUIRE_HAS_FLAGS2. (inquire_via_filename): Likewise.
2434 * io.h (unit_sign_s): Move delim_status, decimal_status, and pad_status
2435 to gfc_unit.
2436 * transfer.c (read_sf): Ditto. (read_block_form): Ditto.
2437 (formatted_transfer_scalar): Ditto. (data_transfer_init): Ditto.
2438 * write.c (write_default_char4): Ditto. (write_utf8_char4): Ditto.
2439 (write_character): Ditto. (write_real_g0): Ditto.
2440 (list_formatted_write_scalar): Ditto. (nml_write_obj): Ditto.
2441 (namelist_write): Ditto.
2442 * write_float.def (calculate_sign): Ditto. (output_float): Ditto.
2444 2008-09-24 Tobias Burnus <burnus@net-b.de>
2446 * runtime/compile_options.c (init_compile_options):
2447 Sync flags with front end.
2449 2008-09-22 Jerry DeLisle <jvdelisle@gcc.gnu.org
2451 PR libfortran/37498
2452 * file_pos (st_endfile): Clear memory only for libfortran 4.3 private
2453 area.
2454 * list_read.c (eat_separator): Only access F2003 I/O parameters if
2455 IOPARM_DT_HAS_F2003 bit is set. (parse_real): Ditto.
2456 (read_real): Ditto.
2457 * read.c (read_a): Likewise. (read_a_char4): Likewise though not
2458 strictly necessary. (read_f): Likewise.
2459 * io.h (unit_sign_s): New enumerator to allow duplication of
2460 st_parameter structures. (IOPARM_DT_HAS_F2003): New mask bit.
2461 (st_parameter_43): New structure copied from 4.3 version of
2462 st_paramater_dt private section. (st_parameter_44): New structure with
2463 F2003 items added. (st_parameter_dt): Modified to create union of new
2464 and old structures to allow correct memory setting for 4.3 ABI
2465 compatibility. Bumped the pad size.
2466 * transfer.c (read_sf): Do not use F2003 I/O memory areas unless
2467 IOPARM_DT_HAS_F2003 bit has been set. (read_block_form): Ditto.
2468 (formatted_transfer_scalar): Ditto. (data_transfer_init): Ditto and
2469 add comment, fix formatting.
2470 * write.c (write_default_char4): Likewise though not strictly necessary.
2471 (write_utf8_char4): Ditto. (write_character): Ditto.
2472 (write_real_g0): Ditto. (list_formatted_write_scalar): Ditto.
2473 (nml_write_obj): Ditto. (namelist_write): Ditto.
2474 * write_float.def (calculate_sign): Eliminate warning by including all
2475 cases in switch. (output_float): Output only decimal point of F2003 flag
2476 is not set.
2478 2008-09-10 Tobias Burnus <burnus@net-b.de>
2479 H. J. Lu <hongjiu.lu@intel.com>
2481 * mk-sik-inc.sh: Make -Wunused-variable proof.
2482 * mk-srk-inc.sh: Make -Wunused-variable proof.
2484 2008-09-10 Tobias Burnus <burnus@net-b.de>
2486 * mk-kinds-h.sh: Make -Wunused-variable proof.
2488 2008-09-07 Thomas Koenig <tkoenig@gcc.gnu.org>
2490 PR fortran/37203
2491 * intrinsics/reshape_generic.c: Add checking on
2492 out-of-bounds and duplicate values of order argument.
2493 * m4/reshape.m4: Likewise.
2494 * generated/reshape_c10.c: Regenerated.
2495 * generated/reshape_c16.c: Regenerated.
2496 * generated/reshape_c4.c: Regenerated.
2497 * generated/reshape_c8.c: Regenerated.
2498 * generated/reshape_i16.c: Regenerated.
2499 * generated/reshape_i4.c: Regenerated.
2500 * generated/reshape_i8.c: Regenerated.
2501 * generated/reshape_r10.c: Regenerated.
2502 * generated/reshape_r16.c: Regenerated.
2503 * generated/reshape_r4.c: Regenerated.
2504 * generated/reshape_r8.c: Regenerated.
2506 2008-09-06 Tobias Burnus <burnus@net-b.de>
2508 * libgfortran.h (likely,unlikely): New makros.
2509 (runtime_warning_at,__mingw_snprintf): Add __attribute__(format()).
2510 * m4/spread.m4 (spread_'rtype_code`): Use unlikely for bounds_check.
2511 * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Ditto.
2512 * m4/matmull.m4 (matmul_'rtype_code`): Ditto.
2513 * m4/ifunction_logical.m4 (name`'rtype_qual`_'atype_code): Ditto.
2514 * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): Ditto.
2515 * m4/matmul.m4 (matmul_'rtype_code`): Ditto.
2517 * generated/minval_r8.c: Regenerated.
2518 * generated/spread_r10.c: Regenerated.
2519 * generated/minloc1_16_r16.c: Regenerated.
2520 * generated/maxloc1_4_r8.c: Regenerated.
2521 * generated/sum_i8.c: Regenerated.
2522 * generated/any_l16.c: Regenerated.
2523 * generated/spread_i8.c: Regenerated.
2524 * generated/maxval_i2.c: Regenerated.
2525 * generated/any_l2.c: Regenerated.
2526 * generated/product_r4.c: Regenerated.
2527 * generated/maxloc1_8_i4.c: Regenerated.
2528 * generated/maxloc0_4_r4.c: Regenerated.
2529 * generated/all_l1.c: Regenerated.
2530 * generated/matmul_r8.c: Regenerated.
2531 * generated/product_i2.c: Regenerated.
2532 * generated/minloc0_4_r16.c: Regenerated.
2533 * generated/minloc0_4_i1.c: Regenerated.
2534 * generated/maxloc0_4_r16.c: Regenerated.
2535 * generated/maxloc0_4_i2.c: Regenerated.
2536 * generated/minloc1_8_r16.c: Regenerated.
2537 * generated/maxloc1_8_r16.c: Regenerated.
2538 * generated/maxloc0_8_i8.c: Regenerated.
2539 * generated/sum_r16.c: Regenerated.
2540 * generated/sum_i1.c: Regenerated.
2541 * generated/minloc1_4_r8.c: Regenerated.
2542 * generated/maxloc1_16_r16.c: Regenerated.
2543 * generated/minloc1_16_i4.c: Regenerated.
2544 * generated/maxloc1_16_i4.c: Regenerated.
2545 * generated/minloc0_16_i8.c: Regenerated.
2546 * generated/spread_i1.c: Regenerated.
2547 * generated/maxloc0_16_i8.c: Regenerated.
2548 * generated/maxval_r16.c: Regenerated.
2549 * generated/product_c10.c: Regenerated.
2550 * generated/minloc1_8_i4.c: Regenerated.
2551 * generated/minloc0_16_i16.c: Regenerated.
2552 * generated/matmul_r16.c: Regenerated.
2553 * generated/minloc0_4_r4.c: Regenerated.
2554 * generated/all_l2.c: Regenerated.
2555 * generated/product_c4.c: Regenerated.
2556 * generated/sum_r4.c: Regenerated.
2557 * generated/minloc0_4_i2.c: Regenerated.
2558 * generated/spread_c10.c: Regenerated.
2559 * generated/maxloc0_8_i1.c: Regenerated.
2560 * generated/spread_r4.c: Regenerated.
2561 * generated/minloc0_8_i8.c: Regenerated.
2562 * generated/matmul_c8.c: Regenerated.
2563 * generated/all_l16.c: Regenerated.
2564 * generated/minloc1_16_r10.c: Regenerated.
2565 * generated/sum_i2.c: Regenerated.
2566 * generated/minloc0_16_i1.c: Regenerated.
2567 * generated/maxloc0_16_i1.c: Regenerated.
2568 * generated/maxloc1_8_r8.c: Regenerated.
2569 * generated/minval_i16.c: Regenerated.
2570 * generated/spread_i2.c: Regenerated.
2571 * generated/maxval_i4.c: Regenerated.
2572 * generated/minval_i8.c: Regenerated.
2573 * generated/any_l4.c: Regenerated.
2574 * generated/maxloc1_4_i8.c: Regenerated.
2575 * generated/maxloc0_16_i16.c: Regenerated.
2576 * generated/maxloc0_8_r4.c: Regenerated.
2577 * generated/minloc1_4_i16.c: Regenerated.
2578 * generated/maxloc1_4_i16.c: Regenerated.
2579 * generated/minloc0_4_r10.c: Regenerated.
2580 * generated/minloc0_8_i16.c: Regenerated.
2581 * generated/maxloc0_4_r10.c: Regenerated.
2582 * generated/maxloc0_8_i16.c: Regenerated.
2583 * generated/minloc1_8_r10.c: Regenerated.
2584 * generated/product_i4.c: Regenerated.
2585 * generated/minloc0_16_r4.c: Regenerated.
2586 * generated/sum_c16.c: Regenerated.
2587 * generated/maxloc1_8_r10.c: Regenerated.
2588 * generated/maxloc0_16_r4.c: Regenerated.
2589 * generated/minloc1_16_r8.c: Regenerated.
2590 * generated/minloc0_8_i1.c: Regenerated.
2591 * generated/maxloc0_4_i4.c: Regenerated.
2592 * generated/maxloc1_16_r8.c: Regenerated.
2593 * generated/maxloc0_8_i2.c: Regenerated.
2594 * generated/sum_r10.c: Regenerated.
2595 * generated/count_4_l.c: Regenerated.
2596 * generated/sum_c4.c: Regenerated.
2597 * generated/count_8_l.c: Regenerated.
2598 * generated/maxloc1_16_r10.c: Regenerated.
2599 * generated/matmul_i8.c: Regenerated.
2600 * generated/minloc0_16_i2.c: Regenerated.
2601 * generated/minloc1_8_r8.c: Regenerated.
2602 * generated/maxloc0_16_i2.c: Regenerated.
2603 * generated/spread_c4.c: Regenerated.
2604 * generated/matmul_c16.c: Regenerated.
2605 * generated/maxval_r10.c: Regenerated.
2606 * generated/minval_i1.c: Regenerated.
2607 * generated/maxloc1_4_i1.c: Regenerated.
2608 * generated/matmul_r10.c: Regenerated.
2609 * generated/minloc1_4_i8.c: Regenerated.
2610 * generated/minloc0_8_r4.c: Regenerated.
2611 * generated/matmul_l4.c: Regenerated.
2612 * generated/product_i16.c: Regenerated.
2613 * generated/minloc0_16_r16.c: Regenerated.
2614 * generated/all_l4.c: Regenerated.
2615 * generated/minloc0_4_i4.c: Regenerated.
2616 * generated/minloc0_8_i2.c: Regenerated.
2617 * generated/matmul_i1.c: Regenerated.
2618 * generated/minval_r4.c: Regenerated.
2619 * generated/maxloc1_4_r4.c: Regenerated.
2620 * generated/spread_i16.c: Regenerated.
2621 * generated/sum_i4.c: Regenerated.
2622 * generated/maxval_r8.c: Regenerated.
2623 * generated/spread_i4.c: Regenerated.
2624 * generated/minloc1_4_i1.c: Regenerated.
2625 * generated/minval_r16.c: Regenerated.
2626 * generated/minval_i2.c: Regenerated.
2627 * generated/maxloc1_4_i2.c: Regenerated.
2628 * generated/product_r8.c: Regenerated.
2629 * generated/maxloc1_8_i8.c: Regenerated.
2630 * generated/maxloc0_4_r8.c: Regenerated.
2631 * generated/maxloc0_16_r16.c: Regenerated.
2632 * generated/matmul_r4.c: Regenerated.
2633 * generated/sum_c10.c: Regenerated.
2634 * generated/minloc1_4_r16.c: Regenerated.
2635 * generated/maxloc1_4_r16.c: Regenerated.
2636 * generated/minloc0_8_r16.c: Regenerated.
2637 * generated/maxloc0_8_r16.c: Regenerated.
2638 * generated/count_1_l.c: Regenerated.
2639 * generated/maxloc0_8_i4.c: Regenerated.
2640 * generated/matmul_i2.c: Regenerated.
2641 * generated/minloc1_4_r4.c: Regenerated.
2642 * generated/matmul_c10.c: Regenerated.
2643 * generated/minloc0_16_i4.c: Regenerated.
2644 * generated/maxloc0_16_i4.c: Regenerated.
2645 * generated/minloc1_16_i8.c: Regenerated.
2646 * generated/maxloc1_16_i8.c: Regenerated.
2647 * generated/minloc1_4_i2.c: Regenerated.
2648 * generated/matmul_l16.c: Regenerated.
2649 * generated/maxloc1_8_i1.c: Regenerated.
2650 * generated/minloc0_16_r10.c: Regenerated.
2651 * generated/minloc1_8_i8.c: Regenerated.
2652 * generated/minloc0_4_r8.c: Regenerated.
2653 * generated/product_r16.c: Regenerated.
2654 * generated/product_c8.c: Regenerated.
2655 * generated/sum_r8.c: Regenerated.
2656 * generated/minloc0_8_i4.c: Regenerated.
2657 * generated/matmul_c4.c: Regenerated.
2658 * generated/minloc1_16_i16.c: Regenerated.
2659 * generated/spread_r8.c: Regenerated.
2660 * generated/maxloc1_8_r4.c: Regenerated.
2661 * generated/minloc1_16_i1.c: Regenerated.
2662 * generated/maxloc1_16_i1.c: Regenerated.
2663 * generated/spread_r16.c: Regenerated.
2664 * generated/minval_r10.c: Regenerated.
2665 * generated/count_16_l.c: Regenerated.
2666 * generated/minval_i4.c: Regenerated.
2667 * generated/minloc1_8_i1.c: Regenerated.
2668 * generated/maxloc1_4_i4.c: Regenerated.
2669 * generated/maxloc1_8_i2.c: Regenerated.
2670 * generated/maxval_i8.c: Regenerated.
2671 * generated/any_l8.c: Regenerated.
2672 * generated/maxloc0_16_r10.c: Regenerated.
2673 * generated/minloc0_4_i16.c: Regenerated.
2674 * generated/maxloc0_8_r8.c: Regenerated.
2675 * generated/maxloc0_4_i16.c: Regenerated.
2676 * generated/minloc1_4_r10.c: Regenerated.
2677 * generated/minloc1_8_i16.c: Regenerated.
2678 * generated/maxloc1_4_r10.c: Regenerated.
2679 * generated/maxloc1_8_i16.c: Regenerated.
2680 * generated/minloc0_8_r10.c: Regenerated.
2681 * generated/maxloc0_8_r10.c: Regenerated.
2682 * generated/minloc1_16_r4.c: Regenerated.
2683 * generated/maxloc1_16_r4.c: Regenerated.
2684 * generated/minloc0_16_r8.c: Regenerated.
2685 * generated/product_i8.c: Regenerated.
2686 * generated/maxloc0_16_r8.c: Regenerated.
2687 * generated/sum_i16.c: Regenerated.
2688 * generated/count_2_l.c: Regenerated.
2689 * generated/maxloc0_4_i8.c: Regenerated.
2690 * generated/maxloc1_16_i16.c: Regenerated.
2691 * generated/matmul_i4.c: Regenerated.
2692 * generated/minloc1_8_r4.c: Regenerated.
2693 * generated/sum_c8.c: Regenerated.
2694 * generated/minloc1_16_i2.c: Regenerated.
2695 * generated/maxloc1_16_i2.c: Regenerated.
2696 * generated/maxval_i16.c: Regenerated.
2697 * generated/spread_c8.c: Regenerated.
2698 * generated/matmul_i16.c: Regenerated.
2699 * generated/minloc1_4_i4.c: Regenerated.
2700 * generated/maxval_i1.c: Regenerated.
2701 * generated/minloc1_8_i2.c: Regenerated.
2702 * generated/any_l1.c: Regenerated.
2703 * generated/product_c16.c: Regenerated.
2704 * generated/minloc0_8_r8.c: Regenerated.
2705 * generated/matmul_l8.c: Regenerated.
2706 * generated/product_r10.c: Regenerated.
2707 * generated/product_i1.c: Regenerated.
2708 * generated/all_l8.c: Regenerated.
2709 * generated/maxloc0_4_i1.c: Regenerated.
2710 * generated/minloc0_4_i8.c: Regenerated.
2711 * generated/spread_c16.c: Regenerated.
2712 * generated/maxval_r4.c: Regenerated.
2714 2008-09-01 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2716 PR libfortran/37301
2717 PR libfortran/37228
2718 * io/io.h (write_real_g0): Declare new function to handle g0.d format.
2719 * io/transfer.c (formatted_transfer_scalar): Use new function.
2720 * io/format.c (parse_format_list): Enable g0.d.
2721 * io/write.c (write_a_char4): Delete unused var.
2722 (set_fnode_default): New function to set the default fnode w, d, and e
2723 factored from write_real. (write_real): Use new factored function.
2724 (write_real_g0): New function that sets d to that passed by g0.d format
2725 specifier and set format to ES. Default values for w and e are used
2726 from the new function, set_fnode_default.
2728 2008-09-01 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2730 * runtime/error.c: Fix cast for printf.
2732 2008-08-30 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2734 PR libfortran/36895
2735 * io/write.c (namelist_write_newline): New function to correctly mark
2736 next records in both external and internal units.
2737 (nml_write_obj): Use new function.
2738 (namelist_write: Use new function.
2740 2008-08-19 Tobias Burnus <burnus@net-b.de>
2742 PR libfortran/35863
2743 * io/write.c (write_a_char4): Add missing variable declaration
2744 in HAVE_CRLF block.
2746 2008-08-15 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2748 PR libfortran/35863
2749 * intrinsics/selected_char_kind.c: Enable iso_10646.
2750 * io/read.c (typedef uchar): New type.
2751 (read_utf8): New function to read a single UTF-8 encoded character.
2752 (read_utf8_char1): New function to read UTF-8 into a KIND=1 string.
2753 (read_default_char1): New functio to read default into KIND=1 string.
2754 (read_utf8_char4): New function to read UTF-8 into a KIND=4 string.
2755 (read_default_char4): New function to read UTF-8 into a KIND=4 string.
2756 (read_a): Modify to use the new functions.
2757 (read_a_char4): Modify to use the new functions.
2758 * io/write.c (error.h): Add include. (typedef uchar): New type.
2759 (write_default_char4): New function to default write KIND=4 string.
2760 (write_utf8_char4): New function to UTF-8 write KIND=4 string.
2761 (write_a_char4): Modify to use new functions.
2762 (write_character): Modify to use new functions.
2764 2008-08-14 H.J. Lu <hongjiu.lu@intel.com>
2766 PR libfortran/37123
2767 * intrinsics/cshift0.c (cshift0): Fix 2 typos.
2769 2008-08-14 Thomas Koenig <tkoenig@gcc.gnu.org>
2771 PR libfortran/36886
2772 * Makefile.am: Added $(i_cshift0_c).
2773 Added $(i_cshift0_c) to gfor_built_specific_src.
2774 Add rule to build from cshift0.m4.
2775 * Makefile.in: Regenerated.
2776 * libgfortran.h: Addedd prototypes for cshift0_i1,
2777 cshift0_i2, cshift0_i4, cshift0_i8, cshift0_i16,
2778 cshift0_r4, cshift0_r8, cshift0_r10, cshift0_r16,
2779 cshift0_c4, cshift0_c8, cshift0_c10, cshift0_c16.
2780 Define Macros GFC_UNALIGNED_C4 and GFC_UNALIGNED_C8.
2781 * intrinsics/cshift0.c: Remove helper functions for
2782 the innter shift loop.
2783 (cshift0): Call specific functions depending on type
2784 of array argument. Only call specific functions for
2785 correct alignment for other types.
2786 * m4/cshift0.m4: New file.
2787 * generated/cshift0_i1.c: New file.
2788 * generated/cshift0_i2.c: New file.
2789 * generated/cshift0_i4.c: New file.
2790 * generated/cshift0_i8:.c New file.
2791 * generated/cshift0_i16.c: New file.
2792 * generated/cshift0_r4.c: New file.
2793 * generated/cshift0_r8.c: New file.
2794 * generated/cshift0_r10.c: New file.
2795 * generated/cshift0_r16.c: New file.
2796 * generated/cshift0_c4.c: New file.
2797 * generated/cshift0_c8.c: New file.
2798 * generated/cshift0_c10.c: New file.
2799 * generated/cshift0_c16.c: New file.
2801 2008-07-27 Tobias Burnus <burnus@net-b.de>
2803 PR fortran/36132
2804 PR fortran/29952
2805 PR fortran/36909
2806 * runtime/error.c: New function runtime_error_at.
2807 * gfortran.map: Ditto.
2808 * libgfortran.h: Ditto.
2810 2008-07-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2812 PR fortran/36582
2813 * io/list_read.c: If variable rank is zero, do not adjust the found
2814 namelist object pointer.
2816 2008-07-22 Daniel Kraft <d@domob.eu>
2818 PR fortran/29835
2819 * io/format.c (struct format_data): New member error_element.
2820 (unexpected_element): Added '%c' to message.
2821 (next_char): Keep track of last parsed character in fmt->error_element.
2822 (format_error): If the message is unexpected_element, output the
2823 offending character, too.
2825 2008-07-22 Thomas Koenig <tkoenig@gcc.gnu.org>
2827 PR libfortran/36890
2828 * io/file_pos.c: Declare READ_CHUNK as signed to avoid
2829 signed/unsigned comparison warning in formatted_backspace.
2831 2008-07-21 Thomas Koenig <tkoenig@gcc.gnu.org>
2833 PR libfortran/36773
2834 * intrinsics/cshift0.c (cshift0): Return early if size of array
2835 is zero.
2836 * intrinsics/eoshift0.c (eoshift0): Return early if size of
2837 return array is zero.
2838 * intrinsics/eoshift2.c (eoshift2): Likewise.
2839 * m4/eoshift1.m4 (eoshift1): Return early if size of array
2840 is zero.
2841 * m4/eoshift3.m4 (eoshift3): Likewise.
2842 * m4/eoshift2.m4 (eoshift2): Return early if size of return
2843 array is zero.
2844 * m4/eoshift4.m4 (eoshift2): Return early if size of return
2845 array is zero.
2846 * generated/cshift1_16.c: Regenerated.
2847 * generated/cshift1_4.c: Regenerated.
2848 * generated/cshift1_8.c: Regenerated.
2849 * generated/eoshift1_16.c: Regenerated.
2850 * generated/eoshift1_4.c: Regenerated.
2851 * generated/eoshift1_8.c: Regenerated.
2852 * generated/eoshift3_16.c: Regenerated.
2853 * generated/eoshift3_4.c: Regenerated.
2854 * generated/eoshift3_8.c: Regenerated.
2856 2008-07-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2858 PR fortran/36857
2859 * io/write_float.def: Comment out locale dependent code and fix general
2860 comments.
2862 2008-07-07 Thomas Koenig <tkoenig@gcc.gnu.org>
2864 PR fortran/36341
2865 PR fortran/34670
2866 * m4/matmul.m4: Add bounds checking.
2867 * m4/matmull.m4: Likewise.
2868 * generated/matmul_c10.c: Regenerated.
2869 * generated/matmul_c16.c: Regenerated.
2870 * generated/matmul_c4.c: Regenerated.
2871 * generated/matmul_c8.c: Regenerated.
2872 * generated/matmul_i1.c: Regenerated.
2873 * generated/matmul_i16.c: Regenerated.
2874 * generated/matmul_i2.c: Regenerated.
2875 * generated/matmul_i4.c: Regenerated.
2876 * generated/matmul_i8.c: Regenerated.
2877 * generated/matmul_l16.c: Regenerated.
2878 * generated/matmul_l4.c: Regenerated.
2879 * generated/matmul_l8.c: Regenerated.
2880 * generated/matmul_r10.c: Regenerated.
2881 * generated/matmul_r16.c: Regenerated.
2882 * generated/matmul_r4.c: Regenerated.
2883 * generated/matmul_r8.c: Regenerated.
2885 2008-07-07 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
2887 * acinclude.m4 (LIBGFOR_CHECK_GTHR_DEFAULT): Fix configure cache
2888 variable name.
2889 * configure: Regenerate.
2891 2008-07-01 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2893 PR fortran/36676
2894 * io/list_read.c (find_nml_name): Use eat_separator instead of eat_line.
2896 2008-06-28 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2898 PR fortran/36657
2899 * io/list_read.c (read_character): Check for '!' along with separators.
2900 (find_nml_name): Likewise and eat the comment if found.
2902 2008-06-17 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
2904 * configure: Regenerate.
2906 2008-06-16 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2908 PR fortran/36546
2909 * io/list_read.c (eat_separator): Add tab character to condition
2910 for looping past whitespace.
2912 2008-06-14 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2914 PR fortran/36515
2915 * libgfortran.h (compile_options_t): Add int range_check to structure.
2916 * runtime/compile_options.c (set_options): Add range_check option.
2917 (init_compile_options): Likewise.
2918 *io/read.c (read_decimal): Change overflow checks to include
2919 range_check.
2921 2008-06-13 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2923 PR fortran/36538
2924 * io/list_read.c (namelist_read): Add eat_separator to eliminate leading
2925 tabs.
2927 2008-06-13 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2929 PR fortran/35863
2930 * libgfortran.h: Change l8_to_l4_offset to big_endian and add endian_off.
2931 * runtime/main.c: Fix error in comment. Change l8_to_l4_offset to
2932 big_endian. (determine_endianness): Add endian_off and set its value
2933 according to big_endian.
2934 * gfortran.map: Add symbol for new _gfortran_transfer_character_wide.
2935 * io/io.h: Add prototype declarations for new functions.
2936 * io/list_read.c (list_formatted_read_scalar): Modify to handle kind=4.
2937 (list_formatted_read): Calculate stride based on kind for character type
2938 and use it when calling list_formatted_read_scalar.
2939 * io/inquire.c (inquire_via_unit): Change l8_to_l4_offset to big_endian.
2940 * io/open.c (st_open): Change l8_to_l4_offset to big_endian.
2941 * io/read.c (read_a_char4): New function to handle formatted read.
2942 * io/write.c: Define GFC_CHAR4(x) to improve readability of code.
2943 (write_a_char4): New function to handle formatted write.
2944 (write_character): Modify to accept the kind parameter and adjust for
2945 endianess of the machine. (list_formatted_write): Calculate the stride
2946 resulting from the kind and adjust the list_formatted_write_scalar call
2947 accordingly. (nml_write_obj): Adjust calls to write_character.
2948 (namelist_write): Likewise.
2949 * io/transfer.c (formatted_transfer_scaler): Rename 'len' argument to
2950 'kind' argument to better describe what it is. Add calls to new
2951 functions for kind == 4. (formatted_transfer): Modify to handle the case
2952 of type character and kind equals 4 to pass in the kind to the transfer
2953 routines. (transfer_character_wide): Add this new function.
2954 (transfer_array): Don't set kind to the character string length. Adjust
2955 strides bases on character kind.
2956 (unformatted_read): Adjust size based on kind for character types.
2957 (unformatted_write): Likewise. (data_transfer_init): Change
2958 l8_to_l4_offset to big_endian.
2959 io/fbuf.c (fbuf_seek): Add cast to eliminate warning.
2961 2008-06-13 Tobias Burnus <burnus@net-b.de>
2963 * configure.ac (AM_CFLAGS): Remove -Werror again.
2964 * configure: Regenerate.
2966 2008-06-13 Tobias Burnus <burnus@net-b.de>
2968 PR libgfortran/36518
2969 * configure.ac (AM_CFLAGS): Add -Werror.
2970 * configure: Regenerate.
2971 * m4/ifunction_logical.m4: Cast "n" to "(int)".
2972 * generated/any_l16.c: Regenerate.
2973 * generated/any_l2.c: Regenerate.
2974 * generated/all_l1.c: Regenerate.
2975 * generated/all_l2.c: Regenerate.
2976 * generated/all_l16.c: Regenerate.
2977 * generated/any_l4.c: Regenerate.
2978 * generated/count_4_l.c: Regenerate.
2979 * generated/count_8_l.c: Regenerate.
2980 * generated/all_l4.c: Regenerate.
2981 * generated/count_1_l.c: Regenerate.
2982 * generated/count_16_l.c: Regenerate.
2983 * generated/any_l8.c: Regenerate.
2984 * generated/count_2_l.c: Regenerate.
2985 * generated/any_l1.c: Regenerate.
2986 * generated/all_l8.c: Regenerate.
2988 2008-06-13 Tobias Burnus <burnus@net-b.de>
2990 PR fortran/36495
2991 * configure.ac (AM_FCFLAGS): Add "-Werror -fimplicit-none".
2992 * configure: (generated) ditto.
2993 * intrinsics/dprod_r8.f90: Add "implicit none".
2995 2008-06-07 Jerry DeLisle <jvdelisle@gcc.gnu.org>
2997 PR libfortran/36420
2998 PR libfortran/36421
2999 PR libfortran/36422
3000 * io/io.h: Add prototype for write_real.
3001 * io/transfer.c (formatted_transfer_scalar): For FMT_G and width zero,
3002 use write_real.
3003 * io/format.c: Add zero width error message. (parse_format_list): Use
3004 error message for FMT_A if followed by FMT_ZERO. Use zero width error
3005 message for FMT_G if mode is READ or if -std=f95 or f2003. (fmormat0):
3006 Fix typo in comment.
3007 * io/write.c(write_a): Set wlen to len if FMT_G and length is zero.
3008 (write_l): Add wlen variable and use it if FMT_G and width is zero.
3009 (write_decimal): If FMT_G, set m to -1 to flag processor dependent
3010 formatting. (write_real): Remove static declaration.
3012 2008-05-28 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
3014 PR fortran/36319
3015 * intrinsics/string_intrinsics_inc.c (string_index): Return
3016 correct value for zero-length substring.
3017 * intrinsics/cshift0.c: Add _char4 variant.
3018 * intrinsics/eoshift0.c (eoshift0): Allow filler to be a pattern
3019 wider than a single byte. Add _char4 variant and use above
3020 functionality.
3021 * intrinsics/eoshift2.c (eoshift2): Likewise.
3022 * m4/eoshift1.m4: Likewise.
3023 * m4/eoshift3.m4: Likewise.
3024 * m4/cshift1.m4: Add _char4 variants.
3025 * gfortran.map (GFORTRAN_1.1): Add _gfortran_cshift0_1_char4,
3026 _gfortran_cshift0_2_char4, _gfortran_cshift0_4_char4,
3027 _gfortran_cshift0_8_char4, _gfortran_cshift1_16_char4,
3028 _gfortran_cshift1_4_char4, _gfortran_cshift1_8_char4,
3029 _gfortran_eoshift0_1_char4, _gfortran_eoshift0_2_char4,
3030 _gfortran_eoshift0_4_char4, _gfortran_eoshift0_8_char4,
3031 _gfortran_eoshift1_16_char4, _gfortran_eoshift1_4_char4,
3032 _gfortran_eoshift1_8_char4, _gfortran_eoshift2_1_char4,
3033 _gfortran_eoshift2_2_char4, _gfortran_eoshift2_4_char4,
3034 _gfortran_eoshift2_8_char4, _gfortran_eoshift3_16_char4,
3035 _gfortran_eoshift3_4_char4 and _gfortran_eoshift3_8_char4.
3036 * generated/eoshift3_4.c: Regenerate.
3037 * generated/eoshift1_8.c: Regenerate.
3038 * generated/eoshift1_16.c: Regenerate.
3039 * generated/cshift1_4.c: Regenerate.
3040 * generated/eoshift1_4.c: Regenerate.
3041 * generated/eoshift3_8.c: Regenerate.
3042 * generated/eoshift3_16.c: Regenerate.
3043 * generated/cshift1_8.c: Regenerate.
3044 * generated/cshift1_16.c: Regenerate.
3046 2008-05-25 Tobias Burnus <burnus@net-b.de>
3048 PR fortran/32600
3049 * intrinsics/iso_c_binding.c (c_f_procpointer): Remove.
3050 * intrinsics/iso_c_binding.h (c_f_procpointer): Remove.
3051 * gfortran.map (c_f_procpointer): Remove.
3053 2008-05-22 Thomas Koenig <tkoenig@gcc.gnu.org>
3055 PR libgfortran/36302
3056 * gfortran.map (GFORTRAN_1.1): Add _gfortran_eoshift0_16,
3057 _gfortran_eoshift0_16_char, _gfortran_eoshift2_16,
3058 _gfortran_eoshift2_16_char,_gfortran_cshift0_16,
3059 _gfortran_cshift0_16_char. Sort alphabetically.
3060 * intrinsics/eoshift0.c: Add function for kind=16 integer.
3061 * intrinsics/eoshift2.c: Likewise.
3062 * intrinsics/cshift0.c: Likewise.
3064 2008-05-18 Thomas Koenig <tkoenig@gcc.gnu.org>
3066 * m4/in_pack.m4 (internal_pack_'rtype_code`): Destination
3067 pointer is restrict.
3068 * m4/transpose.m4 (transpose_'rtype_code`): Likewise.
3069 * m4/pack.m4 (pack_'rtype_code`): Likewise.
3070 * m4/spread.m4 (spread_'rtype_code`): Likewise.
3071 (spread_scalar_'rtype_code`): Likewise.
3072 * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Likewise.
3073 * m4/eoshift1.m4 (eoshift1): Likewise.
3074 * m4/eoshift3.m4 (eoshift3): Likewise.
3075 * m4/in_unpack.m4 (internal_unpack_'rtype_ccode`): Likewise.
3076 * m4/unpack.m4 (unpack0_'rtype_code`): Likewise.
3077 (unpack1_'rtype_code`): Likewise.
3078 * intrinsics/pack_generic.c (pack_generic.c): Likewise.
3079 * intrinsics/unpack_generic.c (unpack_internal): Likewise.
3080 * intrinsics/eoshift0.c (eoshift0): Likewise.
3081 * intrinsics/eoshift2.c (eoshift2): Likewise.
3082 * intrinsics/reshape_generic.c (reshape_internal): Likewise.
3083 * intrinsics/reshape_packed.c (reshape_packed): Likewise.
3084 * generated/eoshift1_16.c: Regenerated.
3085 * generated/eoshift1_4.c: Regenerated.
3086 * generated/eoshift1_8.c: Regenerated.
3087 * generated/eoshift3_16.c: Regenerated.
3088 * generated/eoshift3_4.c: Regenerated.
3089 * generated/eoshift3_8.c: Regenerated.
3090 * generated/in_pack_c10.c: Regenerated.
3091 * generated/in_pack_c16.c: Regenerated.
3092 * generated/in_pack_c4.c: Regenerated.
3093 * generated/in_pack_c8.c: Regenerated.
3094 * generated/in_pack_i1.c: Regenerated.
3095 * generated/in_pack_i16.c: Regenerated.
3096 * generated/in_pack_i2.c: Regenerated.
3097 * generated/in_pack_i4.c: Regenerated.
3098 * generated/in_pack_i8.c: Regenerated.
3099 * generated/in_pack_r10.c: Regenerated.
3100 * generated/in_pack_r16.c: Regenerated.
3101 * generated/in_pack_r4.c: Regenerated.
3102 * generated/in_pack_r8.c: Regenerated.
3103 * generated/in_unpack_c10.c: Regenerated.
3104 * generated/in_unpack_c16.c: Regenerated.
3105 * generated/in_unpack_c4.c: Regenerated.
3106 * generated/in_unpack_c8.c: Regenerated.
3107 * generated/in_unpack_i1.c: Regenerated.
3108 * generated/in_unpack_i16.c: Regenerated.
3109 * generated/in_unpack_i2.c: Regenerated.
3110 * generated/in_unpack_i4.c: Regenerated.
3111 * generated/in_unpack_i8.c: Regenerated.
3112 * generated/in_unpack_r10.c: Regenerated.
3113 * generated/in_unpack_r16.c: Regenerated.
3114 * generated/in_unpack_r4.c: Regenerated.
3115 * generated/in_unpack_r8.c: Regenerated.
3116 * generated/maxloc0_16_i1.c: Regenerated.
3117 * generated/maxloc0_16_i16.c: Regenerated.
3118 * generated/maxloc0_16_i2.c: Regenerated.
3119 * generated/maxloc0_16_i4.c: Regenerated.
3120 * generated/maxloc0_16_i8.c: Regenerated.
3121 * generated/maxloc0_16_r10.c: Regenerated.
3122 * generated/maxloc0_16_r16.c: Regenerated.
3123 * generated/maxloc0_16_r4.c: Regenerated.
3124 * generated/maxloc0_16_r8.c: Regenerated.
3125 * generated/maxloc0_4_i1.c: Regenerated.
3126 * generated/maxloc0_4_i16.c: Regenerated.
3127 * generated/maxloc0_4_i2.c: Regenerated.
3128 * generated/maxloc0_4_i4.c: Regenerated.
3129 * generated/maxloc0_4_i8.c: Regenerated.
3130 * generated/maxloc0_4_r10.c: Regenerated.
3131 * generated/maxloc0_4_r16.c: Regenerated.
3132 * generated/maxloc0_4_r4.c: Regenerated.
3133 * generated/maxloc0_4_r8.c: Regenerated.
3134 * generated/maxloc0_8_i1.c: Regenerated.
3135 * generated/maxloc0_8_i16.c: Regenerated.
3136 * generated/maxloc0_8_i2.c: Regenerated.
3137 * generated/maxloc0_8_i4.c: Regenerated.
3138 * generated/maxloc0_8_i8.c: Regenerated.
3139 * generated/maxloc0_8_r10.c: Regenerated.
3140 * generated/maxloc0_8_r16.c: Regenerated.
3141 * generated/maxloc0_8_r4.c: Regenerated.
3142 * generated/maxloc0_8_r8.c: Regenerated.
3143 * generated/minloc0_16_i1.c: Regenerated.
3144 * generated/minloc0_16_i16.c: Regenerated.
3145 * generated/minloc0_16_i2.c: Regenerated.
3146 * generated/minloc0_16_i4.c: Regenerated.
3147 * generated/minloc0_16_i8.c: Regenerated.
3148 * generated/minloc0_16_r10.c: Regenerated.
3149 * generated/minloc0_16_r16.c: Regenerated.
3150 * generated/minloc0_16_r4.c: Regenerated.
3151 * generated/minloc0_16_r8.c: Regenerated.
3152 * generated/minloc0_4_i1.c: Regenerated.
3153 * generated/minloc0_4_i16.c: Regenerated.
3154 * generated/minloc0_4_i2.c: Regenerated.
3155 * generated/minloc0_4_i4.c: Regenerated.
3156 * generated/minloc0_4_i8.c: Regenerated.
3157 * generated/minloc0_4_r10.c: Regenerated.
3158 * generated/minloc0_4_r16.c: Regenerated.
3159 * generated/minloc0_4_r4.c: Regenerated.
3160 * generated/minloc0_4_r8.c: Regenerated.
3161 * generated/minloc0_8_i1.c: Regenerated.
3162 * generated/minloc0_8_i16.c: Regenerated.
3163 * generated/minloc0_8_i2.c: Regenerated.
3164 * generated/minloc0_8_i4.c: Regenerated.
3165 * generated/minloc0_8_i8.c: Regenerated.
3166 * generated/minloc0_8_r10.c: Regenerated.
3167 * generated/minloc0_8_r16.c: Regenerated.
3168 * generated/minloc0_8_r4.c: Regenerated.
3169 * generated/minloc0_8_r8.c: Regenerated.
3170 * generated/pack_c10.c: Regenerated.
3171 * generated/pack_c16.c: Regenerated.
3172 * generated/pack_c4.c: Regenerated.
3173 * generated/pack_c8.c: Regenerated.
3174 * generated/pack_i1.c: Regenerated.
3175 * generated/pack_i16.c: Regenerated.
3176 * generated/pack_i2.c: Regenerated.
3177 * generated/pack_i4.c: Regenerated.
3178 * generated/pack_i8.c: Regenerated.
3179 * generated/pack_r10.c: Regenerated.
3180 * generated/pack_r16.c: Regenerated.
3181 * generated/pack_r4.c: Regenerated.
3182 * generated/pack_r8.c: Regenerated.
3183 * generated/spread_c10.c: Regenerated.
3184 * generated/spread_c16.c: Regenerated.
3185 * generated/spread_c4.c: Regenerated.
3186 * generated/spread_c8.c: Regenerated.
3187 * generated/spread_i1.c: Regenerated.
3188 * generated/spread_i16.c: Regenerated.
3189 * generated/spread_i2.c: Regenerated.
3190 * generated/spread_i4.c: Regenerated.
3191 * generated/spread_i8.c: Regenerated.
3192 * generated/spread_r10.c: Regenerated.
3193 * generated/spread_r16.c: Regenerated.
3194 * generated/spread_r4.c: Regenerated.
3195 * generated/spread_r8.c: Regenerated.
3196 * generated/transpose_c10.c: Regenerated.
3197 * generated/transpose_c16.c: Regenerated.
3198 * generated/transpose_c4.c: Regenerated.
3199 * generated/transpose_c8.c: Regenerated.
3200 * generated/transpose_i16.c: Regenerated.
3201 * generated/transpose_i4.c: Regenerated.
3202 * generated/transpose_i8.c: Regenerated.
3203 * generated/transpose_r10.c: Regenerated.
3204 * generated/transpose_r16.c: Regenerated.
3205 * generated/transpose_r4.c: Regenerated.
3206 * generated/transpose_r8.c: Regenerated.
3207 * generated/unpack_c10.c: Regenerated.
3208 * generated/unpack_c16.c: Regenerated.
3209 * generated/unpack_c4.c: Regenerated.
3210 * generated/unpack_c8.c: Regenerated.
3211 * generated/unpack_i1.c: Regenerated.
3212 * generated/unpack_i16.c: Regenerated.
3213 * generated/unpack_i2.c: Regenerated.
3214 * generated/unpack_i4.c: Regenerated.
3215 * generated/unpack_i8.c: Regenerated.
3216 * generated/unpack_r10.c: Regenerated.
3217 * generated/unpack_r16.c: Regenerated.
3218 * generated/unpack_r4.c: Regenerated.
3219 * generated/unpack_r8.c: Regenerated.
3221 2008-05-18 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
3223 * runtime/select.c: Moved content to select_inc.c. Include it.
3224 Add macros for different character types.
3225 * runtime/select_inc.c: New file.
3226 * runtime/convert_char.c: New file.
3227 * intrinsics/pack_generic.c (pack_char4, pack_s_char4): New
3228 functions.
3229 * intrinsics/transpose_generic.c (transpose_char4): New function.
3230 * intrinsics/spread_generic.c (spread_char4, spread_char4_scalar):
3231 New functions.
3232 * intrinsics/unpack_generic.c (unpack1_char4, unpack0_char4):
3233 New functions.
3234 * intrinsics/reshape_generic.c (reshape_char): Use
3235 gfc_charlen_type as type for length variables.
3236 (reshape_char4): New function.
3237 * gfortran.map (GFORTRAN_1.1): Add _gfortran_select_string_char4,
3238 _gfortran_convert_char1_to_char4, _gfortran_convert_char4_to_char1,
3239 _gfortran_transpose_char4, _gfortran_spread_char4,
3240 _gfortran_spread_char4_scalar, _gfortran_reshape_char4,
3241 _gfortran_pack_char4, _gfortran_pack_s_char4,
3242 _gfortran_unpack0_char4 and _gfortran_unpack1_char4.
3243 * Makefile.am: Add runtime/convert_char.c.
3244 * Makefile.in: Regenerate.
3246 2008-05-17 Thomas Koenig <tkoenig@gcc.gnu.org>
3248 * io/list_read.c (list_formatted_read_scalar): Declare
3249 type as volatile to shut up compiler warning.
3251 2008-05-16 Janne Blomqvist <jb@gcc.gnu.org>
3253 PR libfortran/25561
3254 * io/io.h (struct fbuf): Change pointer to position offset.
3255 * io/fbuf.c (fbuf_init): Reduce default size of buffer, ptr=>pos
3256 changes.
3257 (fbuf_reset): ptr=>pos changes.
3258 (fbuf_alloc): If the request doesn't fit, don't waste memory by
3259 keeping flushed bytes. ptr=>pos changes.
3260 (fbuf_flush): ptr=>pos changes.
3261 (fbuf_seek): Don't seek past the left tab limit, don't update active
3262 byte count.
3263 * io/open.c (new_unit): If RECL has been specified, used that as
3264 initial buffer size.
3266 2008-05-16 Janne Blomqvist <jb@gcc.gnu.org>
3268 PR libfortran/35632
3269 * io/open.c (new_unit): Set stream position to correct value.
3271 2008-05-15 Janne Blomqvist <jb@gcc.gnu.org>
3273 PR libfortran/25561
3274 * Makefile.am: Add fbuf.c to gfor_io_src.
3275 * Makefile.in: Regenerate.
3276 * io/io.h (read_block): Remove.
3277 (struct stream): Remove alloc_r_at function pointer.
3278 (salloc_r): Remove.
3279 (salloc_r_at): Remove.
3280 (salloc_w_at): Remove.
3281 (salloc_w): Remove offset argument.
3282 (struct fbuf): New struct for format buffer.
3283 (struct gfc_unit): Add fbuf.
3284 (read_block_form): New prototype.
3285 (fbuf_init): Likewise.
3286 (fbuf_destroy): Likewise.
3287 (fbuf_reset): Likewise.
3288 (fbuf_alloc): Likewise.
3289 (fbuf_flush): Likewise.
3290 (fbuf_seek): Likewise.
3291 * io/file_pos.c (formatted_backspace): Change to use sread.
3292 (unformatted_backspace): Likewise.
3293 (st_backspace): Flush format buffer.
3294 (st_rewind): Likewise.
3295 * io/list_read.c (next_char): Likewise.
3296 (nml_query): Tidying, flush format buffer.
3297 * io/open.c (new_unit): Init format buffer.
3298 * io/read.c (read_l): Change to use read_block_form.
3299 (read_a): Likewise.
3300 (read_decimal): Likewise.
3301 (read_radix): Likewise.
3302 (read_f): Likewise.
3303 (read_x): Empty reads also for stream I/O.
3304 * io/transfer.c (read_sf): Change to use sread.
3305 (read_block): Rename to read_block_form, change prototype, use sread.
3306 (read_block_direct): Don't seek stream files.
3307 (write_block): Change to use fbuf if external file, don't seek stream
3308 files.
3309 (write_buf): Don't seek stream files.
3310 (formatted_transfer_scalar): Use fbuf for external files.
3311 (us_read): Change to use sread.
3312 (pre_position): Do nothing for stream I/O.
3313 (data_transfer_init): Flush fbuf when switching from write to read, if
3314 POS is specified, seek stream file to correct offset.
3315 (skip_record): Change to use sread.
3316 (min_off): New function.
3317 (next_record_r): Change to use sread.
3318 (next_record_w): Change to use sset/sseek, flush fbuf.
3319 (finalize_transfer): Flush fbuf.
3320 * io/unit.c (init_units): Init fbuf for stdout, stderr.
3321 (close_unit_1): Destroy fbuf.
3322 (finish_last_advance_record): Flush fbuf, no need to seek.
3323 * io/unix.c (fd_alloc_r_at): Remove unused where argument.
3324 (fd_alloc_w_at): Likewise.
3325 (fd_read): Remove third argument to fd_alloc_r_at.
3326 (fd_write): Remove third argument to fd_alloc_w_at.
3327 (fd_sset): Likewise.
3328 (fd_open): Don't set alloc_r_at.
3329 (mem_alloc_r_at): Remove unused where argument.
3330 (mem_alloc_w_at): Likewise.
3331 (mem_read): Don't incorrectly return previous errno, remove unused
3332 third argument to alloc function.
3333 (mem_write): Likewise.
3334 (mem_set): Likewise.
3335 (open_internal): Don't set alloc_r_at pointer.
3336 * io/fbuf.c: New file.
3338 2008-05-14 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
3340 * libgfortran.h (gfc_char4_t): New type.
3341 (GFC_SIZE_OF_CHAR_KIND): New macro.
3342 (compare_string): Adjust prototype.
3343 (compare_string_char4): New prototype.
3344 * gfortran.map (GFORTRAN_1.1): Add _gfortran_adjustl_char4,
3345 _gfortran_adjustr_char4, _gfortran_compare_string_char4,
3346 _gfortran_concat_string_char4, _gfortran_string_index_char4,
3347 _gfortran_string_len_trim_char4, _gfortran_string_minmax_char4,
3348 _gfortran_string_scan_char4, _gfortran_string_trim_char4 and
3349 _gfortran_string_verify_char4.
3350 * intrinsics/string_intrinsics_inc.c: New file from content of
3351 string_intrinsics.c with types replaced by macros.
3352 * intrinsics/string_intrinsics.c: Move content to
3353 string_intrinsics_inc.c.
3355 2008-05-11 Jerry DeLisle <jvdelisle@gcc.gnu.org>
3357 PR libfortran/36202
3358 * io/list_read (eat_separator): Handle the CR-LF case correctly.
3360 2008-05-09 Julian Brown <julian@codesourcery.com>
3362 * Makefile.am (LTLDFLAGS): New.
3363 (libgfortran_la_LDFLAGS): Use above.
3364 * Makefile.in: Regenerate.
3366 2008-05-05 Jerry DeLisle <jvdelisle@gcc.gnu.org>
3368 PR libfortran/36131
3369 * io/transfer.c (formatted_transfer_scalar): Revert patch for PR34974.
3370 (next_record_w): Likewise.
3372 2008-05-04 Thomas Koenig <tkoenig@gcc.gnu.org>
3374 PR libfortran/35995
3375 * m4/ifunction_logical.m4: If the extent of "array"
3376 is less than zero, set it to zero. Use an explicit
3377 flag for breaking out of the main loop to avoid, because
3378 the data pointer for "array" may be NULL for an empty
3379 array.
3380 * m4/ifunction.m4: Likewise.
3381 * generated/all_l1.c: Regenerated.
3382 * generated/all_l16.c: Regenerated.
3383 * generated/all_l2.c: Regenerated.
3384 * generated/all_l4.c: Regenerated.
3385 * generated/all_l8.c: Regenerated.
3386 * generated/any_l1.c: Regenerated.
3387 * generated/any_l16.c: Regenerated.
3388 * generated/any_l2.c: Regenerated.
3389 * generated/any_l4.c: Regenerated.
3390 * generated/any_l8.c: Regenerated.
3391 * generated/count_16_l.c: Regenerated.
3392 * generated/count_1_l.c: Regenerated.
3393 * generated/count_2_l.c: Regenerated.
3394 * generated/count_4_l.c: Regenerated.
3395 * generated/count_8_l.c: Regenerated.
3396 * generated/maxloc1_16_i1.c: Regenerated.
3397 * generated/maxloc1_16_i16.c: Regenerated.
3398 * generated/maxloc1_16_i2.c: Regenerated.
3399 * generated/maxloc1_16_i4.c: Regenerated.
3400 * generated/maxloc1_16_i8.c: Regenerated.
3401 * generated/maxloc1_16_r10.c: Regenerated.
3402 * generated/maxloc1_16_r16.c: Regenerated.
3403 * generated/maxloc1_16_r4.c: Regenerated.
3404 * generated/maxloc1_16_r8.c: Regenerated.
3405 * generated/maxloc1_4_i1.c: Regenerated.
3406 * generated/maxloc1_4_i16.c: Regenerated.
3407 * generated/maxloc1_4_i2.c: Regenerated.
3408 * generated/maxloc1_4_i4.c: Regenerated.
3409 * generated/maxloc1_4_i8.c: Regenerated.
3410 * generated/maxloc1_4_r10.c: Regenerated.
3411 * generated/maxloc1_4_r16.c: Regenerated.
3412 * generated/maxloc1_4_r4.c: Regenerated.
3413 * generated/maxloc1_4_r8.c: Regenerated.
3414 * generated/maxloc1_8_i1.c: Regenerated.
3415 * generated/maxloc1_8_i16.c: Regenerated.
3416 * generated/maxloc1_8_i2.c: Regenerated.
3417 * generated/maxloc1_8_i4.c: Regenerated.
3418 * generated/maxloc1_8_i8.c: Regenerated.
3419 * generated/maxloc1_8_r10.c: Regenerated.
3420 * generated/maxloc1_8_r16.c: Regenerated.
3421 * generated/maxloc1_8_r4.c: Regenerated.
3422 * generated/maxloc1_8_r8.c: Regenerated.
3423 * generated/maxval_i1.c: Regenerated.
3424 * generated/maxval_i16.c: Regenerated.
3425 * generated/maxval_i2.c: Regenerated.
3426 * generated/maxval_i4.c: Regenerated.
3427 * generated/maxval_i8.c: Regenerated.
3428 * generated/maxval_r10.c: Regenerated.
3429 * generated/maxval_r16.c: Regenerated.
3430 * generated/maxval_r4.c: Regenerated.
3431 * generated/maxval_r8.c: Regenerated.
3432 * generated/minloc1_16_i1.c: Regenerated.
3433 * generated/minloc1_16_i16.c: Regenerated.
3434 * generated/minloc1_16_i2.c: Regenerated.
3435 * generated/minloc1_16_i4.c: Regenerated.
3436 * generated/minloc1_16_i8.c: Regenerated.
3437 * generated/minloc1_16_r10.c: Regenerated.
3438 * generated/minloc1_16_r16.c: Regenerated.
3439 * generated/minloc1_16_r4.c: Regenerated.
3440 * generated/minloc1_16_r8.c: Regenerated.
3441 * generated/minloc1_4_i1.c: Regenerated.
3442 * generated/minloc1_4_i16.c: Regenerated.
3443 * generated/minloc1_4_i2.c: Regenerated.
3444 * generated/minloc1_4_i4.c: Regenerated.
3445 * generated/minloc1_4_i8.c: Regenerated.
3446 * generated/minloc1_4_r10.c: Regenerated.
3447 * generated/minloc1_4_r16.c: Regenerated.
3448 * generated/minloc1_4_r4.c: Regenerated.
3449 * generated/minloc1_4_r8.c: Regenerated.
3450 * generated/minloc1_8_i1.c: Regenerated.
3451 * generated/minloc1_8_i16.c: Regenerated.
3452 * generated/minloc1_8_i2.c: Regenerated.
3453 * generated/minloc1_8_i4.c: Regenerated.
3454 * generated/minloc1_8_i8.c: Regenerated.
3455 * generated/minloc1_8_r10.c: Regenerated.
3456 * generated/minloc1_8_r16.c: Regenerated.
3457 * generated/minloc1_8_r4.c: Regenerated.
3458 * generated/minloc1_8_r8.c: Regenerated.
3459 * generated/minval_i1.c: Regenerated.
3460 * generated/minval_i16.c: Regenerated.
3461 * generated/minval_i2.c: Regenerated.
3462 * generated/minval_i4.c: Regenerated.
3463 * generated/minval_i8.c: Regenerated.
3464 * generated/minval_r10.c: Regenerated.
3465 * generated/minval_r16.c: Regenerated.
3466 * generated/minval_r4.c: Regenerated.
3467 * generated/minval_r8.c: Regenerated.
3468 * generated/product_c10.c: Regenerated.
3469 * generated/product_c16.c: Regenerated.
3470 * generated/product_c4.c: Regenerated.
3471 * generated/product_c8.c: Regenerated.
3472 * generated/product_i1.c: Regenerated.
3473 * generated/product_i16.c: Regenerated.
3474 * generated/product_i2.c: Regenerated.
3475 * generated/product_i4.c: Regenerated.
3476 * generated/product_i8.c: Regenerated.
3477 * generated/product_r10.c: Regenerated.
3478 * generated/product_r16.c: Regenerated.
3479 * generated/product_r4.c: Regenerated.
3480 * generated/product_r8.c: Regenerated.
3481 * generated/sum_c10.c: Regenerated.
3482 * generated/sum_c16.c: Regenerated.
3483 * generated/sum_c4.c: Regenerated.
3484 * generated/sum_c8.c: Regenerated.
3485 * generated/sum_i1.c: Regenerated.
3486 * generated/sum_i16.c: Regenerated.
3487 * generated/sum_i2.c: Regenerated.
3488 * generated/sum_i4.c: Regenerated.
3489 * generated/sum_i8.c: Regenerated.
3490 * generated/sum_r10.c: Regenerated.
3491 * generated/sum_r16.c: Regenerated.
3492 * generated/sum_r4.c: Regenerated.
3493 * generated/sum_r8.c: Regenerated.
3495 2008-05-04 Thomas Koenig <tkoenig@gcc.gnu.org>
3497 PR libfortran/35990
3498 * intrinsics/pack_generic.c: Really commit.
3500 2008-05-04 Thomas Koenig <tkoenig@gcc.gnu.org>
3502 PR libfortran/35990
3503 * intrinsics/pack_generic.c: If an extent of the source
3504 array is less then zero, set it to zero. Set the source
3505 pointer to NULL if the source size is zero. Set the total
3506 number of elements to zero if the vector has an extent
3507 less or equal to zero.
3508 * m4/pack.m4: Set the source pointer to NULL if the
3509 source array is zero-sized. Set the total number of
3510 elemements to zero if the vector has an extent less or
3511 equal to zero.
3512 * generated/pack_i1.c: Regenerated.
3513 * generated/pack_i2.c: Regenerated.
3514 * generated/pack_i4.c: Regenerated.
3515 * generated/pack_i8.c: Regenerated.
3516 * generated/pack_i16.c: Regenerated.
3517 * generated/pack_r4.c: Regenerated.
3518 * generated/pack_r8.c: Regenerated.
3519 * generated/pack_r10.c: Regenerated.
3520 * generated/pack_r16.c: Regenerated.
3521 * generated/pack_c4.c: Regenerated.
3522 * generated/pack_c8.c: Regenerated.
3523 * generated/pack_c10.c: Regenerated.
3524 * generated/pack_c16.c: Regenerated.
3526 2008-05-01 Jerry DeLisle <jvdelisle@gcc.gnu.org>
3528 PR libfortran/36094
3529 * runtime/error.c (show_locus): Provide modified error message when
3530 filename has not yet been associated with a unit number.
3531 * io/open.c (encoding_opt[]): Comment out "utf-8" option and add TODO.
3533 2008-04-30 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
3535 * intrinsics/selected_char_kind.c: New file.
3536 * gfortran.map (GFORTRAN_1.1): Add _gfortran_selected_char_kind.
3537 * Makefile.am: Add intrinsics/selected_char_kind.c.
3538 * Makefile.in: Regenerate.
3540 2008-04-30 Thomas Koenig <tkoenig@gcc.gnu.org>
3542 PR libfortran/35993
3543 * ifunction.m4 (SCALAR_ARRAY_FUNCTION): Use correct
3544 implementation for multi-dimensional return arrays when
3545 the mask is .false.
3546 * generated/maxloc1_16_i1.c: Regenerated.
3547 * generated/maxloc1_16_i16.c: Regenerated.
3548 * generated/maxloc1_16_i2.c: Regenerated.
3549 * generated/maxloc1_16_i4.c: Regenerated.
3550 * generated/maxloc1_16_i8.c: Regenerated.
3551 * generated/maxloc1_16_r10.c: Regenerated.
3552 * generated/maxloc1_16_r16.c: Regenerated.
3553 * generated/maxloc1_16_r4.c: Regenerated.
3554 * generated/maxloc1_16_r8.c: Regenerated.
3555 * generated/maxloc1_4_i1.c: Regenerated.
3556 * generated/maxloc1_4_i16.c: Regenerated.
3557 * generated/maxloc1_4_i2.c: Regenerated.
3558 * generated/maxloc1_4_i4.c: Regenerated.
3559 * generated/maxloc1_4_i8.c: Regenerated.
3560 * generated/maxloc1_4_r10.c: Regenerated.
3561 * generated/maxloc1_4_r16.c: Regenerated.
3562 * generated/maxloc1_4_r4.c: Regenerated.
3563 * generated/maxloc1_4_r8.c: Regenerated.
3564 * generated/maxloc1_8_i1.c: Regenerated.
3565 * generated/maxloc1_8_i16.c: Regenerated.
3566 * generated/maxloc1_8_i2.c: Regenerated.
3567 * generated/maxloc1_8_i4.c: Regenerated.
3568 * generated/maxloc1_8_i8.c: Regenerated.
3569 * generated/maxloc1_8_r10.c: Regenerated.
3570 * generated/maxloc1_8_r16.c: Regenerated.
3571 * generated/maxloc1_8_r4.c: Regenerated.
3572 * generated/maxloc1_8_r8.c: Regenerated.
3573 * generated/maxval_i1.c: Regenerated.
3574 * generated/maxval_i16.c: Regenerated.
3575 * generated/maxval_i2.c: Regenerated.
3576 * generated/maxval_i4.c: Regenerated.
3577 * generated/maxval_i8.c: Regenerated.
3578 * generated/maxval_r10.c: Regenerated.
3579 * generated/maxval_r16.c: Regenerated.
3580 * generated/maxval_r4.c: Regenerated.
3581 * generated/maxval_r8.c: Regenerated.
3582 * generated/minloc1_16_i1.c: Regenerated.
3583 * generated/minloc1_16_i16.c: Regenerated.
3584 * generated/minloc1_16_i2.c: Regenerated.
3585 * generated/minloc1_16_i4.c: Regenerated.
3586 * generated/minloc1_16_i8.c: Regenerated.
3587 * generated/minloc1_16_r10.c: Regenerated.
3588 * generated/minloc1_16_r16.c: Regenerated.
3589 * generated/minloc1_16_r4.c: Regenerated.
3590 * generated/minloc1_16_r8.c: Regenerated.
3591 * generated/minloc1_4_i1.c: Regenerated.
3592 * generated/minloc1_4_i16.c: Regenerated.
3593 * generated/minloc1_4_i2.c: Regenerated.
3594 * generated/minloc1_4_i4.c: Regenerated.
3595 * generated/minloc1_4_i8.c: Regenerated.
3596 * generated/minloc1_4_r10.c: Regenerated.
3597 * generated/minloc1_4_r16.c: Regenerated.
3598 * generated/minloc1_4_r4.c: Regenerated.
3599 * generated/minloc1_4_r8.c: Regenerated.
3600 * generated/minloc1_8_i1.c: Regenerated.
3601 * generated/minloc1_8_i16.c: Regenerated.
3602 * generated/minloc1_8_i2.c: Regenerated.
3603 * generated/minloc1_8_i4.c: Regenerated.
3604 * generated/minloc1_8_i8.c: Regenerated.
3605 * generated/minloc1_8_r10.c: Regenerated.
3606 * generated/minloc1_8_r16.c: Regenerated.
3607 * generated/minloc1_8_r4.c: Regenerated.
3608 * generated/minloc1_8_r8.c: Regenerated.
3609 * generated/minval_i1.c: Regenerated.
3610 * generated/minval_i16.c: Regenerated.
3611 * generated/minval_i2.c: Regenerated.
3612 * generated/minval_i4.c: Regenerated.
3613 * generated/minval_i8.c: Regenerated.
3614 * generated/minval_r10.c: Regenerated.
3615 * generated/minval_r16.c: Regenerated.
3616 * generated/minval_r4.c: Regenerated.
3617 * generated/minval_r8.c: Regenerated.
3618 * generated/product_c10.c: Regenerated.
3619 * generated/product_c16.c: Regenerated.
3620 * generated/product_c4.c: Regenerated.
3621 * generated/product_c8.c: Regenerated.
3622 * generated/product_i1.c: Regenerated.
3623 * generated/product_i16.c: Regenerated.
3624 * generated/product_i2.c: Regenerated.
3625 * generated/product_i4.c: Regenerated.
3626 * generated/product_i8.c: Regenerated.
3627 * generated/product_r10.c: Regenerated.
3628 * generated/product_r16.c: Regenerated.
3629 * generated/product_r4.c: Regenerated.
3630 * generated/product_r8.c: Regenerated.
3631 * generated/sum_c10.c: Regenerated.
3632 * generated/sum_c16.c: Regenerated.
3633 * generated/sum_c4.c: Regenerated.
3634 * generated/sum_c8.c: Regenerated.
3635 * generated/sum_i1.c: Regenerated.
3636 * generated/sum_i16.c: Regenerated.
3637 * generated/sum_i2.c: Regenerated.
3638 * generated/sum_i4.c: Regenerated.
3639 * generated/sum_i8.c: Regenerated.
3640 * generated/sum_r10.c: Regenerated.
3641 * generated/sum_r16.c: Regenerated.
3642 * generated/sum_r4.c: Regenerated.
3643 * generated/sum_r8.c: Regenerated.
3645 2008-04-25 Thomas Koenig <tkoenig@gcc.gnu.org>
3647 PR libfortran/35960
3648 * m4/reshape.m4: Fix typo in last commit.
3649 * generated/reshape_i4.c: Regererated.
3650 * generated/reshape_i8.c: Regenerated.
3651 * generated/reshape_i16.c: Regenerated.
3652 * generated/reshape_r4.c: Regenerated.
3653 * generated/reshape_r8.c: Regenerated.
3654 * generated/reshape_r10.c: Regenerated.
3655 * generated/reshape_r16.c: Regenerated.
3656 * generated/reshape_c4.c: Regenerated.
3657 * generated/reshape_c8.c: Regenerated.
3658 * generated/reshape_c10.c: Regenerated.
3659 * generated/reshape_c16.c: Regenerated.
3661 2008-04-24 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
3663 * intrinsics/time_1.h (__time_1): Remove unused variable.
3665 2008-04-23 Thomas Koenig <tkoenig@gcc.gnu.org>
3667 PR libfortran/35988
3668 * m4/matmul.m4: Only issue a runtime error if extents are
3669 non-zero.
3670 * generated/matmul_i1.c: Regenerated.
3671 * generated/matmul_i2.c: Regenerated.
3672 * generated/matmul_i4.c: Regenerated.
3673 * generated/matmul_i8.c: Regenerated.
3674 * generated/matmul_i16.c: Regenerated.
3675 * generated/matmul_r4.c: Regenerated.
3676 * generated/matmul_r8.c: Regenerated.
3677 * generated/matmul_r10.c: Regenerated.
3678 * generated/matmul_r16.c: Regenerated.
3679 * generated/matmul_c4.c: Regenerated.
3680 * generated/matmul_c8.c: Regenerated.
3681 * generated/matmul_c10.c: Regenerated.
3682 * generated/matmul_c16.c: Regenerated.
3684 2008-04-21 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
3686 * acinclude.m4 (LIBGFOR_CHECK_ATTRIBUTE_VISIBILITY)
3687 (LIBGFOR_CHECK_ATTRIBUTE_DLLEXPORT)
3688 (LIBGFOR_CHECK_ATTRIBUTE_ALIAS, LIBGFOR_CHECK_SYNC_FETCH_AND_ADD)
3689 (LIBGFOR_GTHREAD_WEAK, LIBGFOR_CHECK_UNLINK_OPEN_FILE)
3690 (LIBGFOR_CHECK_CRLF, LIBGFOR_CHECK_FOR_BROKEN_ISFINITE)
3691 (LIBGFOR_CHECK_FOR_BROKEN_ISNAN)
3692 (LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY, LIBGFOR_CHECK_WORKING_STAT)
3693 (LIBGFOR_CHECK_FPSETMASK, LIBGFOR_CHECK_MINGW_SNPRINTF):
3694 Fix cache variable names.
3695 * configure, Makefile.in: Regenerate.
3697 2008-04-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
3699 PR fortran/35991
3700 * intrinsics/cshift0.c (cshift0): Avoid divide by zero.
3702 2008-04-20 Thomas Koenig <tkoenig@gcc.gnu.org>
3704 PR libfortran/35960
3705 * intrinsics/reshape_generic.c (reshape_internal): If the size
3706 of the resized array is zero, as determined by the SHAPE
3707 argument, return early.
3708 * m4/reshape.m4: Likewise.
3709 * generated/reshape_i4.c: Regererated.
3710 * generated/reshape_i8.c: Regenerated.
3711 * generated/reshape_i16.c: Regenerated.
3712 * generated/reshape_r4.c: Regenerated.
3713 * generated/reshape_r8.c: Regenerated.
3714 * generated/reshape_r10.c: Regenerated.
3715 * generated/reshape_r16.c: Regenerated.
3716 * generated/reshape_c4.c: Regenerated.
3717 * generated/reshape_c8.c: Regenerated.
3718 * generated/reshape_c10.c: Regenerated.
3719 * generated/reshape_c16.c: Regenerated.
3721 2008-04-18 Paolo Bonzini <bonzini@gnu.org>
3723 PR bootstrap/35457
3724 * aclocal.m4: Regenerate.
3725 * configure: Regenerate.
3727 2008-04-14 Thomas Koenig <tkoenig@gcc.gnu.org>
3729 PR libfortran/32972
3730 * intrinsics/spread_generic.c (spread): Use spread_i2()
3731 for GFC_DTYPE_DERIVED_2 (fix typo from previous commit).
3733 2008-04-13 Thomas Koenig <tkoenig@gcc.gnu.org>
3734 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
3736 PR libfortran/32972
3737 PR libfortran/32512
3738 configure.ac: Add test for uintptr_t.
3739 configure: Regenerated.
3740 config.h.in: Regenerated.
3741 * libgfortran.h: GFC_DTYPE_DERIVED_1: New macro.
3742 GFC_DTYPE_DERIVED_2: New macro.
3743 GFC_DTYPE_DERIVED_4: New macro.
3744 GFC_DTYPE_DERIVED_8: New macro.
3745 GFC_DTYPE_DERIVED_16: New macro.
3746 GFC_UNALIGNED_2: New macro.
3747 GFC_UNALIGNED_4: New macro.
3748 GFC_UNALIGNED_8: New macro.
3749 GFC_UNALIGNED_16: New macro.
3750 intptr_t: Define if we don't have it.
3751 uintptr_t: Likewise.
3752 * runtime/backtrace.c (show_backtrace): Use intptr_t.
3753 * intrinsics/signal.c (signal_sub): Likewise.
3754 (signal_sub_int): Likewise.
3755 (alarm_sub_int_i4): Likewise.
3756 * intrinsics/spread_generic.c (spread): Use the integer
3757 routines for handling derived types of sizes 1, 2, 4, 8 and 16
3758 if the alignment of all pointers is correct.
3759 (spread_scalar): Likewise.
3760 * intrinsics/pack_generic.c (pack): Likewise.
3761 Use GFD_DTYPE_TYPE_SIZE to avoid nested switch statements.
3762 * intrinsics/unpack_generic.c (unpack1): Likewise.
3763 (unpack0): Likewise.
3764 * runtime/in_pack_generic.c (internal_pack): Likewise.
3765 * runtime/in_unpack_generic.c (internal_unpack): Likewise.
3767 2008-04-09 Jakub Jelinek <jakub@redhat.com>
3769 * io/list_read.c (snprintf): Define if HAVE_SNPRINTF isn't defined.
3770 (nml_read_obj): Add nml_err_msg_size argument. Pass it down to
3771 recursive call. Use snprintf instead of sprintf when %s nl->var_name
3772 is used.
3773 (nml_get_obj_data): Add nml_err_msg_size argument. Pass it down to
3774 nml_read_obj call. Use snprintf instead of sprintf when %s
3775 nl->var_name is used. Pass nml_err_msg to nml_parse_qualifier instead
3776 of parse_err_msg array. Append " for namelist variable " and
3777 nl->var_name to it.
3778 (namelist_read): Increase size of nml_err_msg array to 200. Pass
3779 sizeof nml_err_msg as extra argument to nml_get_obj_data.
3781 2008-04-07 Jerry DeLisle <jvdelisle@gcc.gnu.org>
3783 PR fortran/25829 28655
3784 * io/open.c (edit_modes): Set flags.async. (new_unit) Set flags.async
3785 and flags.status. (st_open): Initialize flags.async.
3786 * io/list_read.c (read_charactor): Use delim_status instead of
3787 flags.delim.
3788 * io/read.c (read_x): Use pad_status instead of flags.pad.
3789 * io/inquire.c (inquire_via_unit): Add new checks.
3790 (inquire_via_filename): Likewise.
3791 * io/io.h (st_parameter_inquire): Add new flags.
3792 (st_parameter_dt): Likewise.
3793 * io/unit.c (get_internal_unit): Set flags.async. (init_units): Set
3794 flags.async.
3795 * io/transfer.c: Add delim and pad option arrays. (read_sf): Use
3796 pad_status instead of flags.pad. (read_block): Likewise.
3797 (data_transfer_init): Set flags.async and add checks.
3798 * io/write.c (write_character): Use delim_status.
3799 (list_formatted_write_scalar): Likewise. (nml_write_obj): Likewise.
3800 (namelist_write): Likewise.
3802 2008-04-05 Jerry DeLisle <jvdelisle@gcc.gnu.org>
3804 PR fortran/25829 28655
3805 * gfortran.map: Add new symbol, _gfortran_st_wait.
3806 * libgfortran.h (st_paramter_common): Add new I/O parameters.
3807 * open.c (st_option decimal_opt[], st_option encoding_opt[],
3808 st_option round_opt[], st_option sign_opt[], st_option async_opt[]): New
3809 parameter option arrays. (edit_modes): Add checks for new parameters.
3810 (new_unit): Likewise. (st_open): Likewise.
3811 * list_read.c (CASE_SEPERATORS): Add ';' as a valid separator.
3812 (eat_separator): Handle deimal comma. (read_logical): Fix whitespace.
3813 (parse_real): Handle decimal comma. (read_real): Handle decimal comma.
3814 * read.c (read_a): Use decimal status flag to allow comma in place of a
3815 decimal point. (read_f): Allow comma as acceptable character in float.
3816 According to decimal flag, substitute a period for a comma.
3817 (read_x): If decimal status flag is comma, disable the read_comma flag,
3818 not allowing comma as a delimiter, an extension otherwise.
3819 * io.h: (unit_decimal, unit_encoding, unit_round, unit_sign,
3820 unit_async): New enumerators. Add all new I/O parameters.
3821 * unix.c (unix_stream, int_stream): Add io_mode asychronous I/O control.
3822 (move_pos_offset, fd_alloc_w_at): Fix some whitespace.
3823 (fd_sfree): Use new enumerator. (fd_read): Likewise.
3824 (fd_write): Likewise. (fd_close): Fix whitespace.
3825 (fd_open): Use new enumertors. (tempfile, regular_file,
3826 open_external): Fix whitespace. (output_stream, error_stream): Set
3827 method. (stream_offset): Fix whitespace.
3828 * transfer.c: (st_option decimal_opt[], sign_opt[], blank_opt[]): New
3829 option arrays. (formatted_transfer_scalar): Set sf_read_comma flag
3830 based on new decimal_status flag. (data_transfer_init): Initialize new
3831 parameters. Add checks for decimal, sign, and blank. (st_wait): New stub.
3832 * format.c: (format_lex): Add format specifiers DP, DC, and D.
3833 (parse_format_list): Parse the new specifiers.
3834 * write.c (write_decimal): Use new sign enumerators to set the sign.
3835 (write_complex): Handle decimal comma and semi-colon separator.
3836 (nml_write_obj): Likewise.
3837 * write_float.def: Revise sign enumerators. (calculate_sign): Use new
3838 sign enumerators. (output_float): Likewise. Use new decimal_status flag
3839 to set the decimal character to a point or a comma.
3841 2008-03-28 Thomas Koenig <tkoenig@gcc.gnu.org>
3843 PR libfortran/32972
3844 PR libfortran/32512
3845 * Makefile.am: Add new variable, i_spread_c, containing
3846 pack_i1.c, pack_i2.c, pack_i4.c, pack_i8.c, spread_i16.c,
3847 spread_r4.c, spread_r8.c, spread_r10.c, spread_r16.c,
3848 spread_c4.c, spread_c8.c, spread_c10.c, spread_c16.c.
3849 * Makefile.in: Regenerated.
3850 * libgfortran.h: Add prototypes for spread_i1, spread_i2,
3851 spread_i4, spread_i8, spread_i16, spread_r4, spread_r8,
3852 spread_c4, spread_c8, spread_c10, spread_c16,
3853 spread_scalar_i1, spread_scalar_i2, spread_scalar_i4,
3854 spread_scalar_i8, spread_scalar_i16, spread_scalar_r4
3855 spread_scalar_r8, spread_scalar_c4, spread_scalar_c8,
3856 spread_scalar_c10 and spread_scalar_c16.
3857 Add macros to isolate both type and size information
3858 from array descriptors with a single mask operation.
3859 * intrinsics/spread_generic.c: Add calls to specific
3860 spread functions.
3861 * m4/spread.m4: New file.
3862 * generated/spread_i1.c: New file.
3863 * generated/spread_i2.c: New file.
3864 * generated/spread_i4.c: New file.
3865 * generated/spread_i8.c: New file.
3866 * generated/spread_i16.c: New file.
3867 * generated/spread_r4.c: New file.
3868 * generated/spread_r8.c: New file.
3869 * generated/spread_r10.c: New file.
3870 * generated/spread_r16.c: New file.
3871 * generated/spread_c4.c: New file.
3872 * generated/spread_c8.c: New file.
3873 * generated/spread_c10.c: New file.
3874 * generated/spread_c16.c: New file.
3876 2008-03-28 Jerry DeLisle <jvdelisle@gcc.gnu.org>
3878 PR libfortran/35699
3879 * io/transfer.c (write_buf): Don't pad the record, just return if the
3880 data is NULL. (next_record_w): If there are bytes left in the record
3881 for unformatted direct I/O, pad out the record with zero bytes.
3883 2008-03-28 Tobias Burnus <burnus@net-b.de>
3885 PR fortran/35721
3886 * intrinsics/associated.c (associated): Ignore different
3887 stride of pointer vs. target if only one element is referred.
3889 2008-03-26 Jerry DeLisle <jvdelisle@gcc.gnu.org>
3891 * io/unix.c (fd_close): Do not close STDIN.
3893 2007-03-23 Thomas Koenig <tkoenig@gcc.gnu.org
3895 PR libfortran/32972
3896 * Makefile.am: Add new variable, i_unpack_c, containing
3897 unpack_i1.c, unpack_i2.c, unpack_i4.c, unpack_i8.c,
3898 unpack_i16.c, unpack_r4.c, unpack_r8.c, unpack_r10.c,
3899 unpack_r16.c, unpack_c4.c, unpack_c8.c, unpack_c10.c
3900 and unpack_c16.c
3901 Add i_unpack_c to gfor_built_src.
3902 Add rule to generate i_unpack_c from m4/unpack.m4.
3903 * Makefile.in: Regenerated.
3904 * libgfortran.h: Add prototypes for unpack0_i1, unpack0_i2,
3905 unpack0_i4, unpack0_i8, unpack0_i16, unpack0_r4, unpack0_r8,
3906 unpack0_r10, unpack0_r16, unpack0_c4, unpack0_c8, unpack0_c10,
3907 unpack0_c16, unpack1_i1, unpack1_i2, unpack1_i4, unpack1_i8,
3908 unpack1_i16, unpack1_r4, unpack1_r8, unpack1_r10, unpack1_r16,
3909 unpack1_c4, unpack1_c8, unpack1_c10 and unpack1_c16.
3910 * intrinsics/pack_generic.c (unpack1): Add calls to specific
3911 unpack1 functions.
3912 (unpack0): Add calls to specific unpack0 functions.
3913 * m4/unpack.m4: New file.
3914 * generated/unpack_i1.c: New file.
3915 * generated/unpack_i2.c: New file.
3916 * generated/unpack_i4.c: New file.
3917 * generated/unpack_i8.c: New file.
3918 * generated/unpack_i16.c: New file.
3919 * generated/unpack_r4.c: New file.
3920 * generated/unpack_r8.c: New file.
3921 * generated/unpack_r10.c: New file.
3922 * generated/unpack_r16.c: New file.
3923 * generated/unpack_c4.c: New file.
3924 * generated/unpack_c8.c: New file.
3925 * generated/unpack_c10.c: New file.
3926 * generated/unpack_c16.c: New file.
3928 2008-03-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
3930 PR libfortran/35632
3931 * io/transfer.c (data_transfer_init): Fix whitespace.
3932 (next_record_w): Truncate the file only if the stream
3933 position is short of the file end.
3935 2008-03-21 Jerry DeLisle <jvdelisle@gcc.gnu.org>
3937 * intrinsics/pack_generic.c: Fix typo.
3939 2008-03-21 Janne Blomqvist <jb@gcc.gnu.org>
3941 * gfortran.map: Move erfc_scaled symbols to new symbol node
3942 GFORTRAN_1.1, thereby fixing ABI bug introduced in r132846.
3944 2008-03-21 Thomas Koenig <tkoenig@gcc.gnu.org>
3946 PR libfortran/32972
3947 * runtime/in_pack_generic.c (internal_pack): Call correct
3948 function, pack_i16, for GFC_INTEGER_16.
3950 2008-03-21 Thomas Koenig <tkoenig@gcc.gnu.org>
3952 PR libfortran/32972
3953 * Makefile.am: Add new variable, i_pack_c, containing
3954 pack_i1.c, pack_i2.c, pack_i4.c, pack_i8.c, pack_i16.c,
3955 pack_r4.c, pack_r8.c, pack_r10.c, pack_r16.c, pack_c4.c,
3956 pack_c8.c, pack_c10.c, pack_c16.c.
3957 Add m4/pack.m4 to m4_files.
3958 Add i_pack_c to gfor_built_src.
3959 Add rule to generate i_pack_c from m4/pack.m4.
3960 * Makefile.in: Regenerated.
3961 * libgfortran.h: Add prototypes for pack_i1, pack_i2, pack_i4,
3962 pack_i8, pack_i16, pack_r4, pack_r8, pack_c4, pack_c8,
3963 pack_c10, pack_c16.
3964 * intrinsics/pack_generic.c: Add calls to specific
3965 pack functions.
3966 * m4/pack.m4: New file.
3967 * generated/pack_i1.c: New file.
3968 * generated/pack_i2.c: New file.
3969 * generated/pack_i4.c: New file.
3970 * generated/pack_i8.c: New file.
3971 * generated/pack_i16.c: New file.
3972 * generated/pack_r4.c: New file.
3973 * generated/pack_r8.c: New file.
3974 * generated/pack_r10.c: New file.
3975 * generated/pack_r16.c: New file.
3976 * generated/pack_c4.c: New file.
3977 * generated/pack_c8.c: New file.
3978 * generated/pack_c10.c: New file.
3979 * generated/pack_c16.c: New file.
3981 2008-03-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
3983 PR libfortran/35627
3984 * io/list_read.c (free_line): Clear the line buffer enable flag and
3985 reset the index into line_buffer, aka item_count.
3986 (next_char): Cleanup whitespace.
3987 (read_logical): Use unget_char to assure that the first character of the
3988 bad logical is saved in case it is part of an object name. Remove the
3989 clearing of index and flag that is now in free_line.
3990 (read_real): Likewise.
3992 2008-03-19 Thomas Koenig <tkoenig@gcc.gnu.org>
3994 PR libfortran/32972
3995 * runtime/in_pack_generic.c (internal_pack): Fix typo in
3996 last commit.
3998 2008-03-19 Thomas Koenig <tkoenig@gcc.gnu.org>
4000 PR libfortran/32972
4001 * Makefile.am (in_pack_c): Add in_pack_i1.c, in_pack_i2.c,
4002 in_pack_r4.c, in_pack_r8.c, in_pack_r10.c and in_pack_r16.c.
4003 (in_unpack_c): Add in_unpack_i1.c, in_unpack_i2.c,
4004 in_unpack_r4.c, in_unpack_r8.c, in_unpack_r10.c and
4005 in_unpack_r16.c.
4006 * Makefile.in: Regenerate.
4007 * libgfortran.h: Add prototypes for internal_pack_1,
4008 internal_pack_2, internal_pack_16, internal_pack_r4,
4009 internal_pack_r8, internal_pack_r10, internal_pack_r16,
4010 internal_pack_c10 and internal_pack_c16. Add prototypes for
4011 internal_unpack_1, internal_unpack_2, internal_unpack_16,
4012 internal_unpack_r4, internal_unpack_r8, internal_unpack_r10,
4013 internal_unpack_r16, internal_unpack_c10 and
4014 internal_unpack_c16.
4015 * runtime/in_pack_generic.c (internal_pack): Use sizeof instead
4016 of hardwired sizes.
4017 Add calls to internal_pack_1, internal_pack_2,
4018 internal_pack_16, internal_pack_r4, internal_pack_r8,
4019 internal_pack_r10, internal_pack_r16, internal_pack_c10 and
4020 internal_pack_c16.
4021 * runtime/in_unpack_generic.c (internal_unpack): Use sizeof
4022 instead of hardwired sizes.
4023 Add calls to internal_unpack_1, internal_unpack_2,
4024 internal_unpack_16, internal_unpack_r4, internal_unpack_r8,
4025 internal_unpack_r10, internal_unpack_r16, internal_unpack_c10
4026 and internal_unpack_c16.
4027 * generated/in_pack_r4.c: New file.
4028 * generated/in_pack_i2.c: New file.
4029 * generated/in_unpack_i1.c: New file.
4030 * generated/in_pack_r10.c: New file.
4031 * generated/in_unpack_r4.c: New file.
4032 * generated/in_unpack_i2.c: New file.
4033 * generated/in_unpack_r16.c: New file.
4034 * generated/in_pack_r8.c: New file.
4035 * generated/in_unpack_r10.c: New file.
4036 * generated/in_unpack_r8.c: New file.
4037 * generated/in_pack_r16.c: New file.
4038 * generated/in_pack_i1.c: New file.
4040 2008-03-17 Jerry DeLisle <jvdelisle@gcc.gnu.org>
4042 PR libfortran/35617
4043 * io/list_read.c (eat_separator): If next character after eatline is '!'
4044 then eatline again.
4046 2008-03-16 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
4048 * aclocal.m4: Regenerate.
4049 * configure: Likewise.
4050 * Makefile.in: Likewise.
4052 2008-03-12 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
4054 PR libfortran/35524
4055 * intrinsics/erfc_scaled_inc.c: Only define the long double
4056 variant of erfc_scaled if expl is available.
4058 2008-03-11 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
4060 PR libfortran/32812
4061 * intrinsics/random.c (scramble_seed, unscramble_seed): New
4062 functions.
4063 (random_seed_i4): Scramble the seed the user gives us before
4064 storing it, and unscramble it when we return it back later.
4066 2008-03-05 Hans-Peter Nilsson <hp@axis.com>
4068 PR libfortran/35293
4069 * io/unix.c (fd_truncate): Fold s->special_file case into
4070 success case of ftruncate/chsize call instead of the failure case.
4071 Make failure case actually return failure. Properly update stream
4072 pointers on failure. Call runtime_error for targets without
4073 neither ftruncate nor chsize where such a call would be needed.
4075 2008-03-03 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
4077 PR fortran/33197
4078 * intrinsics/erfc_scaled_inc.c: New file.
4079 * intrinsics/erfc_scaled.c: New file.
4080 * gfortran.map (GFORTRAN_1.0): Add _gfortran_erfc_scaled_r*.
4081 * Makefile.am: Add intrinsics/erfc_scaled.c.
4082 * config.h.in: Regenerate.
4083 * configure: Regenerate.
4084 * Makefile.in: Regenerate.
4086 2008-03-01 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
4088 PR libfortran/35355
4089 * intrinsics/time_1.h (__time_1): Fix calculation of user_usec
4090 for mingw.
4092 2008-03-01 Janne Blomqvist <jb@gcc.gnu.org>
4094 PR libfortran/35063
4095 * io/unit.c (destroy_unit_mutex): Call __gthread_mutex_destroy
4096 instead of macro kludge.
4098 2008-02-25 Janne Blomqvist <jb@gcc.gnu.org>
4100 PR fortran/29549
4101 * Makefile.am: Add -fcx-fortran-rules to AM_CFLAGS for all of
4102 libgfortran.
4103 * Makefile.in: Regenerated.
4105 2008-02-25 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
4107 * m4/ifunction_logical.m4: Add casts to get rid of warnings.
4108 * generated/all_l1.c: Regenerate.
4109 * generated/all_l2.c: Regenerate.
4110 * generated/all_l4.c: Regenerate.
4111 * generated/all_l8.c: Regenerate.
4112 * generated/all_l16.c: Regenerate.
4113 * generated/any_l1.c: Regenerate.
4114 * generated/any_l2.c: Regenerate.
4115 * generated/any_l4.c: Regenerate.
4116 * generated/any_l8.c: Regenerate.
4117 * generated/any_l16.c: Regenerate.
4118 * generated/count_1_l.c: Regenerate.
4119 * generated/count_2_l.c: Regenerate.
4120 * generated/count_4_l.c: Regenerate.
4121 * generated/count_8_l.c: Regenerate.
4122 * generated/count_16_l.c: Regenerate.
4124 2008-02-24 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
4126 PR libfortran/32841
4127 * acinclude.m4: Don't use HAVE_MATH_H.
4128 * configure: Regenerate.
4130 2008-02-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
4132 PR libfortran/35132
4133 * io/transfer.c (next_record_w): Truncate after the last record for
4134 STREAM I/O.
4136 PR libfortran/34954
4137 * io/transfer.c (data_transfer_init): Initialize dtp->rec if writing.
4139 PR libfortran/34974
4140 * io/transfer.c (formatted_transfer_scalar): Flush the buffer if skips
4141 is less than zero. (next_record_w): Use sseek to position the file to
4142 the max position reached.
4144 2008-02-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
4146 PR libfortran/35036
4147 * write_float.def (output_float): Add error checks for zero digits
4148 after decimal point in E and D format specifiers.
4150 2008-02-10 Jerry DeLisle <jvdelisle@gcc.gnu.org>
4152 PR libfortran/35063
4153 * io/unit.c (destroy_unit_mutex): New function that uses
4154 __gthread_mutex_destroy_function or pthread_mutex_destroy after
4155 unlocking and before free_mem for final closure of I/O unit.
4156 (delete_root): Use new function.
4157 (free_internal_unit): Likewise.
4158 (close_unit_1): Likewise.
4160 2008-02-02 Thomas Koenig <tkoenig@gcc.gnu.org>
4162 PR libfortran/35001
4163 * m4/shape.m4: Return 0 for extents <= 0.
4164 * generated/shape_i4.c: Regenerated.
4165 * generated/shape_i8.c: Regenerated.
4166 * generated/shape_i16.c: Regenerated.
4168 2008-01-27 Thomas Koenig <tkoenig@gcc.gnu.org>
4170 PR libfortran/34980
4171 * m4/shape.m4: If return array is empty, return early.
4172 * generated/shape_i4.c: Regenerated.
4173 * generated/shape_i8.c: Regenerated.
4174 * generated/shape_i16.c: Regenerated.
4176 2008-01-26 Thomas Koenig <tkoenig@gcc.gnu.org>
4178 PR libfofortran/34887
4179 * io/transfer.c (next_record_w): Always move to the farthest
4180 position when completing the record (also when we are
4181 processing a slash edit descriptor).
4183 2008-01-25 Jerry DeLisle <jvdelisle@gcc.gnu.org>
4185 PR libfortran/34876
4186 * io/transfer.c (write_buf): Handle case of zero sized array.
4187 (transfer_array): Set data pointer to NULL and size to zero. Then
4188 make a data transfer and return.
4190 2008-01-24 David Edelsohn <edelsohn@gnu.org>
4192 * configure: Regenerate.
4194 2008-01-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
4196 PR libfortran/34795
4197 * io/inquire.c (inquire_via_unit): If a unit is opened, return values
4198 according to the open action for DIRECT, FORMATTED, and UNFORMATTED.
4199 (inquire_via_filename): Return "UNKNOWN" for SEQUENTIAL, DIRECT,
4200 FORAMATTED, and UNFORMATTED inquiries.
4201 * io/unix.c (inquire_sequential): Return "UNKNOWN" when appropriate
4202 for files that are not opened. (inquire_direct): Same.
4203 (inquire_formatted): Same.
4205 2008-01-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
4207 PR libfortran/34782
4208 * io/transfer.c (formatted_transfer_scalar): Set max_pos to the greater
4209 of the current max_pos or the newly calculated position.
4211 2008-01-18 Tobias Burnus <burnus@net-b.de>
4213 * io/write.c (write_real): Increase default precision
4214 for REAL(16) by one.
4216 2008-01-16 Steven Bosscher <steven@gcc.gnu.org>
4218 PR libfortran/34669
4219 * mk-kinds-h.sh: Compile with -S to avoid calling the assembler,
4220 to avoid piping the -fdump-parse-tree output to the assembler
4221 when configuring with -pipe.
4222 * mk-sik-inc.sh: Likewise.
4223 * mk-srk-inc.sh: Likewise.
4225 2008-01-15 Thomas Koenig <tkoenig@gcc.gnu.org>
4227 PR libfortran/34671
4228 * gfortran.am: Added _gfortran_all_l1, _gfortran_all_l2,
4229 _gfortran_any_l1, _gfortran_any_l2, -28,15 _gfortran_count_1_l,
4230 _gfortran_count_16_l, _gfortran_count_2_l, _gfortran_count_4_l and
4231 _gfortran_count_8_l Removed _gfortran_count_16_l16,
4232 _gfortran_count_16_l4, _gfortran_count_16_l8,
4233 _gfortran_count_4_l16, _gfortran_count_4_l4, _gfortran_count_4_l8,
4234 _gfortran_count_8_l16, _gfortran_count_8_l4 and
4235 _gfortran_count_8_l8.
4236 * Makefile.am: Added generated/any_l1.c and generated/any_l2.c to
4237 i_any_c. Added generated/all_l1. and generated/all_l2.c to
4238 i_all_c. Removed generated/count_4_l4.c, generated/count_8_l4.c,
4239 generated/count_16_l4.c, generated/count_4_l8.c,
4240 generated/count_8_l8.c, generated/count_16_l8.c,
4241 generated/count_4_l16.c, generated/count_8_l16.c, and
4242 generated/count_16_l16.c from i_count_c. Added count_1_l.c,
4243 count_2_l.c, count_4_l.c, count_8_l.c and count_16_l.c to
4244 i_count_c. I_M4_DEPS2 depends on ifunction_logical.m4, for
4245 any of the files generated from all.m4, any.m4 and count.m4.
4246 * Makefile.in: Regenerated.
4247 * m4/ifunction_logical.m4: New file. Use
4248 GFC_LOGICAL_1 pointer for access to source arrays.
4249 * m4/any.m4: Include ifunction_logical.m4 instead of
4250 ifunction.m4. Don't check atype_name.
4251 * m4/all.m4: Likewise.
4252 * m4/count.m4: Likewise.
4253 * generated/any_l1.c: New file.
4254 * generated/any_l2.c: New file.
4255 * generated/all_l1.c: New file.
4256 * generated/count_1_l.c: New file.
4257 * generated/count_2_l.c: New file.
4258 * generated/count_4_l.c: New file.
4259 * generated/count_8_l.c: New file.
4260 * generated/count_16_l.c: New file.
4261 * generated/any_l4.c: Regenerated.
4262 * generated/any_l8.c: Regenerated.
4263 * generated/any_l16.c: Regenerated.
4264 * generated/all_l4.c: Regenerated.
4265 * generated/all_l8.c: Regenerated.
4266 * generated/all_l16.c: Regenerated.
4267 * generated/count_4_l4.c: Removed.
4268 * generated/count_4_l8.c: Removed.
4269 * generated/count_4_l16.c: Removed.
4270 * generated/count_8_l4.c: Removed.
4271 * generated/count_8_l8.c: Removed.
4272 * generated/count_8_l16.c: Removed.
4273 * generated/count_16_l4.c: Removed.
4274 * generated/count_16_l8.c: Removed.
4275 * generated/count_16_l16.c: Removed.
4277 2008-01-13 Thomas Koenig <tkoenig@gcc.gnu.org>
4279 PR libfortran/34746
4280 * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Use %ld
4281 in printf format for all bounds checking; cast all
4282 integer-like arguments to runtime_error() to long int.
4283 (`m'name`'rtype_qual`_'atype_code): Likewise.
4284 (`s'name`'rtype_qual`_'atype_code): Likewise.
4285 * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): Likewise.
4286 (`m'name`'rtype_qual`_'atype_code): Likewise.
4287 (`s'name`'rtype_qual`_'atype_code): Likewise.
4288 * generated/all_l16.c: Regenerated.
4289 * generated/all_l4.c: Regenerated.
4290 * generated/all_l8.c: Regenerated.
4291 * generated/any_l16.c: Regenerated.
4292 * generated/any_l4.c: Regenerated.
4293 * generated/any_l8.c: Regenerated.
4294 * generated/count_16_l16.c: Regenerated.
4295 * generated/count_16_l4.c: Regenerated.
4296 * generated/count_16_l8.c: Regenerated.
4297 * generated/count_4_l16.c: Regenerated.
4298 * generated/count_4_l4.c: Regenerated.
4299 * generated/count_4_l8.c: Regenerated.
4300 * generated/count_8_l16.c: Regenerated.
4301 * generated/count_8_l4.c: Regenerated.
4302 * generated/count_8_l8.c: Regenerated.
4303 * generated/maxloc0_16_i1.c: Regenerated.
4304 * generated/maxloc0_16_i16.c: Regenerated.
4305 * generated/maxloc0_16_i2.c: Regenerated.
4306 * generated/maxloc0_16_i4.c: Regenerated.
4307 * generated/maxloc0_16_i8.c: Regenerated.
4308 * generated/maxloc0_16_r10.c: Regenerated.
4309 * generated/maxloc0_16_r16.c: Regenerated.
4310 * generated/maxloc0_16_r4.c: Regenerated.
4311 * generated/maxloc0_16_r8.c: Regenerated.
4312 * generated/maxloc0_4_i1.c: Regenerated.
4313 * generated/maxloc0_4_i16.c: Regenerated.
4314 * generated/maxloc0_4_i2.c: Regenerated.
4315 * generated/maxloc0_4_i4.c: Regenerated.
4316 * generated/maxloc0_4_i8.c: Regenerated.
4317 * generated/maxloc0_4_r10.c: Regenerated.
4318 * generated/maxloc0_4_r16.c: Regenerated.
4319 * generated/maxloc0_4_r4.c: Regenerated.
4320 * generated/maxloc0_4_r8.c: Regenerated.
4321 * generated/maxloc0_8_i1.c: Regenerated.
4322 * generated/maxloc0_8_i16.c: Regenerated.
4323 * generated/maxloc0_8_i2.c: Regenerated.
4324 * generated/maxloc0_8_i4.c: Regenerated.
4325 * generated/maxloc0_8_i8.c: Regenerated.
4326 * generated/maxloc0_8_r10.c: Regenerated.
4327 * generated/maxloc0_8_r16.c: Regenerated.
4328 * generated/maxloc0_8_r4.c: Regenerated.
4329 * generated/maxloc0_8_r8.c: Regenerated.
4330 * generated/maxloc1_16_i1.c: Regenerated.
4331 * generated/maxloc1_16_i16.c: Regenerated.
4332 * generated/maxloc1_16_i2.c: Regenerated.
4333 * generated/maxloc1_16_i4.c: Regenerated.
4334 * generated/maxloc1_16_i8.c: Regenerated.
4335 * generated/maxloc1_16_r10.c: Regenerated.
4336 * generated/maxloc1_16_r16.c: Regenerated.
4337 * generated/maxloc1_16_r4.c: Regenerated.
4338 * generated/maxloc1_16_r8.c: Regenerated.
4339 * generated/maxloc1_4_i1.c: Regenerated.
4340 * generated/maxloc1_4_i16.c: Regenerated.
4341 * generated/maxloc1_4_i2.c: Regenerated.
4342 * generated/maxloc1_4_i4.c: Regenerated.
4343 * generated/maxloc1_4_i8.c: Regenerated.
4344 * generated/maxloc1_4_r10.c: Regenerated.
4345 * generated/maxloc1_4_r16.c: Regenerated.
4346 * generated/maxloc1_4_r4.c: Regenerated.
4347 * generated/maxloc1_4_r8.c: Regenerated.
4348 * generated/maxloc1_8_i1.c: Regenerated.
4349 * generated/maxloc1_8_i16.c: Regenerated.
4350 * generated/maxloc1_8_i2.c: Regenerated.
4351 * generated/maxloc1_8_i4.c: Regenerated.
4352 * generated/maxloc1_8_i8.c: Regenerated.
4353 * generated/maxloc1_8_r10.c: Regenerated.
4354 * generated/maxloc1_8_r16.c: Regenerated.
4355 * generated/maxloc1_8_r4.c: Regenerated.
4356 * generated/maxloc1_8_r8.c: Regenerated.
4357 * generated/maxval_i1.c: Regenerated.
4358 * generated/maxval_i16.c: Regenerated.
4359 * generated/maxval_i2.c: Regenerated.
4360 * generated/maxval_i4.c: Regenerated.
4361 * generated/maxval_i8.c: Regenerated.
4362 * generated/maxval_r10.c: Regenerated.
4363 * generated/maxval_r16.c: Regenerated.
4364 * generated/maxval_r4.c: Regenerated.
4365 * generated/maxval_r8.c: Regenerated.
4366 * generated/minloc0_16_i1.c: Regenerated.
4367 * generated/minloc0_16_i16.c: Regenerated.
4368 * generated/minloc0_16_i2.c: Regenerated.
4369 * generated/minloc0_16_i4.c: Regenerated.
4370 * generated/minloc0_16_i8.c: Regenerated.
4371 * generated/minloc0_16_r10.c: Regenerated.
4372 * generated/minloc0_16_r16.c: Regenerated.
4373 * generated/minloc0_16_r4.c: Regenerated.
4374 * generated/minloc0_16_r8.c: Regenerated.
4375 * generated/minloc0_4_i1.c: Regenerated.
4376 * generated/minloc0_4_i16.c: Regenerated.
4377 * generated/minloc0_4_i2.c: Regenerated.
4378 * generated/minloc0_4_i4.c: Regenerated.
4379 * generated/minloc0_4_i8.c: Regenerated.
4380 * generated/minloc0_4_r10.c: Regenerated.
4381 * generated/minloc0_4_r16.c: Regenerated.
4382 * generated/minloc0_4_r4.c: Regenerated.
4383 * generated/minloc0_4_r8.c: Regenerated.
4384 * generated/minloc0_8_i1.c: Regenerated.
4385 * generated/minloc0_8_i16.c: Regenerated.
4386 * generated/minloc0_8_i2.c: Regenerated.
4387 * generated/minloc0_8_i4.c: Regenerated.
4388 * generated/minloc0_8_i8.c: Regenerated.
4389 * generated/minloc0_8_r10.c: Regenerated.
4390 * generated/minloc0_8_r16.c: Regenerated.
4391 * generated/minloc0_8_r4.c: Regenerated.
4392 * generated/minloc0_8_r8.c: Regenerated.
4393 * generated/minloc1_16_i1.c: Regenerated.
4394 * generated/minloc1_16_i16.c: Regenerated.
4395 * generated/minloc1_16_i2.c: Regenerated.
4396 * generated/minloc1_16_i4.c: Regenerated.
4397 * generated/minloc1_16_i8.c: Regenerated.
4398 * generated/minloc1_16_r10.c: Regenerated.
4399 * generated/minloc1_16_r16.c: Regenerated.
4400 * generated/minloc1_16_r4.c: Regenerated.
4401 * generated/minloc1_16_r8.c: Regenerated.
4402 * generated/minloc1_4_i1.c: Regenerated.
4403 * generated/minloc1_4_i16.c: Regenerated.
4404 * generated/minloc1_4_i2.c: Regenerated.
4405 * generated/minloc1_4_i4.c: Regenerated.
4406 * generated/minloc1_4_i8.c: Regenerated.
4407 * generated/minloc1_4_r10.c: Regenerated.
4408 * generated/minloc1_4_r16.c: Regenerated.
4409 * generated/minloc1_4_r4.c: Regenerated.
4410 * generated/minloc1_4_r8.c: Regenerated.
4411 * generated/minloc1_8_i1.c: Regenerated.
4412 * generated/minloc1_8_i16.c: Regenerated.
4413 * generated/minloc1_8_i2.c: Regenerated.
4414 * generated/minloc1_8_i4.c: Regenerated.
4415 * generated/minloc1_8_i8.c: Regenerated.
4416 * generated/minloc1_8_r10.c: Regenerated.
4417 * generated/minloc1_8_r16.c: Regenerated.
4418 * generated/minloc1_8_r4.c: Regenerated.
4419 * generated/minloc1_8_r8.c: Regenerated.
4420 * generated/minval_i1.c: Regenerated.
4421 * generated/minval_i16.c: Regenerated.
4422 * generated/minval_i2.c: Regenerated.
4423 * generated/minval_i4.c: Regenerated.
4424 * generated/minval_i8.c: Regenerated.
4425 * generated/minval_r10.c: Regenerated.
4426 * generated/minval_r16.c: Regenerated.
4427 * generated/minval_r4.c: Regenerated.
4428 * generated/minval_r8.c: Regenerated.
4429 * generated/product_c10.c: Regenerated.
4430 * generated/product_c16.c: Regenerated.
4431 * generated/product_c4.c: Regenerated.
4432 * generated/product_c8.c: Regenerated.
4433 * generated/product_i1.c: Regenerated.
4434 * generated/product_i16.c: Regenerated.
4435 * generated/product_i2.c: Regenerated.
4436 * generated/product_i4.c: Regenerated.
4437 * generated/product_i8.c: Regenerated.
4438 * generated/product_r10.c: Regenerated.
4439 * generated/product_r16.c: Regenerated.
4440 * generated/product_r4.c: Regenerated.
4441 * generated/product_r8.c: Regenerated.
4442 * generated/sum_c10.c: Regenerated.
4443 * generated/sum_c16.c: Regenerated.
4444 * generated/sum_c4.c: Regenerated.
4445 * generated/sum_c8.c: Regenerated.
4446 * generated/sum_i1.c: Regenerated.
4447 * generated/sum_i16.c: Regenerated.
4448 * generated/sum_i2.c: Regenerated.
4449 * generated/sum_i4.c: Regenerated.
4450 * generated/sum_i8.c: Regenerated.
4451 * generated/sum_r10.c: Regenerated.
4452 * generated/sum_r16.c: Regenerated.
4453 * generated/sum_r4.c: Regenerated.
4454 * generated/sum_r8.c: Regenerated.
4456 2008-01-11 Thomas Koenig <tkoenig@gcc.gnu.org>
4458 PR libfortran/34670
4459 * m4/iparm.m4 (upcase): New macro (copied from the m4 manual).
4460 (u_name): New macro for the upper case name of the intrinsic.
4461 * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Add
4462 bounds checking and rank check, depending on
4463 compile_options.bounds_check.
4464 (`m'name`'rtype_qual`_'atype_code): Likewise.
4465 (`s'name`'rtype_qual`_'atype_code): Likewise.
4466 * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): Add
4467 bounds checking and rank check, depending on
4468 compile_options.bounds_check.
4469 (`m'name`'rtype_qual`_'atype_code): Likewise.
4470 (`s'name`'rtype_qual`_'atype_code): Likewise.
4471 * generated/all_l16.c: Regenerated.
4472 * generated/all_l4.c: Regenerated.
4473 * generated/all_l8.c: Regenerated.
4474 * generated/any_l16.c: Regenerated.
4475 * generated/any_l4.c: Regenerated.
4476 * generated/any_l8.c: Regenerated.
4477 * generated/count_16_l16.c: Regenerated.
4478 * generated/count_16_l4.c: Regenerated.
4479 * generated/count_16_l8.c: Regenerated.
4480 * generated/count_4_l16.c: Regenerated.
4481 * generated/count_4_l4.c: Regenerated.
4482 * generated/count_4_l8.c: Regenerated.
4483 * generated/count_8_l16.c: Regenerated.
4484 * generated/count_8_l4.c: Regenerated.
4485 * generated/count_8_l8.c: Regenerated.
4486 * generated/maxloc0_16_i1.c: Regenerated.
4487 * generated/maxloc0_16_i16.c: Regenerated.
4488 * generated/maxloc0_16_i2.c: Regenerated.
4489 * generated/maxloc0_16_i4.c: Regenerated.
4490 * generated/maxloc0_16_i8.c: Regenerated.
4491 * generated/maxloc0_16_r10.c: Regenerated.
4492 * generated/maxloc0_16_r16.c: Regenerated.
4493 * generated/maxloc0_16_r4.c: Regenerated.
4494 * generated/maxloc0_16_r8.c: Regenerated.
4495 * generated/maxloc0_4_i1.c: Regenerated.
4496 * generated/maxloc0_4_i16.c: Regenerated.
4497 * generated/maxloc0_4_i2.c: Regenerated.
4498 * generated/maxloc0_4_i4.c: Regenerated.
4499 * generated/maxloc0_4_i8.c: Regenerated.
4500 * generated/maxloc0_4_r10.c: Regenerated.
4501 * generated/maxloc0_4_r16.c: Regenerated.
4502 * generated/maxloc0_4_r4.c: Regenerated.
4503 * generated/maxloc0_4_r8.c: Regenerated.
4504 * generated/maxloc0_8_i1.c: Regenerated.
4505 * generated/maxloc0_8_i16.c: Regenerated.
4506 * generated/maxloc0_8_i2.c: Regenerated.
4507 * generated/maxloc0_8_i4.c: Regenerated.
4508 * generated/maxloc0_8_i8.c: Regenerated.
4509 * generated/maxloc0_8_r10.c: Regenerated.
4510 * generated/maxloc0_8_r16.c: Regenerated.
4511 * generated/maxloc0_8_r4.c: Regenerated.
4512 * generated/maxloc0_8_r8.c: Regenerated.
4513 * generated/maxloc1_16_i1.c: Regenerated.
4514 * generated/maxloc1_16_i16.c: Regenerated.
4515 * generated/maxloc1_16_i2.c: Regenerated.
4516 * generated/maxloc1_16_i4.c: Regenerated.
4517 * generated/maxloc1_16_i8.c: Regenerated.
4518 * generated/maxloc1_16_r10.c: Regenerated.
4519 * generated/maxloc1_16_r16.c: Regenerated.
4520 * generated/maxloc1_16_r4.c: Regenerated.
4521 * generated/maxloc1_16_r8.c: Regenerated.
4522 * generated/maxloc1_4_i1.c: Regenerated.
4523 * generated/maxloc1_4_i16.c: Regenerated.
4524 * generated/maxloc1_4_i2.c: Regenerated.
4525 * generated/maxloc1_4_i4.c: Regenerated.
4526 * generated/maxloc1_4_i8.c: Regenerated.
4527 * generated/maxloc1_4_r10.c: Regenerated.
4528 * generated/maxloc1_4_r16.c: Regenerated.
4529 * generated/maxloc1_4_r4.c: Regenerated.
4530 * generated/maxloc1_4_r8.c: Regenerated.
4531 * generated/maxloc1_8_i1.c: Regenerated.
4532 * generated/maxloc1_8_i16.c: Regenerated.
4533 * generated/maxloc1_8_i2.c: Regenerated.
4534 * generated/maxloc1_8_i4.c: Regenerated.
4535 * generated/maxloc1_8_i8.c: Regenerated.
4536 * generated/maxloc1_8_r10.c: Regenerated.
4537 * generated/maxloc1_8_r16.c: Regenerated.
4538 * generated/maxloc1_8_r4.c: Regenerated.
4539 * generated/maxloc1_8_r8.c: Regenerated.
4540 * generated/maxval_i1.c: Regenerated.
4541 * generated/maxval_i16.c: Regenerated.
4542 * generated/maxval_i2.c: Regenerated.
4543 * generated/maxval_i4.c: Regenerated.
4544 * generated/maxval_i8.c: Regenerated.
4545 * generated/maxval_r10.c: Regenerated.
4546 * generated/maxval_r16.c: Regenerated.
4547 * generated/maxval_r4.c: Regenerated.
4548 * generated/maxval_r8.c: Regenerated.
4549 * generated/minloc0_16_i1.c: Regenerated.
4550 * generated/minloc0_16_i16.c: Regenerated.
4551 * generated/minloc0_16_i2.c: Regenerated.
4552 * generated/minloc0_16_i4.c: Regenerated.
4553 * generated/minloc0_16_i8.c: Regenerated.
4554 * generated/minloc0_16_r10.c: Regenerated.
4555 * generated/minloc0_16_r16.c: Regenerated.
4556 * generated/minloc0_16_r4.c: Regenerated.
4557 * generated/minloc0_16_r8.c: Regenerated.
4558 * generated/minloc0_4_i1.c: Regenerated.
4559 * generated/minloc0_4_i16.c: Regenerated.
4560 * generated/minloc0_4_i2.c: Regenerated.
4561 * generated/minloc0_4_i4.c: Regenerated.
4562 * generated/minloc0_4_i8.c: Regenerated.
4563 * generated/minloc0_4_r10.c: Regenerated.
4564 * generated/minloc0_4_r16.c: Regenerated.
4565 * generated/minloc0_4_r4.c: Regenerated.
4566 * generated/minloc0_4_r8.c: Regenerated.
4567 * generated/minloc0_8_i1.c: Regenerated.
4568 * generated/minloc0_8_i16.c: Regenerated.
4569 * generated/minloc0_8_i2.c: Regenerated.
4570 * generated/minloc0_8_i4.c: Regenerated.
4571 * generated/minloc0_8_i8.c: Regenerated.
4572 * generated/minloc0_8_r10.c: Regenerated.
4573 * generated/minloc0_8_r16.c: Regenerated.
4574 * generated/minloc0_8_r4.c: Regenerated.
4575 * generated/minloc0_8_r8.c: Regenerated.
4576 * generated/minloc1_16_i1.c: Regenerated.
4577 * generated/minloc1_16_i16.c: Regenerated.
4578 * generated/minloc1_16_i2.c: Regenerated.
4579 * generated/minloc1_16_i4.c: Regenerated.
4580 * generated/minloc1_16_i8.c: Regenerated.
4581 * generated/minloc1_16_r10.c: Regenerated.
4582 * generated/minloc1_16_r16.c: Regenerated.
4583 * generated/minloc1_16_r4.c: Regenerated.
4584 * generated/minloc1_16_r8.c: Regenerated.
4585 * generated/minloc1_4_i1.c: Regenerated.
4586 * generated/minloc1_4_i16.c: Regenerated.
4587 * generated/minloc1_4_i2.c: Regenerated.
4588 * generated/minloc1_4_i4.c: Regenerated.
4589 * generated/minloc1_4_i8.c: Regenerated.
4590 * generated/minloc1_4_r10.c: Regenerated.
4591 * generated/minloc1_4_r16.c: Regenerated.
4592 * generated/minloc1_4_r4.c: Regenerated.
4593 * generated/minloc1_4_r8.c: Regenerated.
4594 * generated/minloc1_8_i1.c: Regenerated.
4595 * generated/minloc1_8_i16.c: Regenerated.
4596 * generated/minloc1_8_i2.c: Regenerated.
4597 * generated/minloc1_8_i4.c: Regenerated.
4598 * generated/minloc1_8_i8.c: Regenerated.
4599 * generated/minloc1_8_r10.c: Regenerated.
4600 * generated/minloc1_8_r16.c: Regenerated.
4601 * generated/minloc1_8_r4.c: Regenerated.
4602 * generated/minloc1_8_r8.c: Regenerated.
4603 * generated/minval_i1.c: Regenerated.
4604 * generated/minval_i16.c: Regenerated.
4605 * generated/minval_i2.c: Regenerated.
4606 * generated/minval_i4.c: Regenerated.
4607 * generated/minval_i8.c: Regenerated.
4608 * generated/minval_r10.c: Regenerated.
4609 * generated/minval_r16.c: Regenerated.
4610 * generated/minval_r4.c: Regenerated.
4611 * generated/minval_r8.c: Regenerated.
4612 * generated/product_c10.c: Regenerated.
4613 * generated/product_c16.c: Regenerated.
4614 * generated/product_c4.c: Regenerated.
4615 * generated/product_c8.c: Regenerated.
4616 * generated/product_i1.c: Regenerated.
4617 * generated/product_i16.c: Regenerated.
4618 * generated/product_i2.c: Regenerated.
4619 * generated/product_i4.c: Regenerated.
4620 * generated/product_i8.c: Regenerated.
4621 * generated/product_r10.c: Regenerated.
4622 * generated/product_r16.c: Regenerated.
4623 * generated/product_r4.c: Regenerated.
4624 * generated/product_r8.c: Regenerated.
4625 * generated/sum_c10.c: Regenerated.
4626 * generated/sum_c16.c: Regenerated.
4627 * generated/sum_c4.c: Regenerated.
4628 * generated/sum_c8.c: Regenerated.
4629 * generated/sum_i1.c: Regenerated.
4630 * generated/sum_i16.c: Regenerated.
4631 * generated/sum_i2.c: Regenerated.
4632 * generated/sum_i4.c: Regenerated.
4633 * generated/sum_i8.c: Regenerated.
4634 * generated/sum_r10.c: Regenerated.
4635 * generated/sum_r16.c: Regenerated.
4636 * generated/sum_r4.c: Regenerated.
4637 * generated/sum_r8.c: Regenerated.
4639 2008-01-05 Jerry DeLisle <jvdelisle@gcc.gnu.org>
4641 PR libfortran/34676
4642 * io/list_read.c (next_char): Only save the EOF condition for later if
4643 advance="no".
4645 2008-01-03 Thomas Koenig <tkoenig@gcc.gnu.org>
4647 PR libfortran/34565
4648 * io/io.h: Adjust protoypes for open_internal(),
4649 next_array_record() and init_loop_spec().
4650 * io/list_read.c (next_char): Use argument "finished"
4651 of next_array_record to check for end on internal file.
4652 * io/unit.c: Calculate the offset for an array
4653 internal file and supply this informatin to open_internal().
4654 * io/unix.c (open_internal): Set the offset for the internal
4655 file on open.
4656 * io/transfer.c (init_loop_spec): Calculate the starting
4657 record in case of negative strides. Return size of 0 for
4658 an empty array.
4659 (next_array_record): Use an extra flag to signal that the
4660 array is finished.
4661 (next_record_r): Use the new flag to next_array_record().
4662 (next_record_w): Likewise.