1 2005-10-31 Jerry DeLisle <jvdelisle@verizon.net>
4 * io/list_read.c (free_saved): Set saved_used to zero.
6 2005-10-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
9 * io/unix.c (flush_if_preconnected): New function.
10 * io/io.h: Add prototype for flush_if_preconnected.
11 * io/transfer.c (data_transfer_init): Use flush_if_preconnected
12 to workaround buggy mixed C-Fortran code.
14 2005-10-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
16 * Makefile.am: Add intrinsics/malloc.c file.
17 * Makefile.in: Regenerate.
18 * intrinsics/malloc.c: New file, with implementations for free
19 and malloc library functions.
21 2005-10-29 Mike Stump <mrs@apple.com>
23 * Makefile.am (kinds.h): Remove target, if command fails.
24 (selected_int_kind.inc): Likewise.
25 (selected_real_kind.inc): Likewise.
26 * Makefile.in: Regenerate.
28 2005-10-28 Francois-Xavier Coudert <coudert@clipper.ens.fr>
31 * Makefile.am (intrinsics): Add signal.c.
32 * Makefile.in: Regenerate.
33 * configure.ac: Checks for signal and alarm.
34 * config.h.in: Regenerate.
35 * configure: Regenerate.
36 * intrinsics/signal.c: New file for SIGNAL and ALARM intrinsics.
38 2005-10-28 Francois-Xavier Coudert <coudert@clipper.ens.fr>
40 * acinclude.m4 (LIBGFOR_CHECK_FPSETMASK): New check.
41 * configure.ac: Check for floatingpoint.h, fptrap.h and float.h
42 headers. Use LIBGFOR_CHECK_FPSETMASK. Check for fp_trap and
44 * configure.host: Add case for systems with fpsetmask and systems
45 with fp_trap/fp_enable.
46 * config/fpu-sysv.h: New file, FPU code using fpsetmask.
47 * config/fpu-aix.h: New file, FPU code for AIX using fp_trap and
49 * aclocal.m4: Regenerate.
50 * configure: Regenerate.
51 * config.h.in: Regenerate.
53 2005-10-24 Jerry DeLisle <jvdelisle@verizon.net>
56 * libgfortran.h: Remove array stride error code.
57 * runtime/error.c: Remove array stride error.
58 * io/io.h: Change name of 'nml_loop_spec' to 'array_loop_spec' to be
59 generic. Add pointer to array_loop_spec and rank to gfc_unit
61 * io/list_read.c: Revise nml_loop_spec references to array_loop_spec.
62 * io/transfer.c (init_loop_spec): New function to initialize
64 (next_array_record): New function to return the index to the next array
65 record by incrementing through the array_loop_spec.
66 (next_record_r): Use new function.
67 (next_record_w): Use new function.
68 (finalize_transfer): Free memory allocated for array_loop_spec.
69 * io/unit.c (get_array_unit_len): Delete this function. Use new
70 function init_loop_spec to initialize the array_loop_spec.
72 2005-10-24 Paul Thomas <pault@gcc.gnu.org>
75 * libgfortran/io/list_read.c (namelist_read): Exit with call to
76 free_saved () so that character strings do not accumulate.
78 2005-10-23 Jerry DeLisle <jvdelisle@verizon.net>
81 * io/transfer.c (read_block): Change the order of execution to not read
83 (read_block_direct): Same change.
85 2005-10-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
88 * acinclude.m4 (LIBGFOR_CHECK_WORKING_STAT): New check.
89 * configure.ac: Use LIBGFOR_CHECK_WORKING_STAT.
90 * Makefile.in: Regenerate.
91 * configure: Regenerate.
92 * config.h.in: Regenerate.
93 * aclocal.m4: Regenerate.
94 * io/unix.c (compare_file_filename): Add fallback case for
95 systems without working stat.
96 * io/open.c (already_open): Correct call to
97 compare_file_filename.
98 * io/io.h: Correct proto for compare_file_filename.
100 2005-10-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
102 * runtime/fpu.c: Add _GNU_SOURCE definition.
103 * config/fpu-glibc.h: Remove __USE_GNU definition.
105 2005-10-23 Paul Thomas <pault@gcc.gnu.org>
108 * intrinsics/spread_generic.c (spread_internal_scalar): New
109 function that handles the special case of spread with a scalar
110 source. This has new interface functions -
111 (spread_scalar, spread_char_scalar): New functions to interface
112 with the calls specified in gfc_resolve_spread.
114 2005-10-21 Francois-Xavier Coudert <coudert@clipper.ens.fr>
117 * io/unix.c: Add fallback definition for SSIZE_MAX.
119 2005-10-19 Francois-Xavier Coudert <coudert@clipper.ens.fr>
121 * c99_protos.h: Define preprocessor HAVE_ macros with value 1
122 instead of empty value.
123 * intrinsics/c99_functions.c: Likewise.
124 * intrinsics/getXid.c: Define HAVE_GETPID with value 1 instead of
126 * intrinsics/sleep.c: Define HAVE_SLEEP with value 1 instead of
129 2005-10-19 Francois-Xavier Coudert <coudert@clipper.ens.fr>
132 * c99_protos.h: Define HAVE_ macros for all provided functions.
134 2005-10-14 Uros Bizjak <uros@kss-loka.si>
136 * config/fpu-387.h (set_fpu): Remove extra ":" in stmxcsr.
137 Change cw and cw_sse variables to unsigned.
138 (SSE): New definition.
141 2005-10-13 Thomas Koenig <Thomas.Koenig@online.de>
143 * io/unix.c(fd_alloc_r_at): Use read() instead of do_read()
144 only in case of special files (e.g. terminals).
146 2005-10-13 Uros Bizjak <uros@kss-loka.si>
148 * config/fpu-387.h (set_fpu): Add "=m" for stmxcsr.
150 2005-10-12 Francois-Xavier Coudert <coudert@clipper.ens.fr>
152 * Makefile.am: Add fpu.c to the build process, and
153 target-dependent code as fpu-target.h.
154 * Makefile.in: Regenerate.
155 * configure.ac: Add call to configure.host to set
157 * configure: Regenerate.
158 * configure.host: New script to determine which host-dependent
160 * libgfortran.h: Add fpe option, remove previous fpu_ options.
161 Add bitmasks for different FPE traps. Add prototype for set_fpu.
162 * runtime/environ.c: Remove environment variables to control
164 * runtime/fpu.c (set_fpe): New function for the front-end.
165 * runtime/main.c (init): Set FPU state.
166 * config: New directory to store host-dependent code.
167 * config/fpu-387.h: New file with code handling the i387 FPU.
168 * config/fpu-glibc.h: New file with code for glibc systems.
169 * config/fpu-generic.h: Fallback for the most generic host. Issue
172 2005-10-12 Janne Blomqvist <jblomqvi@cc.hut.fi>
174 * io/unix.c(fd_alloc_r_at): Remove parts of patch of 2005/10/07 that
175 cause input from the terminal to hang.
177 2005-10-11 Steven G. Kargl <kargls@comcast.net>
180 * c99_functions.c (csqrtf, csqrt): Fix choice of branch cut. Note
181 csqrt{f} were imported from glibc, and this bug is still present
182 there. glibc PR is 1146.
184 2005-10-07 Janne Blomqvist <jblomqvi@cc.hut.fi>
188 * io/io.h: Add read and write members to stream, define access
190 * io/transfer.c (read_block_direct): New function.
191 (write_block_direct): New function.
192 (unformatted_read): Change to use read_block_direct.
193 (unformatted_write): Change to use write_block_direct.
194 * io/unix.c: Remove mmap includes and defines.
197 (reset_stream): New function.
198 (do_read): New function.
199 (do_write): New function.
200 (fd_flush): Change to use do_write() instead of writen().
201 (fd_alloc_r_at): Change to use do_read().
202 (fd_seek): Change return type to try, as the prototype. Add check
203 to avoid syscall overhead if possible.
204 (fd_read): New function.
205 (fd_write): New function.
206 (fd_open): Set pointers for new functions.
207 (mem_read): New function.
208 (mem_write): New function.
209 (open_internal): Set pointers for new functions.
210 (is_seekable): Clean up comment.
212 2005-10-07 Jerry DeLisle <jvdelisle@verizon.net>
214 * io/transfer.c (write_block): Add test for end-of-file condition,
215 removed from mem_alloc_w_at. (next_record_w): Clean up checks for
216 NULL pointer returns from s_alloc_w.
217 * io/unix.c (mem_alloc_w_at): Remove call to generate_error end-of-file.
218 * io/write.c (write_float): Add checks for NULL pointer returns from
219 write_block calls. (write_integer): Same.
221 2005-10-03 Jakub Jelinek <jakub@redhat.com>
223 * runtime/memory.c (allocate_size): Malloc 1 byte if size == 0.
225 2005-10-03 Francois-Xavier Coudert <coudert@clipper.ens.fr>
229 * Makefile.am: Add generated files for large real and integers
230 kinds. Add a rule to create the kinds.inc c99_protos.inc files.
231 Use kinds.inc to preprocess Fortran generated files.
232 * libgfortran.h: Add macro definitions for GFC_INTEGER_16_HUGE,
233 GFC_REAL_10_HUGE and GFC_REAL_16_HUGE. Add types gfc_array_i16,
234 gfc_array_r10, gfc_array_r16, gfc_array_c10, gfc_array_c16,
236 * mk-kinds-h.sh: Define macros HAVE_GFC_LOGICAL_* and
237 HAVE_GFC_COMPLEX_* when these types are available.
238 * intrinsics/ishftc.c (ishftc16): New function for GFC_INTEGER_16.
239 * m4/all.m4, m4/any.m4, m4/count.m4, m4/cshift1.m4, m4/dotprod.m4,
240 m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4, m4/eoshift3.m4,
241 m4/exponent.m4, m4/fraction.m4, m4/in_pack.m4, m4/in_unpack.m4,
242 m4/matmul.m4, m4/matmull.m4, m4/maxloc0.m4, m4/maxloc1.m4,
243 m4/maxval.m4, m4/minloc0.m4, m4/minloc1.m4, m4/minval.m4, m4/mtype.m4,
244 m4/nearest.m4, m4/pow.m4, m4/product.m4, m4/reshape.m4,
245 m4/set_exponent.m4, m4/shape.m4, m4/specific.m4, m4/specific2.m4,
246 m4/sum.m4, m4/transpose.m4: Protect generated functions with
247 appropriate "#if defined (HAVE_GFC_type_kind)" preprocessor directives.
248 * Makefile.in: Regenerate.
249 * all files in generated/: Regenerate.
251 2005-10-01 Jakub Jelinek <jakub@redhat.com>
253 * runtime/memory.c (malloc_t): Remove.
254 (GFC_MALLOC_MAGIC, HEADER_SIZE, DATA_POINTER, DATA_HEADER): Remove.
255 (mem_root, runtime_cleanup, malloc_with_header): Remove.
256 (internal_malloc_size): Use just get_mem if size != 0, return NULL
258 (internal_free): Just free if non-NULL.
259 (internal_realloc_size): Remove debugging stuff.
260 (allocate_size): Use malloc directly, remove debugging stuff.
261 (deallocate): Use free directly, fix error message wording.
263 * libgfortran.h (GFC_ITOA_BUF_SIZE, GFC_XTOA_BUF_SIZE,
264 GFC_OTOA_BUF_SIZE, GFC_BTOA_BUF_SIZE): Define.
265 (gfc_itoa, xtoa): Add 2 extra arguments.
266 * runtime/environ.c: Include stdio.h.
267 (check_buffered): Use sprintf.
268 * runtime/error.c: Include assert.h.
269 (gfc_itoa, xtoa): Add 2 extra arguments, avoid using static
271 (st_printf, st_sprintf): Adjust callers.
272 * io/write.c (otoa, btoa): Add 2 extra arguments, avoid using
274 (write_int, write_decimal): Add 2 extra arguments to conv
275 function pointer, adjust caller.
276 (write_integer): Adjust gfc_itoa caller.
278 * io/unit.c (get_array_unit_len): Return 0 rather than NULL.
280 * io/read.c (read_f): Remove spurious pointer dereference.
282 2005-09-30 Janne Blomqvist <jblomqvi@cc.hut.fi>
285 * io/open.c (edit_modes): Check for correct flag.
287 2005-09-29 Jakub Jelinek <jakub@redhat.com>
289 * runtime/string.c (find_option): Change 3rd argument to
291 * libgfortran.h (find_option): Likewise.
292 * runtime/environ.c (rounding, precision, signal_choices): Constify.
293 (init_choice, show_choice): Change 2nd argument to const choice *.
294 * io/open.c (access_opt, action_opt, blank_opt, delim_opt, form_opt,
295 position_opt, status_opt, pad_opt): Constify.
296 * io/transfer.c (advance_opt): Likewise.
297 * io/inquire.c (undefined): Likewise.
298 * io/close.c (status_opt): Likewise.
299 * io/format.c (posint_required, period_required, nonneg_required,
300 unexpected_element, unexpected_end, bad_string, bad_hollerith,
301 reversion_error): Likewise.
302 * io/unix.c (yes, no, unknown): Change from const char *
305 2005-09-27 Steve Ellcey <sje@cup.hp.com>
308 * acinclude.m4 (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE): New.
309 (LIBGFOR_CHECK_FOR_BROKEN_ISNAN): New.
310 (LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): New.
311 * configure.ac (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE): Add use.
312 (LIBGFOR_CHECK_FOR_BROKEN_ISNAN): Add use.
313 (LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): Add use.
314 * configure: Regenerate.
315 * config.h.in: Regenerate.
316 * libgfortan.h (isfinite): undef if broken, set if needed.
317 (isnan): undef if broken, set if needed.
318 (fpclassify): undef if broken, set if needed.
319 * io/write.c: Remove TODO comment about working isfinite.
320 * intrinsics/c99_functions.c (round): Use isfinite instead
322 * intrinsics/c99_functions.c (roundf): Ditto.
324 2005-09-24 Janne Blomqvist <jblomqvi@cc.hut.fi>
326 * io.h: Changed prototypes of list_formatted_{read|write}.
327 * list_read.c (list_formatted_read): Renamed to
328 list_formatted_read_scalar and made static.
329 (list_formatted_read): New function.
330 * transfer.c: Prototype for transfer_array. Changed transfer
332 (unformatted_read): Add nelems argument, use it.
333 (unformatted_write): Likewise.
334 (formatted_transfer): Changed name to formatted_transfer_scalar.
335 (formatted_transfer): New function.
336 (transfer_integer): Add nelems argument to transfer call, move
337 updating item count to transfer functions.
338 (transfer_real): Likewise.
339 (transfer_logical): Likewise.
340 (transfer_character): Likewise.
341 (transfer_complex): Likewise.
342 (transfer_array): New function.
343 (data_transfer_init): Call formatted_transfer with new argument.
344 (iolength_transfer): New argument, use it.
345 * write.c (list_formatted_write): Renamed to
346 list_formatted_write_scalar, made static.
347 (list_formatted_write): New function.
349 2005-09-26 David Edelsohn <edelsohn@gnu.org>
351 * configure.ac: Add check for __clog.
352 * configure: Regenerate.
354 2005-09-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
356 * c99_protos.h: Add prototypes for C99 complex functions.
357 * libgfortran.h: Include complex.h before c99_protos.h.
358 * intrinsics/c99_functions.c: Define HAVE_ macros for the
359 fallback functions we provide.
360 (cabsf, cabs, cabsl, cargf, carg, cargl, cexpf, cexp, cexpl,
361 clogf, clog, clogl, clog10f, clog10, clog10l, cpowf, cpow, cpowl,
362 cqsrtf, csqrt, csqrtl, csinhf, csinh, csinhl, ccoshf, ccosh,
363 ccoshl, ctanhf, ctanh, ctanhl, csinf, csin, csinl, ccosf, ccos,
364 ccosl, ctanf, ctan, ctanl): New fallback functions.
365 * Makefile.am (gfor_math_trig_c, gfor_math_trig_obj,
366 gfor_specific_c, gfor_cmath_src, gfor_cmath_obj): Remove.
367 * Makefile.in: Regenerate.
368 * configure.ac: Remove checks for csin. Add checks for all C99
370 * config.h.in: Regenerate.
371 * configure: Regenerate.
372 * aclocal.m4: Regenerate.
374 2005-09-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
375 Danny Smith <dannysmith@users.sourceforge.net>
378 * intrinsics/getXid.c: Add getpid wrapper for MinGW.
379 * intrinsics/getlog.c: Add getlogin wrapper for MinGW.
380 * intrinsics/hostnm.c: Add gethostname wrapper for MinGW.
382 2005-09-24 Francois-Xavier Coudert <coudert@clipper.ens.fr>
385 * intrinsics/sleep.c: Add correct sleep macro for MinGW.
387 2005-09-24 Francois-Xavier Coudert <coudert@clipper.ens.fr>
390 * intrinsics/cpu_time.c (__cpu_time_1): Provide a MS Windows
393 2005-09-14 Jerry DeLisle <jvdelisle@verizon.net
395 PR fortran/21875 Internal Unit Array I/O, NIST
396 * libgfortran.h: Add run time error code for array stride.
397 * runtime/error.c (translate_error): Add error message for
399 * io/io.h: Add array descriptor pointer to IOPARM structure.
400 Add prtotypes for two new functions.
401 * io/transfer.c (data_transfer_init): Removed initialization and
402 moved to unit.c (get_unit)
403 * io/transfer.c (next_record_r): Include internal unit read
405 * io/transfer.c (next_record_w): Include internal unit write
406 functionality, including padding of character array records.
407 * io/unit.c (get_array_unit_len): New function to return the number
408 of records in the character array 'file' from the array descriptor.
409 * io/unit.c (get_unit): Gathered initialization code from
410 init_data_transfer for internal units and added initialization of
411 character array unit.
412 * io/unit.c (is_array_io): New function to determine if internal unit
414 * io/unix.c (mem_alloc_w_at): Add error checks for bad record length
417 2005-09-13 Richard Sandiford <richard@codesourcery.com>
420 * intrinsics/cshift0.c (cshift0): Add an extra size argument.
421 (cshift0_1, cshift0_2, cshift0_4, cshift0_8): Replace explicit
422 implementations with...
423 (DEFINE_CSHIFT): ...this new macro. Define character versions too.
424 * intrinsics/eoshift0.c (zeros): Delete.
425 (eoshift0): Add extra size and filler arguments. Use memset if no
427 (eoshift0_1, eoshift0_2, eoshift0_4, eoshift0_8): Replace explicit
428 implementations with...
429 (DEFINE_EOSHIFT): ...this new macro. Define character versions too.
430 * intrinsics/eoshift2.c (zeros): Delete.
431 (eoshift2): Add extra size and filler arguments. Use memset if no
433 (eoshift2_1, eoshift2_2, eoshift2_4, eoshift2_8): Replace explicit
434 implementations with...
435 (DEFINE_EOSHIFT): ...this new macro. Define character versions too.
436 * intrinsics/pack.c (pack_internal): New static function, reusing
437 the contents of pack and adding an extra size argument. Change
438 "mptr" rather than "m" when calculating the array size.
439 (pack): Redefine as a forwarder to pack_internal.
440 (pack_s_internal): New static function, reusing the contents of
441 pack_s and adding an extra size argument.
442 (pack_s): Redefine as a forwarder to pack_s_internal.
443 (pack_char, pack_s_char): New functions.
444 * intrinsics/reshape.c (reshape_internal): New static function,
445 reusing the contents of reshape and adding an extra size argument.
446 (reshape): Redefine as a forwarder to reshape_internal.
447 (reshape_char): New function.
448 * intrinsics/spread.c (spread_internal): New static function,
449 reusing the contents of spread and adding an extra size argument.
450 (spread): Redefine as a forwarder to spread_internal.
451 (spread_char): New function.
452 * intrinsics/transpose.c (transpose_internal): New static function,
453 reusing the contents of transpose and adding an extra size argument.
454 (transpose): Redefine as a forwarder to transpose_internal.
455 (transpose_char): New function.
456 * intrinsics/unpack.c (unpack_internal): New static function, reusing
457 the contents of unpack1 and adding extra size and fsize arguments.
458 (unpack1): Redefine as a forwarder to unpack_internal.
459 (unpack0): Call unpack_internal instead of unpack1.
460 (unpack1_char, unpack0_char): New functions.
461 * m4/cshift1.m4 (cshift1): New static function, reusing the contents
462 of cshift1_<kind> and adding an extra size argument.
463 (cshift1_<kind>): Redefine as a forwarder to cshift1.
464 (cshift1_<kind>_char): New function.
465 * m4/eoshift1.m4 (zeros): Delete.
466 (eoshift1): New static function, reusing the contents of
467 eoshift1_<kind> and adding extra size and filler arguments.
468 Fix calculation of hstride. Use memset if no bound is provided.
469 (eoshift1_<kind>): Redefine as a forwarder to eoshift1.
470 (eoshift1_<kind>_char): New function.
471 * m4/eoshift3.m4 (zeros): Delete.
472 (eoshift3): New static function, reusing the contents of
473 eoshift3_<kind> and adding extra size and filler arguments.
474 Use memset if no bound is provided.
475 (eoshift3_<kind>): Redefine as a forwarder to eoshift3.
476 (eoshift3_<kind>_char): New function.
477 * generated/cshift1_4.c, generated/cshift1_8.c,
478 * generated/eoshift1_4.c, generated/eoshift1_8.c,
479 * generated/eoshift3_4.c, generated/eoshift3_8.c: Regenerate.
481 2005-09-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
484 * io/unix.c (is_preconnected): Add function to test if a stream
485 corresponds to a preconnected unit.
486 * io/io.h: Add prototype for is_preconnected.
487 * io/transfer.c (data_transfer_init): Do not truncate
490 2005-09-10 Janne Blomqvist <jblomqvi@cc.hut.fi>
492 * io/unix.c: Remove mmap code.
494 2005-09-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
497 * io/close.c (st_close): Call library_end even in case of error.
499 2005-09-09 Thomas Koenig <Thomas.Koenig@online.de>
501 * io/io.h: Add iomsg as last field of st_parameter.
502 * runtime/error.c (generate_error): If iomsg is present, copy
505 2005-09-09 Richard Sandiford <richard@codesourcery.com>
508 * runtime/memory.c (internal_malloc_size): Return a null pointer
510 (internal_free): Do nothing if the pointer is null.
511 (internal_realloc_size, internal_realloc, internal_realloc64): New.
513 2005-09-07 Francois-Xavier Coudert <coudert@clipper.ens.fr>
516 * acinclude.m4 (LIBGFOR_CHECK_CRLF): New check.
517 * configure.ac: Use new check.
518 * configure.in: Regenerate.
519 * config.h.in: Regenerate.
520 * configure: Regenerate.
521 * io/transfer.c (next_record_w): Add case for CRLF as line
523 * io/unix.c (tempfile, regular_file): Open files with
524 O_BINARY on systems with CRLF.
526 2005-09-07 Steve Ellcey <sje@cup.hp.com>
529 * io/write.c (extract_int): Use memcpy to access buffer.
530 (extract_uint): Ditto.
531 (extract_real): Ditto.
533 2005-09-05 Thomas Koenig <Thomas.Koenig@online.de>
535 * io/list_read.c: Adjust size of of value to 32 (to hold
536 kind=16 complex values).
538 2005-09-04 Thomas Koenig <Thomas.Koenig@online.de>
541 * io/transfer.c(data_transfer_init): Check for a too-large
542 record number. Return if sseek failed.
544 2005-09-03 Jakub Jelinek <jakub@redhat.com>
546 * io/read.c (read_x): Take int argument instead of fnode * and
547 digging the N from F->u.n.
548 * io/io.h (read_x): Adjust prototype.
549 * io/transfer.c (formatted_transfer): Adjust callers. Don't clobber
552 2005-09-02 Francois-Xavier Coudert <coudert@clipper.ens.fr>
554 * io/unix.c (stream_ttyname): Protect use of ttyname by
556 * configure.ac: Add check for ttyname.
557 * config.h.in: Regenerate.
558 * configure: Regenerate.
560 2005-09-02 Andreas Jaeger <aj@suse.de>
562 * libgfortran.h: Add prototype for init_compile_options.
564 * io/io.h: Add prototype for notify_std.
566 2005-08-31 Steve Ellcey <sje@cup.hp.com>
568 * io/read.c (set_integer): Use memcpy to fill buffer.
570 2005-08-31 Steve Ellcey <sje@cup.hp.com>
573 * io/read.c (convert_real): Use memcpy to fill buffer.
575 2005-08-29 Thomas Koenig <Thomas.Koenig@online.de>
578 * io/lock.c(library_start): If ioparm.iostat is present, clear
581 2005-08-27 Francois-Xavier Coudert <coudert@clipper.ens.fr>
583 * acinclude.m4 (LIBGFOR_CHECK_UNLINK_OPEN_FILE): Add check to see
584 if target can unlink open files.
585 * configure.ac: Use this new test.
586 * config.h.in: Regenerate.
587 * configure: Regenerate.
588 * Makefile.in: Regenerate.
589 * aclocal.ac: Regenerate.
590 * io/io.h: Add prototype for unpack_filename.
591 * io/close.c (st_close): Delete file after closing unit if
592 HAVE_UNLINK_OPEN_FILE is not defined.
593 * io/unix.c (unpack_filename): Unlink scratch file after opening
594 it only if HAVE_UNLINK_OPEN_FILE is defined.
596 2005-08-17 Kelley Cook <kcook@gcc.gnu.org>
598 * All files: Update FSF address.
600 2005-08-16 Thomas Koenig <Thomas.Koenig@online.de>
603 * io/transfer.c (iolength_transfer): Remove __attribute__ ((unused))
604 from type. Return correct length for inquire(iolength=)
605 for complex variables.
607 2005-08-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
608 Steven Bosscher <stevenb@suse.de>
611 * Makefile.am: Add file runtime/compile_options.c.
612 * Makefile.in: Regenerate.
613 * libgfortran.h: Create structure compile_options_t. Define the
614 compile_options variable and GFC_STD_ macros.
615 * runtime/compile_options.c: New file.
616 * runtime/error.c (notify_std): New function.
617 * runtime/main.c (init): Call init_compile_options during
619 * io/format.c: Use the new notify_std function for the $
620 descriptor extension.
622 2005-08-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
623 * Makefile.am: Add file intrinsics/tty.c to Makefile process.
624 * Makefile.in: Regenerate.
625 * io/io.h: Prototypes for new functions stream_isatty and
627 * io/unix (stream_isatty, stream_ttyname): New functions to call
628 isatty() and ttyname() on a given unit.
629 * intrinsics/tty.c: New file to implement g77 intrinsics TTYNAM
632 2005-08-08 Jerry DeLisle <jvdelisle@verizon.net>
635 * io/transfer.c (data_transfer_init): Initialize
636 current_unit->bytes_left for a read.
638 2005-08-07 Janne Blomqvist <jblomqvi@cc.hut.fi>
641 * io/backspace.c: File removed, contents moved to ...
642 * io/endfile.c: Ditto.
643 * io/rewind.c: Ditto.
644 * io/file_pos.c: New file, ... here.
645 * Makefile.am: Add file_pos.c to list, remove obsolete files.
646 * Makefile.in: Regenerated.
648 2005-08-07 Francois-Xavier Coudert <coudert@clipper.ens.fr>
650 * io/io.h: Change DEFAULT_TEMPDIR to /tmp instead of /var/tmp.
651 * io/unix.c (tempfile): Look at the TEMP environment variable
652 to find the temporary files directory. Whitespace correction.
654 2005-08-06 Francois-Xavier Coudert <coudert@clipper.ens.fr>
656 * io/unix.c: Add O_RDWR to open() call.
658 2005-08-04 Paul Thomas <pault@gcc.gnu.org>
660 * transfer.c (data_transfer_init): Truncate file in
661 sequential WRITE when last_record == 0, rather than
662 current_record. Cures problem on RH9.
664 2005-08-03 Francois-Xavier Coudert <coudert@clipper.ens.fr>
666 * libgfortran.h: When isfinite is not provided by the system,
667 define it as a macro, so that it can accept any floating point
670 2005-08-01 Francois-Xavier Coudert <coudert@clipper.ens.fr>
673 * intrinsics/flush.c (flush_i8): Add function flush_i8. Update
676 2005-07-31 Francois-Xavier Coudert <coudert@clipper.ens.fr>
679 * intrinsics/abort.c (abort): Close units before aborting.
680 Updated copyright years.
682 2005-07-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
685 * io/write.c (write_real): Add default formats for real(10) and
688 2005-07-30 Paul Thomas <pault@gcc.gnu.org>
690 PR fortran/22570 and related issues.
691 * transfer.c (formatted_transfer): Make sure that there
692 really is data present before X- or T- editing. Move all
693 treatment of tabbing during writes to start of next data
694 producing format. Suppress incorrect zeroing of bytes_left
695 in slash formating. Insert int cast for assignment of a
696 difference of two gfc_offsets.
698 2005-07-23 Jerry DeLisle <jvdelisle@verizon.net>
700 * io/write.c (write_float): Revise output of IEEE exceptional
701 values to comply with F95 and F2003 standards.
703 2005-07-22 Jerry DeLisle <jvdelisle@verizon.net>
706 * io/unit.c (init_units): Replace BLANK_ZERO with
709 2005-07-22 Jerry DeLisle <jvdelisle@verizon.net>
711 PR libfortran/21875 (FM111.f)
712 * io/read.c (next_char): Return a ' ' character when BLANK_ZERO
713 or BLANK_NULL are active.
714 (read_decimal): Interpret ' ' character correctly for BZ or BN.
715 (read_radix): Interpret ' ' character correctly for BZ or BN.
716 (read_f): Interpret ' ' character correctly for BZ or BN.
718 2005-07-22 Paul Thomas <pault@gcc.gnu.org>
721 * read.c (read_x): Correct the condition for doing the
722 x-editing during formatted input.
723 * transfer.c (formatted_transfer): Cast offset difference
724 as int, clean-up arithmetic with new variable, bytes_used,
725 zero counters for FMT_SLASH,
726 (data_transfer_init) Zero X- and T-editing counters
728 (next_record_w) Zero X- and T-editing counters.
731 2005-07-17 Jerry DeLisle <jvdelisle@verizon.net>
733 * io/write.c (write_float): Fix field width checks for
734 printing 'Infinity' or 'Inf'.
735 (output_float): Fix typo in comment.
737 2005-07-12 Paul Thomas <pault@gcc.gnu.org>
740 * transfer.c (formatted_transfer): Correct the problems
741 with X- and T-editting that caused TLs followed by TRs
742 to overwrite data, which caused NIST FM908.FOR to fail
744 (data_transfer_init): Zero X- and T-editting counters at
745 the start of formatted IO.
746 * write.c (write_x): Write specified number of skips with
747 specified number of spaces at the end.
749 2005-07-13 Paul Thomas <pault@gcc.gnu.org>
751 * io/read.c (read_complex): Prevent X formatting during reads
752 from going beyond EOR to fix NIST fm908.FOR failure.
753 * io/list_read.c (read_complex): Allow complex data in list-
754 directed reads to have eols either side of the comma to
755 fix NIST FM906.FOR failure.
757 2005-07-12 Thomas Koenig <Thomas.Koenig@online.de>
760 * io/unix.c: Add member special_file to type unix_stream.
761 (fd_truncate): Don't call ftruncate or chsize if
762 s refers to a special file.
763 (fd_to_stream): initialize s->special_file.
765 2005-07-11 David Edelsohn <edelsohn@gnu.org>
768 * io/write.c (otoa): Bias p by SCRATCH_SIZE, not
769 sizeof (SCRATCH_SIZE).
772 2005-07-09 Jerry DeLisle <jvdelisle@verizon.net>
774 PR libfortran/21875 (FM111.f)
775 * io/read.c (next_char): Return a ' ' character when BLANK_ZERO or
776 BLANK_NULL are active.
777 (read_decimal): Interpret ' ' character correctly for BZ or BN.
778 (read_radix): Interpret ' ' character correctly for BZ or BN.
779 (read_f): Interpret ' ' character correctly for BZ or BN.
780 * gfortran.dg/test (fmt_read_bz_bn.f90): New test case.
782 2005-07-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
783 Thomas Koenig <Thomas.Koenig@online.de>
786 * io/write.c (extract_unit): New function; extract
787 ints as unsigned signed int of the correct size.
789 * runtime/error.c: Adjust copyright years.
790 Adjust size of buffer to maximum that can occur.
792 2005-07-07 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
794 * libgfortran.h (GFC_ARRAY_DESCRIPTOR): Replace 'type *base' by
796 * intrinsics/cshift0.c, intrinsics/eoshift0.c,
797 intrinsics/eoshift2.c,intrinsics/pack_generic.c,
798 intrinsics/reshape_generic.c, intrinsics/spread_generic.c,
799 intrinsics/transpose_generic.c, intrinsics/unpack_generic,
800 m4/cshift1.m4, m4/eoshift1.m4, m4/eoshift3.m4, m4/iforeach.m4,
801 m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4, m4/reshape.m4,
802 m4,transpose.m4: Set renamed field 'offset' to zero instead of
804 * generated/all_l4.c, generated/all_l8.c,
805 generated/any_l4.c, generated/any_l8.c, generated/count_4_l4.c,
806 generated/count_4_l8.c, generated/count_8_l4.c,
807 generated/count_8_l8.c, generated/chift1_4.c,
808 generated/cshift1_8.c, generated/eoshift1_4.c,
809 generated/eoshift1_8.c, generated/eoshift3_4.c,
810 generated/eoshift3_8.c, generated/matmul_c4.c,
811 generated/matmul_c8.c, generated/matmul_i4.c, matmul_i8.c,
812 generated/matmul_l4.c, generated/matmul_l8.c,
813 generated/matmul_r4.c, generated/matmul_r8.c,
814 generated/maxloc0_4_i4.c, generated/maxloc0_4_i8.c,
815 generated/maxloc0_4_r4.c, generated/maxloc0_4_r8.c,
816 generated/maxloc0_8_i4.c, generated/maxloc0_8_i8.c,
817 generated/maxloc0_8_r4.c, generated/maxloc0_8_r8.c,
818 generated/maxloc1_4_i4.c, generated/maxloc1_4_i8.c,
819 generated/maxloc1_4_r4.c, generated/maxloc1_4_r8.c,
820 generated/maxloc1_8_i4.c, generated/maxloc1_8_i8.c,
821 generated/maxloc1_8_r4.c, generated/maxloc1_8_r8.c,
822 generated/maxval_i4.c, generated/maxval_i8.c,
823 generated/maxval_r4.c, generated/maxval_r8.c,
824 generated/minloc0_4_i4.c, generated/minloc0_4_i8.c,
825 generated/minloc0_4_r4.c, generated/minloc0_4_r8.c,
826 generated/minloc0_8_i4.c, generated/minloc0_8_i8.c,
827 generated/minloc0_8_r4.c, generated/minloc0_8_r8.c,
828 generated/minloc1_4_i4.c, generated/minloc1_4_i8.c,
829 generated/minloc1_4_r4.c, generated/minloc1_4_r8.c,
830 generated/minloc1_8_i4.c, generated/minloc1_8_i8.c,
831 generated/minloc1_8_r4.c, generated/minloc1_8_r8.c,
832 generated/minval_i4.c, generated/minval_i8.c,
833 generated/minval_r4.c, generated/minval_r8.c,
834 generated/product_c4.c, generated/product_c8.c,
835 generated/product_i4.c, generated/product_i8.c,
836 generated/product_r4.c, generated/product_r8.c,
837 generated/reshape_c4.c, generated/reshape_c8.c,
838 generated/reshape_i4.c, generated/reshape_i8.c,
839 generated/sum_c4.c, generated/sum_c8.c, generated/sum_i4.c,
840 generated/sum_i8.c, generated/sum_r4.c, generated/sum_r8.c,
841 generated/transpose_c4.c, generated/transpose_c8.c,
842 generated/transpose_i4.c, generated/transpose_i8.c: Regenerate:
844 2005-07-07 Thomas Koenig <Thomas.Koenig@online.de>
847 * intrinsics/eoshift0.c: If abs(shift) > len, fill the
848 the whole array with the boundary value, but don't overrun it.
849 * intrinsics/eoshift2.c: Likewise.
850 * m4/eoshift1.m4: Likewise.
851 * m4/eoshift3.m4: Likewise.
852 * generated/eoshift1_4.c: Regenerated.
853 * generated/eoshift1_8.c: Regenerated.
854 * generated/eoshift3_4.c: Regenerated.
855 * generated/eoshift3_8.c: Regenerated.
857 2005-07-07 Feng Wang <fengwang@nudt.edu.cn>
860 * io/transfer.c (formatted_transfer): Enable FMT_A on other types to
861 support Hollerith constants.
863 2005-07-01 Andreas Jaeger <aj@suse.de>
865 * intrinsics/unpack_generic.c: Remove const from parameter.
867 * io/transfer.c (formatted_transfer): Remove unused variable.
869 2005-06-28 Thomas Koenig <Thomas.Koenig@online.de>
872 * m4/eoshift1.m4: Correct bstride (it needs to be multiplied
873 by size since it's a char pointer).
874 * m4/eoshift1_4.c: Regenerated.
875 * m4/eoshift1_8.c: Regenerated.
877 2005-06-28 Thomas Koenig <Thomas.Koenig@online.de>
880 * m4/eoshift3.m4: Correct bstride (it needs to be multiplied
881 by size since it's a char pointer).
882 * m4/eoshift3_4.c: Regenerated.
883 * m4/eoshift3_8.c: Regenerated.
885 2005-06-28 Francois-Xavier Coudert <coudert@clipper.ens.fr>
888 * io/transfer.c (formatted_transfer): Do not iterate on the
889 repeat count of a FMT_SLASH, since this is already done in
892 2005-06-25 Thomas Koenig <Thomas.Koenig@online.de>
895 * m4/cshift1.m4: Remove const from argument ret.
896 Populate return array descriptor if ret->data is NULL.
897 * m4/eoshift1.m4: Likewise.
898 * m4/eoshift3.m4: Likewise.
899 * generated/cshift1_4.c: Regenerated.
900 * generated/cshift1_8.c: Regenerated.
901 * generated/eoshift1_4.c: Regenerated.
902 * generated/eoshift1_8.c: Regenerated.
903 * generated/eoshift3_4.c: Regenerated.
904 * generated/eoshift3_8.c: Regenerated.
906 2005-06-24 Jerry DeLisle <jvdelisle@verizon.net>
909 * Makefile.am: Include intrinsics/hyper.c.
910 * c99_protos.h: Add prototypes for single precision versions of
911 acosh, asinh, and atanh for platforms that do not have these.
912 * config.h.in: Add #undef for wrappers.
913 * configure.ac: Add checks for single precision versions.
914 * aclocal.m4: Regenerated.
915 * Makefile.in: Regenerated.
916 * configure: Regenerated.
917 * intrinsics/hyper.c: New file, adds new wrapper functions.
919 2005-06-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
921 * intrinsics/c99_functions.c (log10l): New log10l function for
922 systems where this is not available.
923 * c99_protos.h: Prototype for log10l function.
924 * libgfortran.h: Use generated kinds.h to define GFC_INTEGER_*,
925 GFC_UINTEGER_*, GFC_LOGICAL_*, GFC_REAL_*, GFC_COMPLEX_*. Update
926 prototypes for gfc_itoa and xtoa.
927 * io/io.h: Update prototypes for set_integer and max_value.
928 * io/list_read.c (convert_integer): Use new
929 GFC_(INTEGER|REAL)_LARGEST type.
930 * io/read.c (set_integer): Likewise.
931 (max_value): Likewise.
932 (convert_real): Likewise.
934 (next_char): Likewise.
935 (read_decimal): Likewise.
936 (read_radix): Likewise.
938 * io/write.c (extract_int): Use new GFC_INTEGER_LARGEST type.
939 (extract_real): Use new GFC_REAL_LARGEST type.
940 (calculate_exp): Likewise.
941 (calculate_G_format): Likewise.
942 (output_float): Likewise. Use log10l for long double values.
943 Add comment for sprintf format. Use GFC_REAL_LARGEST_FORMAT.
944 (write_l): Use new GFC_INTEGER_LARGEST type.
945 (write_float): Use new GFC_REAL_LARGEST type.
946 (write_int): Remove useless special case for (len < 8).
947 (write_decimal): Use GFC_INTEGER_LARGEST.
948 (otoa): Use GFC_UINTEGER_LARGEST as argument.
949 (btoa): Use GFC_UINTEGER_LARGEST as argument.
950 * runtime/error.c (gfc_itoa): Use GFC_INTEGER_LARGEST as
952 (xtoa): Use GFC_UINTEGER_LARGEST as argument.
953 * Makefile.am: Use mk-kinds-h.sh to generate header kinds.h
954 with all Fortran kinds available.
955 * configure.ac: Check for strtold and log10l.
956 * Makefile.in: Regenerate.
957 * aclocal.m4: Regenerate.
958 * configure: Regenerate.
959 * config.h.in: Regenerate.
960 * mk-kinds-h.sh: Configuration script for available integer
964 2005-06-18 Janne Blomqvist <jblomqvi@cc.hut.fi>
966 * unix.c (stream_at_bof): Don't assume that all non-mmapped files
968 (stream_at_eof): Likewise.
970 2005-06-18 Francois-Xavier Coudert <coudert@clipper.ens.fr>
973 * io/read.c (convert_real): strtod can set errno to EINVAL on an
974 empty string, but we shouldn't have an error in that case.
976 2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
979 * io/list_read.c (eat_separator): No need to call next_record,
980 even in non-namelist_mode.
982 2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
984 * io/transfer.c (formatted_transfer): Fix typo in error message.
986 2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
989 * io/transfer.c (read_sf): Correct updating of bytes_left field.
990 (formatted_transfer): Correct updating of bytes_left field and
991 reformatting code (comments and whitespace).
992 * io/unix.c (move_pos_offset): "active" field should not be
993 changed here. Whitespace corrections.
995 2005-06-15 Francois-Xavier Coudert <coudert@clipper.ens.fr>
998 * intrinsics/c99_functions.c (scalbn): Provide fallback
999 implementation for scalbn.
1000 * c99_protos.h: Prototype for scalbn.
1001 * configure.ac: Add check for scalbn.
1002 * configure: Regenerate.
1003 * config.h.in: Regenerate.
1005 2005-06-14 Thomas Koenig <Thomas.Koenig@online.de>
1007 * intrinsics/eoshift0.c: Removed prototype for eoshift0.
1008 * intrinsics/eoshift2.c: Removed prototype for eoshift2.
1010 2005-06-14 Tom Tromey <tromey@redhat.com>
1013 * configure, aclocal.m4, Makefile.in: Rebuilt.
1015 2005-06-12 Thomas Koenig <Thomas.Koenig@online.de>
1018 * intrinsics/eoshift0.c: Add prototype for eoshift0.
1019 * intrinsics/eoshift2.c: Add prototype for eoshift2.
1021 2005-06-12 Steven G. Kargl <kargls@comcast.net>
1022 Thomas Koenig <Thomas.Koenig@online.de>
1024 PR libfortran/PR21797
1025 * m4/cexp.m4 (csqrt`'q): Add type qualifyer to
1027 * generated/exp_c4.c: Regenerated.
1029 2005-06-12 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1032 * io/read.c (read_f): Take care of spaces after initial sign.
1034 2005-06-11 Thomas Koenig <Thomas.Koenig@onlinde.de>
1037 * Makefile.am: Add in_pack_c4.c, in_pack_c8.c, in_unpack_c4.c
1039 * Makefile.in: Regenerate.
1040 * libgfortran.h: Declare internal_pack_c4, internal_pack_c8,
1041 internal_unpack_c4 and internal_unpack_c8.
1042 * m4/in_pack.m4: Use rtype_ccode insteald of rtype_kind
1044 Use sizeof (rtype_name) as size for memory allocation.
1045 * m4/in_unpack.m4: Use rtype_ccode insteald of rtype_kind
1047 Use sizeof (rtype_name) for calculation of sizes for memcpy.
1048 * runtime/in_pack_generic.c: For real, integer and logical
1049 call internal_pack_4 if size==4 and internal_pack_8 if
1051 For complex, call internal_pack_c4 if size==8 and
1052 internal_pack_c8 if size==16.
1053 * runtime/in_unpack_generic.c: For real, integer and logical
1054 call internal_unpack_4 if size==4 and internal_unpack_8 if
1056 For complex, call internal_unpack_c4 if size==8 and
1057 internal_unpack_c8 if size==16.
1058 * generated/in_pack_i4.c: Regenerated.
1059 * generated/in_pack_i8.c: Regenerated.
1060 * generated/in_unpack_i4.c: Regenerated.
1061 * generated/in_unpack_i8.c: Regenerated.
1062 * generated/in_pack_c4.c: New file.
1063 * generated/in_pack_c8.c: New file.
1064 * generated/in_unpack_c4.c: New file.
1065 * generated/in_unpack_c8.c: New file.
1067 2005-06-09 Thomas Koenig <Thomas.Koenig@online.de>
1070 * m4/reshape.m4: Use sizeof (rtype_name) for sizes to be passed
1072 * generated/reshape_c4.c: Regenerated.
1073 * generated/reshape_c8.c: Regenerated.
1074 * generated/reshape_i4.c: Regenerated.
1075 * generated/reshape_i8.c: Regenerated.
1077 2005-06-07 Thomas Koenig <Thomas.Koenig@online.de>
1080 * m4/matmul.m4: Correct zeroing of result for non-packed
1081 arrays with lowest stride is one.
1082 * generated/matmul_c4.c: Regenerated.
1083 * generated/matmul_c8.c: Regenerated.
1084 * generated/matmul_i4.c: Regenerated.
1085 * generated/matmul_i8.c: Regenerated.
1086 * generated/matmul_r4.c: Regenerated.
1087 * generated/matmul_r8.c: Regenerated.
1089 2005-05-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1092 * io/unix.c (fd_close): Add test so that we don't close()
1095 2005-05-29 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1098 * io/format.c (parse_format_list): Set repeat count of $ format
1100 * io/transfer.c (read_sf): Add g.seen_dollar to the test
1101 concerning advancing I/O.
1102 (data_transfer_init): Likewise.
1103 (finalize_transfer): Likewise.
1105 2005-05-27 Thomas Koenig <Thomas.Koenig@online.de>
1107 * runtime/in_pack_generic.c: Adjust copyright years.
1108 (in_pack_generic): Change dimension of auxiliary arrays from
1109 GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
1110 * runtime/in_unpack_generic.c: Adjust copyright years.
1111 (in_unpack_generic): Change dimension of auxiliary arrays from
1112 GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
1114 2005-05-26 Thomas Koenig <Thomas.Koenig@online.de>
1117 * intrinsics/unpack_generic.c: Fix name of routine
1118 on top. Update copyright years.
1119 (unpack1): Remove const from return array descriptor.
1120 rs: New variable, for calculating return sizes.
1121 Populate return array descriptor if ret->data is NULL.
1123 2005-05-22 Peter Wainwright <prw@ceiriog1.demon.co.uk>
1126 * io/write.c (output_float): Rework logic to avoid call to log10
1127 with argument equal to zero.
1129 2005-05-21 Eric Botcazou <ebotcazou@libertysurf.fr>
1131 * configure.ac: Check for trunc and truncf in libm.
1132 * configure: Regenerate.
1133 * config.h.in: Likewise.
1134 * intrinsics/c99_functions.c (trunc, truncf): New functions.
1135 * c99_protos.h (trunc, truncf): Declare them.
1137 2005-05-18 Thomas Koenig <Thomas.Koenig@online.de>
1140 * Makefile.am: Really commit.
1141 * Makefile.in: Really commit.
1143 2005-05-18 Thomas Koenig <Thomas.Koenig@online.de>
1146 * Makefile.am: Add generated/reshape_c4.c and
1147 generated/reshape_c8.c.
1148 * Makefile.in: Regenerated.
1149 * m4/iparm.m4: Define rtype_ccode to be c4 or c8 for
1150 complex types, 4 or 8 otherwise.
1151 * m4/reshape.m4: Use rtype_ccode instead of rtype_kind
1153 * generated/reshape_c4.c: New file.
1154 * generated/reshape_c8.c: New file.
1156 2005-05-16 Andreas Jaeger <aj@suse.de>
1158 * configure.ac: Add additional warning flags.
1159 * configure: Regenerate.
1161 * io/write.c (calculate_G_format): Remove unused parameter.
1162 (output_float): Remove unused parameter.
1163 (write_float): Change callers.
1164 (nml_write_obj): Avoid signed warning.
1165 Make variable const to support -Wwrite-strings.
1167 * io/unix.c (fd_alloc, mmap_open, mmap_sfree, mem_sfree,
1168 mem_truncate): Mark argument as unused.
1170 * io/unit.c (get_unit): Mark argument as unused.
1171 (init_units): Avoid warning about signed comparision.
1173 * io/transfer.c (next_record_r): Remove unused parameter.
1174 (next_record_w): Remove unused parameter.
1175 (next_record): Change callers.
1176 (iolength_transfer): Mark arguments as unused.
1178 * io/open.c: Add initializer.
1180 * io/list_read.c (read_character): Mark argument as unused.
1181 (nml_match_name): Add const to make compile with -Wwrite-strings.
1183 * io/format.c: Add initializer.
1185 2005-05-15 Andreas Jaeger <aj@suse.de>
1187 * m4/eoshift1.m4: Initialize variables to avoid warnings.
1188 * m4/eoshift3.m4: Initialize variables to avoid warnings.
1189 * generated/eoshift1_4.c, generated/eoshift1_8.c,
1190 generated/eoshift3_4.c, generated/eoshift3_8.c: Regenerated.
1192 * intrinsics/spread_generic.c (spread): Initialize variables to
1195 * intrinsics/eoshift0.c (eoshift0): Initialize variables to avoid
1197 * intrinsics/eoshift2.c (eoshift2): Initialize variables to avoid
1200 * io/list_read.c (nml_get_obj_data): Initialize variables to avoid
1203 * intrinsics/pack_generic.c (pack): Remove unneeded calculation.
1205 * m4/matmull.m4 (matmul_): Remove unneeded calculations, fix
1206 pointer cast to avoid warning.
1207 * generated/matmul_l4.c: Regenerated.
1208 * generated/matmul_l8.c: Regenerated.
1210 * Makefile.am: Remove AM_CFLAGS here.
1211 * configure.ac: Define AM_CFLAGS and AM_FCFLAGS so that warnings
1212 are set. Set additionally -Wstrict-prototypes for CFLAGS.
1213 * Makefile.in: Regenerated.
1214 * aclocal.m4: Regenerated.
1215 * configure: Regenerated.
1217 * intrinsics/system_clock.c (system_clock_4, system_clock_8): Add
1218 missing returns, reformat a bit.
1220 * io/write.c (nml_write_obj): Use %d again - and cast to int,
1221 st_sprintf does not handle %ld.
1223 * io/unit.c (is_internal_unit): Add void as parameter list.
1225 * io/transfer.c: Move prototype declarations before the functions.
1227 * runtime/normalize.c (almostone_r4, almostone_r8): Fix parameter
1230 * intrinsics/random.c (KISS_DEFAULT_SEED): Remove extra semicolon.
1232 * io/transfer.c: Do not use empty initializers for global objects.
1233 Add missing initializers.
1235 * io/lock.c: Do not use empty initializers for global objects.
1237 * io/close.c: Add missing initializers.
1239 * runtime/environ.c: Add missing initializers. Do not use empty
1240 initializers for global object.
1241 (init_string): Mark argument as unused.
1243 * runtime/main.c (cleanup): Fix parameter list.
1245 * io/io.h: Fix parameter lists.
1247 * m4/transpose.m4, m4/matmul.m4: Fix pointer cast to avoid
1250 * generated/transpose_c4.c, generated/transpose_c8.c,
1251 generated/transpose_i4.c, generated/transpose_i8.c,
1252 generated/matmul_c4.c, generated/matmul_c8.c,
1253 generated/matmul_i4.c, generated/matmul_i8.c,
1254 generated/matmul_r4.c, generated/matmul_r8.c: Regenerated.
1256 * io/write.c (nml_write_obj): Fix 64-bit problem.
1258 * io/list_read.c (nml_get_obj_data): Add missing braces around
1259 initializer to avoid warnings.
1261 * intrinsics/etime.c (etime_sub): Remove unused variable.
1263 * intrinsics/chdir.c, intrinsics/getlog.c, intrinsics/link.c,
1264 intrinsics/symlnk.c, intrinsics/perror.c: Include <string.h> for
1267 * runtime/string.c (compare0): Remove unused variable.
1268 * io/unit.c (init_units): Remove unused variables.
1269 * intrinsics/getcwd.c (getcwd_i4_sub): Remove unused variable.
1270 * intrinsics/unlink.c (unlink_i4_sub): Remove unused variable.
1271 * intrinsics/stat.c (stat_i4_sub, fstat_i8_sub, fstat_i4_sub,
1272 stat_i8_sub): Remove unused variable.
1274 2005-05-12 Thomas Koenig <Thomas.Koenig@online.de>
1277 * runtime/memory.c: Don't define GFC_CLEAR_MEMORY (it's a
1279 * io/open.c (new_unit): Zero freshly allocated memory for
1281 * io/unit.c (init_units): Zero freshly allocated memory for
1282 STDIN, STDOUT and STDERR.
1283 * io/unix.c (open_internal): Zero freshly allocated memory
1285 (fd_to_stream): Likewise.
1287 2005-05-11 Bud Davis <bdavis@gfortran.org>
1290 * io/unix.c (fd_truncate): update positions when ftruncate
1291 fails (like writing to /dev/null).
1293 2005-05-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1296 * open.c (new_unit): Take care of the case where POSITION_APPEND
1297 is specified (sseek to the end, and set u>-endfile).
1299 2005-05-10 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1302 * Makefile.am (gfor_specific_src): Add 'intrinsics/f2c_intrinsics.F90'
1304 * Makefile.in: Regenerate.
1305 * intrinsics/f2c_specific.F90: New file.
1307 2005-05-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1310 * io/unix.c (fd_to_stream): Add an avoid_mmap argument indicating
1311 we don't we to mmap this stream. Use fd_open instead of mmap_open
1313 (open_external): Call fd_to_stream with avoid_mmap = 0.
1314 (input_stream): Call fd_to_stream with avoid_mmap = 1.
1315 (output_stream): Likewise.
1316 (error_stream): Likewise.
1318 2005-05-09 Mike Stump <mrs@apple.com>
1320 * configure: Regenerate.
1322 2005-05-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1325 * io/read.c (read_f): Accept 'e', 'E', 'd' and 'D' as first
1326 non-blank characters of a real number.
1328 2005-05-04 Thomas Koenig <Thomas.Koenig@online.de>
1331 * m4/cshift1.m4: Change dimension of auxiliary arrays from
1332 GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
1333 * m4/eoshift1.m4: Likewise.
1334 * m4/eoshift3.m4: Likewise.
1335 * m4/ifunction.m4: Likewise.
1336 * m4/in_pack.m4: Likewise.
1337 * m4/in_unpack.m4: Likewise.
1338 * intrinsics/cshift0.c: Likewise.
1339 * intrinsics/eoshift0.c: Likewise.
1340 * intrinsics/eoshift2.c: Likewise.
1341 * intrinsics/random.c: Likewise.
1342 * intrinsics/spread_generic.c: Likewise.
1343 * intrinsics/stat.c: Likewise.
1344 * generated/all_l4.c: Regenerated.
1345 * generated/all_l8.c: Regenerated.
1346 * generated/any_l4.c: Regenerated.
1347 * generated/any_l8.c: Regenerated.
1348 * generated/count_4_l4.c: Regenerated.
1349 * generated/count_4_l8.c: Regenerated.
1350 * generated/count_8_l4.c: Regenerated.
1351 * generated/count_8_l8.c: Regenerated.
1352 * generated/cshift1_4.c: Regenerated.
1353 * generated/cshift1_8.c: Regenerated.
1354 * generated/eoshift1_4.c: Regenerated.
1355 * generated/eoshift1_8.c: Regenerated.
1356 * generated/eoshift3_4.c: Regenerated.
1357 * generated/eoshift3_8.c: Regenerated.
1358 * generated/in_pack_i4.c: Regenerated.
1359 * generated/in_pack_i8.c: Regenerated.
1360 * generated/in_unpack_i4.c: Regenerated.
1361 * generated/in_unpack_i8.c: Regenerated.
1362 * generated/maxloc0_4_i4.c: Regenerated.
1363 * generated/maxloc0_4_i8.c: Regenerated.
1364 * generated/maxloc0_4_r4.c: Regenerated.
1365 * generated/maxloc0_4_r8.c: Regenerated.
1366 * generated/maxloc0_8_i4.c: Regenerated.
1367 * generated/maxloc0_8_i8.c: Regenerated.
1368 * generated/maxloc0_8_r4.c: Regenerated.
1369 * generated/maxloc0_8_r8.c: Regenerated.
1370 * generated/maxloc1_4_i4.c: Regenerated.
1371 * generated/maxloc1_4_i8.c: Regenerated.
1372 * generated/maxloc1_4_r4.c: Regenerated.
1373 * generated/maxloc1_4_r8.c: Regenerated.
1374 * generated/maxloc1_8_i4.c: Regenerated.
1375 * generated/maxloc1_8_i8.c: Regenerated.
1376 * generated/maxloc1_8_r4.c: Regenerated.
1377 * generated/maxloc1_8_r8.c: Regenerated.
1378 * generated/maxval_i4.c: Regenerated.
1379 * generated/maxval_i8.c: Regenerated.
1380 * generated/maxval_r4.c: Regenerated.
1381 * generated/maxval_r8.c: Regenerated.
1382 * generated/minloc0_4_i4.c: Regenerated.
1383 * generated/minloc0_4_i8.c: Regenerated.
1384 * generated/minloc0_4_r4.c: Regenerated.
1385 * generated/minloc0_4_r8.c: Regenerated.
1386 * generated/minloc0_8_i4.c: Regenerated.
1387 * generated/minloc0_8_i8.c: Regenerated.
1388 * generated/minloc0_8_r4.c: Regenerated.
1389 * generated/minloc0_8_r8.c: Regenerated.
1390 * generated/minloc1_4_i4.c: Regenerated.
1391 * generated/minloc1_4_i8.c: Regenerated.
1392 * generated/minloc1_4_r4.c: Regenerated.
1393 * generated/minloc1_4_r8.c: Regenerated.
1394 * generated/minloc1_8_i4.c: Regenerated.
1395 * generated/minloc1_8_i8.c: Regenerated.
1396 * generated/minloc1_8_r4.c: Regenerated.
1397 * generated/minloc1_8_r8.c: Regenerated.
1398 * generated/minval_i4.c: Regenerated.
1399 * generated/minval_i8.c: Regenerated.
1400 * generated/minval_r4.c: Regenerated.
1401 * generated/minval_r8.c: Regenerated.
1402 * generated/product_c4.c: Regenerated.
1403 * generated/product_c8.c: Regenerated.
1404 * generated/product_i4.c: Regenerated.
1405 * generated/product_i8.c: Regenerated.
1406 * generated/product_r4.c: Regenerated.
1407 * generated/product_r8.c: Regenerated.
1408 * generated/sum_c4.c: Regenerated.
1409 * generated/sum_c8.c: Regenerated.
1410 * generated/sum_i4.c: Regenerated.
1411 * generated/sum_i8.c: Regenerated.
1412 * generated/sum_r4.c: Regenerated.
1413 * generated/sum_r8.c: Regenerated.
1415 2005-04-30 Thomas Koenig <Thomas.Koenig@online.de>
1418 libgfortran.h: Change typedef of index_type from size_t
1421 2005-04-30 Paul Thomas <pault@gcc.gnu.org>
1424 * generated/matmul_r8.c: Remove incorrect assertions.
1425 * generated/matmul_c4.c: Regenerate
1426 * generated/matmul_c8.c: Regenerate
1427 * generated/matmul_i4.c: Regenerate
1428 * generated/matmul_i8.c: Regenerate
1429 * generated/matmul_r4.c: Regenerate
1430 * generated/matmul_r8.c: Regenerate
1432 2005-04-29 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1434 * configure.ac: Check for ftruncate and chsize.
1435 * io/unix.c (fd_truncate): Provide chsize as alternative to
1437 * config.h.in: Regenerate.
1438 * configure: Regenerate.
1440 2004-04-29 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1442 * intrinsics/rename.c: Add missing #includes.
1444 2004-04-28 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1446 * AUTHORS, COPYING, INSTALL, NEWS, README: Remove.
1448 2005-04-26 David Edelsohn <edelsohn@gnu.org>
1451 * io/rewind.c (st_rewind): Flush the stream when resetting the mode
1452 from WRITING to READING.
1454 2005-04-22 Paul Thomas <pault@gcc.gnu.org>
1455 Jerry DeLisle <jvdelisle@verizon.net>
1457 * io/write.c (nml_write_obj): Provide 1 more byte for ext_name.
1458 * io/list_read.c (nml_get_obj_data): Put extra brackets in get_mem
1459 call for ext_name. These fix the bug reported by Jerry DeLisle to
1460 the fortran list and are based on his suggested fix.
1462 2005-04-22 Thomas Koenig <Thomas.Koenig@online.de>
1467 * m4/reshape.m4 (reshape_`'rtype_kind): rs, rex: New
1468 variables, to be used in calculation of return array sizes.
1469 Populate return array descriptor if ret->data is NULL.
1470 Fix condition for early return (it used to test something
1471 undefined if order was used).
1472 Remove duplicate check wether pad is used.
1473 * intrinsics/reshape_generic.c (reshape_generic): Likewise.
1474 Fix a few places where the wrong variables were set.
1475 * generated/reshape_i4.c: Regenerated.
1476 * generated/reshape_i8.c: Regenerated.
1478 2005-04-18 Paul Thomas <pault@gcc.gnu.org>
1480 * io/list_read.c (nml_touch_nodes, nml_read_obj,
1481 nml_get_obj_data): Fix memory leaks in code for derived types.
1483 2005-04-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1486 * io/inquire.c (inquire_via_unit): Check for the gfc_unit being
1487 NULL when setting ioparm.sequential.
1489 2005-04-17 Thomas Koenig <Thomas.Koenig@online.de>
1492 * m4/reshape.m4 (reshape_`'rtype_kind): Change dimension
1493 of auxiliary arrays from GFC_MAX_DIMENSIONS - 1 to
1495 * intrinsics/reshape_generic.c (reshape_generic): Likewise.
1496 * generated/reshape_i4.c: Regenerated.
1497 * generated/reshape_i8.c: Regenerated.
1499 2005-04-17 Paul Thomas <pault@gcc.gnu.org>
1501 * io/list_read.c (eat_separator): at_eol = 1 replaced
1502 (zapped at some time?).
1504 2005-04-17 Paul Thomas <pault@gcc.gnu.org>
1506 PR libgfortran/12884
1507 PR libgfortran/17285
1508 PR libgfortran/18122
1509 PR libgfortran/18210
1510 PR libgfortran/18392
1511 PR libgfortran/18591
1512 PR libgfortran/18879
1513 * io/io.h (nml_ls): Declare.
1514 (namelist_info): Modify for arrays.
1515 * io/list_read.c (namelist_read): Reduced to call to new functions.
1516 (match_namelist_name): Simplified.
1517 (nml_query): Handles stdin queries ? and =?. New function.
1518 (nml_get_obj_data): Parses object name. New function.
1519 (touch_nml_nodes): Marks objects for read. New function.
1520 (untouch_nml_nodes): Resets objects. New function.
1521 (parse_qualifier): Parses and checks qualifiers. New function
1522 (nml_read_object): Reads and stores object data. New function.
1523 (eat_separator): No new_record on '/' in namelist.
1524 (finish_separator): No new_record on '/' in namelist.
1525 (read_logical): Error return for namelist.
1526 (read_integer): Error return for namelist.
1527 (read_complex): Error return for namelist.
1528 (read_real): Error return for namelist.
1529 * io/lock.c (library_end): Free extended namelist_info types.
1530 * io/transfer.c (st_set_nml_var): Modified for arrays.
1531 (st_set_nml_var_dim): Dimension descriptors. New function.
1532 * io/write.c (namelist_write): Reduced to call to new functions.
1533 (nml_write_obj): Writes output for object. New function.
1534 (write_integer): Suppress leading blanks for repeat counts.
1535 (write_int): Suppress leading blanks for repeat counts.
1536 (write_float): Suppress leading blanks for repeat counts.
1537 (output_float): Suppress leading blanks for repeat counts.
1539 2005-04-15 Thomas Koenig <Thomas.Koenig@online.de>
1542 * intrinsics/spread_generic.c (spread): Remove const from
1543 return array descriptor.
1544 New variables: rrank (rank of return array), rs (for
1545 calculating the size of the return array), srank (rank
1546 of the source array).
1547 Generate runtime error if the dim= argument is larger than
1548 the rank of the return array.
1549 Generate runtime error if the needed rank of the return
1550 array is larger than 7.
1551 If ret->data is null, populate the return array descriptor
1552 and initialize the variables for the actual operation.
1553 Otherwise, set ret->dim[0].stride to one if it is zero.
1554 Change second, independent use of variable dim to srank.
1556 2005-04-12 Mike Stump <mrs@apple.com>
1558 * configure: Regenerate.
1560 2005-04-13 Thomas Koenig <Thomas.Koenig@online.de>
1563 * m4/iforeach.c (name`'rtype_qual`_'atype_code): Add TODO
1564 that setting correct strides is a front end job.
1565 (`m'name`'rtype_qual`_'atype_code): Likewise. If mask has
1566 a lowest stride of 0, adjust to 1.
1567 * m4/ifunction.c (name`'rtype_qual`_'atype_code): Add TODO
1568 that setting correct strides is a front end job.
1569 (`m'name`'rtype_qual`_'atype_code): Likewise. If mask has
1570 a lowest stride of 0, adjust to 1.
1571 * maxloc0_4_i4.c: Regenerated
1572 * maxloc0_4_i8.c: Regenerated
1573 * maxloc0_4_r4.c: Regenerated
1574 * maxloc0_4_r8.c: Regenerated
1575 * maxloc0_8_i4.c: Regenerated
1576 * maxloc0_8_i8.c: Regenerated
1577 * maxloc0_8_r4.c: Regenerated
1578 * maxloc0_8_r8.c: Regenerated
1579 * maxloc1_4_i4.c: Regenerated
1580 * maxloc1_4_i8.c: Regenerated
1581 * maxloc1_4_r4.c: Regenerated
1582 * maxloc1_4_r8.c: Regenerated
1583 * maxloc1_8_i4.c: Regenerated
1584 * maxloc1_8_i8.c: Regenerated
1585 * maxloc1_8_r4.c: Regenerated
1586 * maxloc1_8_r8.c: Regenerated
1587 * maxval_i4.c: Regenerated
1588 * maxval_i8.c: Regenerated
1589 * maxval_r4.c: Regenerated
1590 * maxval_r8.c: Regenerated
1591 * minloc0_4_i4.c: Regenerated
1592 * minloc0_4_i8.c: Regenerated
1593 * minloc0_4_r4.c: Regenerated
1594 * minloc0_4_r8.c: Regenerated
1595 * minloc0_8_i4.c: Regenerated
1596 * minloc0_8_i8.c: Regenerated
1597 * minloc0_8_r4.c: Regenerated
1598 * minloc0_8_r8.c: Regenerated
1599 * minloc1_4_i4.c: Regenerated
1600 * minloc1_4_i8.c: Regenerated
1601 * minloc1_4_r4.c: Regenerated
1602 * minloc1_4_r8.c: Regenerated
1603 * minloc1_8_i4.c: Regenerated
1604 * minloc1_8_i8.c: Regenerated
1605 * minloc1_8_r4.c: Regenerated
1606 * minloc1_8_r8.c: Regenerated
1607 * minval_i4.c: Regenerated
1608 * minval_i8.c: Regenerated
1609 * minval_r4.c: Regenerated
1610 * minval_r8.c: Regenerated
1611 * product_c4.c: Regenerated
1612 * product_c8.c: Regenerated
1613 * product_i4.c: Regenerated
1614 * product_i8.c: Regenerated
1615 * product_r4.c: Regenerated
1616 * product_r8.c: Regenerated
1617 * sum_c4.c: Regenerated
1618 * sum_c8.c: Regenerated
1619 * sum_i4.c: Regenerated
1620 * sum_i8.c: Regenerated
1621 * sum_r4.c: Regenerated
1622 * sum_r8.c: Regenerated
1624 2005-04-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1627 * runtime/environ.c (init_unsigned_integer): Function for
1628 environment variables we want to be positive.
1629 (init_integer): Function to allow negative environment
1630 variables (e.g. for GFORTRAN_STDIN_UNIT).
1632 2005-04-10 Thomas Koenig <Thomas.Koenig@online.de>
1642 * io/transfer.c (top level): eor_condition: New static variable.
1643 (read_sf): Remove unnecessary zeroing of buffer (there is enough
1644 information in its length).
1645 Return a string of length 0 (to be padded by caller) if EOR was
1647 Remove erroneous special casing of EOR for standard input.
1648 Set eor_condition for non-advancing I/O if an end of line was
1650 Increment ioparm.size if necessary.
1651 (formatted_transfer): Skip the function if there is an EOR condition.
1652 (data_transfer_init): Initialize eor_condition to zero (false).
1653 (next_record_r): Clear sf_seen_eor if a \n has been seen already.
1654 (finalize_transfer): If there is an EOR condition, raise the error.
1656 2005-04-09 Bud Davis <bdavis@gfortran.org>
1657 Steven G. Kargl <kargls@comcast.net>
1660 * io/transfer.c (data_transfer_init): truncate an existing
1661 file on the first write.
1663 2005-04-09 Thomas Koenig <Thomas.Koenig@online.de>
1667 * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): ditto.
1668 If retarray->data is NULL (i.e. the front end does not
1669 know the rank and dimenson of the array), fill in its
1670 properties and allocate memory.
1671 Change the assertions about rank and dimension of retarray into
1672 runtime errors and only check them for retarray->data != NULL.
1673 Do the same for correcting the stride from 0 to 1 in retarray.
1674 (`m'name`'rtype_qual`_'atype_code): Likewise.
1675 * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Likewise.
1676 Change assertion about rank of array to runtime error.
1677 (`m'name`'rtype_qual`_'atype_code): Likewise.
1678 * generated/all_l4.c: Regenerated.
1679 * generated/all_l8.c: Regenerated.
1680 * generated/any_l4.c: Regenerated.
1681 * generated/any_l8.c: Regenerated.
1682 * generated/count_4_l4.c: Regenerated.
1683 * generated/count_4_l8.c: Regenerated.
1684 * generated/count_8_l4.c: Regenerated.
1685 * generated/count_8_l8.c: Regenerated.
1686 * generated/maxloc0_4_i4.c: Regenerated.
1687 * generated/maxloc0_4_i8.c: Regenerated.
1688 * generated/maxloc0_4_r4.c: Regenerated.
1689 * generated/maxloc0_4_r8.c: Regenerated.
1690 * generated/maxloc0_8_i4.c: Regenerated.
1691 * generated/maxloc0_8_i8.c: Regenerated.
1692 * generated/maxloc0_8_r4.c: Regenerated.
1693 * generated/maxloc0_8_r8.c: Regenerated.
1694 * generated/maxloc1_4_i4.c: Regenerated.
1695 * generated/maxloc1_4_i8.c: Regenerated.
1696 * generated/maxloc1_4_r4.c: Regenerated.
1697 * generated/maxloc1_4_r8.c: Regenerated.
1698 * generated/maxloc1_8_i4.c: Regenerated.
1699 * generated/maxloc1_8_i8.c: Regenerated.
1700 * generated/maxloc1_8_r4.c: Regenerated.
1701 * generated/maxloc1_8_r8.c: Regenerated.
1702 * generated/maxval_i4.c: Regenerated.
1703 * generated/maxval_i8.c: Regenerated.
1704 * generated/maxval_r4.c: Regenerated.
1705 * generated/maxval_r8.c: Regenerated.
1706 * generated/minloc0_4_i4.c: Regenerated.
1707 * generated/minloc0_4_i8.c: Regenerated.
1708 * generated/minloc0_4_r4.c: Regenerated.
1709 * generated/minloc0_4_r8.c: Regenerated.
1710 * generated/minloc0_8_i4.c: Regenerated.
1711 * generated/minloc0_8_i8.c: Regenerated.
1712 * generated/minloc0_8_r4.c: Regenerated.
1713 * generated/minloc0_8_r8.c: Regenerated.
1714 * generated/minloc1_4_i4.c: Regenerated.
1715 * generated/minloc1_4_i8.c: Regenerated.
1716 * generated/minloc1_4_r4.c: Regenerated.
1717 * generated/minloc1_4_r8.c: Regenerated.
1718 * generated/minloc1_8_i4.c: Regenerated.
1719 * generated/minloc1_8_i8.c: Regenerated.
1720 * generated/minloc1_8_r4.c: Regenerated.
1721 * generated/minloc1_8_r8.c: Regenerated.
1722 * generated/minval_i4.c: Regenerated.
1723 * generated/minval_i8.c: Regenerated.
1724 * generated/minval_r4.c: Regenerated.
1725 * generated/minval_r8.c: Regenerated.
1726 * generated/product_c4.c: Regenerated.
1727 * generated/product_c8.c: Regenerated.
1728 * generated/product_i4.c: Regenerated.
1729 * generated/product_i8.c: Regenerated.
1730 * generated/product_r4.c: Regenerated.
1731 * generated/product_r8.c: Regenerated.
1732 * generated/sum_c4.c: Regenerated.
1733 * generated/sum_c8.c: Regenerated.
1734 * generated/sum_i4.c: Regenerated.
1735 * generated/sum_i8.c: Regenerated.
1736 * generated/sum_r4.c: Regenerated.
1737 * generated/sum_r8.c: Regenerated.
1739 2005-04-09 Thomas Koenig <Thomas.Koenig@online.de>
1742 * runtime/string.c (compare0): Use fstrlen() to
1743 strip trailing blanks from option string.
1745 2005-04-09 Andrew Pinski <pinskia@physics.uc.edu>
1748 * format.c (parse_format_list): Allow an optional comma
1749 between descriptors.
1751 2005-04-08 Eric Botcazou <ebotcazou@libertysurf.fr>
1753 * io/backspace.c (unformatted_backspace): Do not dereference
1754 the pointer to the stream.
1756 2005-04-07 Andrew Pinski <pinskia@physics.uc.edu>
1759 * configure.ac (extra_ldflags_libgfortran): Set for *-darwin* to
1760 "-Wl,-single_module".
1761 * configure: Regenerate.
1762 * Makefile.am (libgfortran_la_LDFLAGS): Add extra_ldflags_libgfortran.
1763 * Makefile.in: Regenerate.
1765 2005-04-05 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1768 * write.c (write_float): A G edit descriptor may locally change
1769 the scale factor, but it needs to be restored afterwards.
1771 2005-04-03 Dale Ranta <dir@lanl.gov>
1772 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1778 * io/backspace.c (unformatted_backspace): Fix error in arithmetic.
1779 (st_backspace): When in WRITING mode, we flush and falling back
1780 into READING mode. In all cases, correctly position the stream.
1782 2005-03-31 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1785 * io/inquire.c (inquire_via_unit): Non-opened units should still be
1786 reported by an INQUIRE statement as existing.
1787 * io/transfer.c (data_transfer_init): Never accept negative units.
1789 2005-03-29 Dale Ranta <dir@lanl.gov>
1790 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1793 * io/open.c (st_open): call library_end() before returning even if
1796 2005-03-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1799 * list_read.c (next_char, eat_separator, finish_separator, read_real)
1800 (namelist_read): Add support for '\r' as well as '\n' as EOL
1804 * list_read.c (read_sf): Add a '\r' in a test to support DOS
1805 line-endings when line length is exceeded.
1807 2005-03-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1810 * io/format.c (parse_format_list): format node for colon edit
1811 descriptor needs a repeat counter set to 1.
1813 2005-02-24 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1815 * config.h.in: Regenerate.
1817 2005-02-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1820 * write.c (output_float): Handling the "F0.d" format similarly as
1821 commercial compilers.
1823 2005-03-22 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1825 * Makefile.am: Added new files.
1826 * Makefile.in: Regenerate.
1827 * aclocal.m4: Regenerate.
1828 * configure.ac: add checks for signal.h headers file, as well as
1829 following functions: chdir, strerror, getlogin, gethostname, kill,
1830 link, symlink, perror, sleep, time.
1831 * configure: Regenerate.
1832 * intrinsics/chdir.c, intrinsics/gerror.c, intrinsics/getlog.c,
1833 intrinsics/hostnm.c, intrinsics/ierrno.c, intrinsics/kill.c,
1834 intrinsics/link.c, intrinsics/perror.c, intrinsics/rename.c,
1835 intrinsics/sleep.c, intrinsics/symlnk.c, intrinsics/time.c: Newly
1836 implementend g77 intrinsics.
1838 2005-03-21 Zack Weinberg <zack@codesourcery.com>
1840 * configure.ac: Do not invoke TL_AC_GCC_VERSION.
1841 In all substitutions, leave gcc_version to be expanded by the Makefile.
1842 * aclocal.m4, configure: Regenerate.
1843 * Makefile.am: Set gcc_version.
1844 * Makefile.in: Regenerate.
1846 2005-03-16 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1849 * open.c (new_unit): set record length to max_offset rather than
1850 using a hard-coded limit (which was too low).
1852 2005-03-16 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1855 * write.c (output_float): special check when writing 0.0 with
1858 2005-03-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1861 * write.c (output_float): Adds a nzero_real variable to store
1862 the number of leading zeros whatever the format width is. Corrects
1863 the rounding of numbers less than 10^(-width). Fixes typo in an
1864 error message. Updates copyright years
1866 2005-02-27 Toon Moene <toon@moene.indiv.nluug.nl>
1868 * runtime/environ.c: Update copyright years.
1870 2005-02-27 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1872 * io/write.c: Update copyright years.
1874 2005-02-27 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1877 * io/write.c (output_float): Added special check for value 0.0 in
1880 2004-02-27 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1882 * io/write.c (output_float): Fix typo in condition.
1884 2005-02-25 Peter O'Gorman <peter@pogma.com>
1885 Toon Moene <toon@moene.indiv.nluug.nl>
1887 PR libgfortran/17748
1888 * runtime/environ.c: Remove references to environ.
1889 (show_variables): remove GFORTRAN_UNBUFFERED_* and
1890 GFORTRAN_NAME_* because they require environ.
1891 (pattern_scan): Remove function.
1893 2004-02-22 Paul Thomas <paulthomas2@wannado.fr>
1894 Bud Davis <bdavis@gfortran.org>
1896 * io/list_read.c (read_real): Handle separators properly
1897 in list directed read.
1899 2004-02-21 Bud Davis <bdavis@gfortran.org>
1902 * io/transfer.c (write_constant_string): accept an 'h' as
1903 the start of a hollerith format string.
1905 2005-02-21 Eric Botcazou <ebotcazou@libertysurf.fr>
1908 * intrinsics/c99_functions.c (nextafterf): Special-case infinite
1911 2005-02-21 Steven G. Kargl <kargls@comcast.net>
1913 * io/write.c (output_float): Typo in error meesage.
1915 2005-02-20 Steven G. Kargl <kargls@comcast.net>
1918 * intrinsic/args.c (iargc): Off by 1.
1920 2005-02-19 Steven G. Kargl <kargls@comcast.net>
1922 * intrinsic/date_and_time.c: Fix conformance problems.
1924 2005-02-01 Paul Thomas <paulthomas2@wanadoo.fr>
1926 PR libgfortran/19363
1927 PR libgfortran/19691
1928 * libgfortran.h (isfinite): Work around broken isfinite(x) in Cygwin.
1930 2005-01-30 Bud Davis <bdavis@gfortran.org>
1933 * io/inquire.c (inquire_via_unit): Use correct variable for
1936 2005-01-29 Thomas Koenig <Thomas.Koenig@online.de>
1939 * io/transfer.c (data_transfer_init): eor requires advance="NO".
1941 2005-01-25 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1944 * io/read.c (read_f): Don't free uninitialized pointer.
1946 2005-01-23 James A. Morrison <phython@gcc.gnu.org>
1947 Paul Brook <paul@codesourcery.com>
1950 * Makefile.am: Add transpose_c4.c and transpose_c8.c.
1951 * intrinsics/cshift0.c: Use separate optimized loops for complex types.
1952 * m4/transpose.m4: Include type letter in function name.
1953 * Makefile.in: Regenerate.
1954 * generated/transpose_*.c: Regenerate.
1956 2005-01-22 Thomas Koenig <Thomas.Koenig@online.de>
1959 * io/transfer.c (finalize_transfer): Don't do anything if
1960 there is an error condition.
1962 2005-01-22 David Edelsohn <edelsohn@gnu.org>
1964 PR libgfortran/19052
1965 * libgfortran.h (options_t): Add stderr_unit.
1966 * io/io.h (error_stream): Declare.
1967 * io/open.c (new_unit): Do not terminate abnormally if opening
1968 file preconnected to stdin, stdout, or stderr.
1969 * io/unit.c (init_units): Initialize stderr_unit.
1970 * io/unix.c (error_stream): New function.
1971 * runtime/environ.c (GFORTRAN_STDERR_UNIT): New environment variable.
1973 2005-01-22 Thomas Koenig <Thomas.Koenig@online.de>
1976 * io/unix.c (regular_file): No need to change flags->action
1977 if an error occurs. Document this.
1978 No need to call stat() for STATUS_OLD, open() will
1980 For ACTION_UNSPECIFIED, try open for read-write, then for
1981 read-only if open fails with EACCES, then for write-only
1982 if that fails with EACCES again.
1983 * io/unix.c (open_external): Document changed behavior of
1986 2005-01-22 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1989 * io/io.h (st_parameter): Use 'GFC_INTEGER_4' instead of 'int',
1990 use CHARACTER macro for definition of string valued paramters.
1992 2005-01-22 Bud Davis <bdavis9659@comcast.net>
1995 * io/inquire.c(inquire_via_unit): implement POSITION=.
1996 * io/transfer.c(next_record): update position for
1998 * io/rewind.c(st_rewind): update position for
2001 2005-01-16 Bud Davis <bdavis9659@comcast.net>
2004 * io/transfer.c (us_read): no bytes available is not a
2007 2005-01-15 Bud Davis <bdavis9659@comcast.net>
2010 * io/transfer.c (st_write_done): only truncate when it
2013 2005-01-12 Toon Moene <toon@moene.indiv.nluug.nl>
2016 c99_protos.h: License changed to GPL+exception.
2017 libgfortran.h: Ditto.
2018 intrinsics/abort.c: Ditto.
2019 intrinsics/args.c: Ditto.
2020 intrinsics/associated.c: Ditto.
2021 intrinsics/bessel.c: Ditto.
2022 intrinsics/c99_functions.c: Ditto.
2023 intrinsics/cpu_time.c: Ditto.
2024 intrinsics/cshift0.c: Ditto.
2025 intrinsics/date_and_time.c: Ditto.
2026 intrinsics/env.c: Ditto.
2027 intrinsics/eoshift0.c: Ditto.
2028 intrinsics/eoshift2.c: Ditto.
2029 intrinsics/erf.c: Ditto.
2030 intrinsics/etime.c: Ditto.
2031 intrinsics/exit.c: Ditto.
2032 intrinsics/flush.c: Ditto.
2033 intrinsics/fnum.c: Ditto.
2034 intrinsics/getXid.c: Ditto.
2035 intrinsics/getcwd.c: Ditto.
2036 intrinsics/ishftc.c: Ditto.
2037 intrinsics/mvbits.c: Ditto.
2038 intrinsics/pack_generic.c: Ditto.
2039 intrinsics/rand.c: Ditto.
2040 intrinsics/random.c: Ditto.
2041 intrinsics/reshape_generic.c: Ditto.
2042 intrinsics/reshape_packed.c: Ditto.
2043 intrinsics/size.c: Ditto.
2044 intrinsics/spread_generic.c: Ditto.
2045 intrinsics/stat.c: Ditto.
2046 intrinsics/string_intrinsics.c: Ditto.
2047 intrinsics/system.c: Ditto.
2048 intrinsics/system_clock.c: Ditto.
2049 intrinsics/transpose_generic.c: Ditto.
2050 intrinsics/umask.c: Ditto.
2051 intrinsics/unlink.c: Ditto.
2052 intrinsics/unpack_generic.c: Ditto.
2053 io/backspace.c: Ditto.
2055 io/endfile.c: Ditto.
2057 io/inquire.c: Ditto.
2059 io/list_read.c: Ditto.
2064 io/transfer.c: Ditto.
2073 m4/cshift1.m4: Ditto.
2075 m4/dotprod.m4: Ditto.
2076 m4/dotprodc.m4: Ditto.
2077 m4/dotprodl.m4: Ditto.
2078 m4/eoshift1.m4: Ditto.
2079 m4/eoshift3.m4: Ditto.
2080 m4/exponent.m4: Ditto.
2081 m4/fraction.m4: Ditto.
2083 m4/iforeach.m4: Ditto.
2084 m4/ifunction.m4: Ditto.
2085 m4/in_pack.m4: Ditto.
2086 m4/in_unpack.m4: Ditto.
2088 m4/matmul.m4: Ditto.
2089 m4/matmull.m4: Ditto.
2090 m4/maxloc0.m4: Ditto.
2091 m4/maxloc1.m4: Ditto.
2092 m4/maxval.m4: Ditto.
2093 m4/minloc0.m4: Ditto.
2094 m4/minloc1.m4: Ditto.
2095 m4/minval.m4: Ditto.
2097 m4/nearest.m4: Ditto.
2099 m4/product.m4: Ditto.
2100 m4/reshape.m4: Ditto.
2101 m4/set_exponent.m4: Ditto.
2103 m4/specific.m4: Ditto.
2104 m4/specific2.m4: Ditto.
2106 m4/transpose.m4: Ditto.
2108 runtime/environ.c: Ditto.
2109 runtime/error.c: Ditto.
2110 runtime/in_pack_generic.c: Ditto.
2111 runtime/in_unpack_generic.c: Ditto.
2112 runtime/main.c: Ditto.
2113 runtime/memory.c: Ditto.
2114 runtime/normalize.c: Ditto.
2115 runtime/pause.c: Ditto.
2116 runtime/select.c: Ditto.
2117 runtime/stop.c: Ditto.
2118 runtime/string.c: Ditto.
2119 generated/_abs_c4.f90: Regenerated.
2120 generated/_abs_c8.f90: Regenerated.
2121 generated/_abs_i4.f90: Regenerated.
2122 generated/_abs_i8.f90: Regenerated.
2123 generated/_abs_r4.f90: Regenerated.
2124 generated/_abs_r8.f90: Regenerated.
2125 generated/_acos_r4.f90: Regenerated.
2126 generated/_acos_r8.f90: Regenerated.
2127 generated/_aint_r4.f90: Regenerated.
2128 generated/_aint_r8.f90: Regenerated.
2129 generated/_anint_r4.f90: Regenerated.
2130 generated/_anint_r8.f90: Regenerated.
2131 generated/_asin_r4.f90: Regenerated.
2132 generated/_asin_r8.f90: Regenerated.
2133 generated/_atan2_r4.f90: Regenerated.
2134 generated/_atan2_r8.f90: Regenerated.
2135 generated/_atan_r4.f90: Regenerated.
2136 generated/_atan_r8.f90: Regenerated.
2137 generated/_conjg_c4.f90: Regenerated.
2138 generated/_conjg_c8.f90: Regenerated.
2139 generated/_cos_c4.f90: Regenerated.
2140 generated/_cos_c8.f90: Regenerated.
2141 generated/_cos_r4.f90: Regenerated.
2142 generated/_cos_r8.f90: Regenerated.
2143 generated/_cosh_r4.f90: Regenerated.
2144 generated/_cosh_r8.f90: Regenerated.
2145 generated/_dim_i4.f90: Regenerated.
2146 generated/_dim_i8.f90: Regenerated.
2147 generated/_dim_r4.f90: Regenerated.
2148 generated/_dim_r8.f90: Regenerated.
2149 generated/_exp_c4.f90: Regenerated.
2150 generated/_exp_c8.f90: Regenerated.
2151 generated/_exp_r4.f90: Regenerated.
2152 generated/_exp_r8.f90: Regenerated.
2153 generated/_log10_r4.f90: Regenerated.
2154 generated/_log10_r8.f90: Regenerated.
2155 generated/_log_c4.f90: Regenerated.
2156 generated/_log_c8.f90: Regenerated.
2157 generated/_log_r4.f90: Regenerated.
2158 generated/_log_r8.f90: Regenerated.
2159 generated/_mod_i4.f90: Regenerated.
2160 generated/_mod_i8.f90: Regenerated.
2161 generated/_mod_r4.f90: Regenerated.
2162 generated/_mod_r8.f90: Regenerated.
2163 generated/_sign_i4.f90: Regenerated.
2164 generated/_sign_i8.f90: Regenerated.
2165 generated/_sign_r4.f90: Regenerated.
2166 generated/_sign_r8.f90: Regenerated.
2167 generated/_sin_c4.f90: Regenerated.
2168 generated/_sin_c8.f90: Regenerated.
2169 generated/_sin_r4.f90: Regenerated.
2170 generated/_sin_r8.f90: Regenerated.
2171 generated/_sinh_r4.f90: Regenerated.
2172 generated/_sinh_r8.f90: Regenerated.
2173 generated/_sqrt_c4.f90: Regenerated.
2174 generated/_sqrt_c8.f90: Regenerated.
2175 generated/_sqrt_r4.f90: Regenerated.
2176 generated/_sqrt_r8.f90: Regenerated.
2177 generated/_tan_r4.f90: Regenerated.
2178 generated/_tan_r8.f90: Regenerated.
2179 generated/_tanh_r4.f90: Regenerated.
2180 generated/_tanh_r8.f90: Regenerated.
2181 generated/all_l4.c: Regenerated.
2182 generated/all_l8.c: Regenerated.
2183 generated/any_l4.c: Regenerated.
2184 generated/any_l8.c: Regenerated.
2185 generated/count_4_l4.c: Regenerated.
2186 generated/count_4_l8.c: Regenerated.
2187 generated/count_8_l4.c: Regenerated.
2188 generated/count_8_l8.c: Regenerated.
2189 generated/cshift1_4.c: Regenerated.
2190 generated/cshift1_8.c: Regenerated.
2191 generated/dotprod_c4.c: Regenerated.
2192 generated/dotprod_c8.c: Regenerated.
2193 generated/dotprod_i4.c: Regenerated.
2194 generated/dotprod_i8.c: Regenerated.
2195 generated/dotprod_l4.c: Regenerated.
2196 generated/dotprod_l8.c: Regenerated.
2197 generated/dotprod_r4.c: Regenerated.
2198 generated/dotprod_r8.c: Regenerated.
2199 generated/eoshift1_4.c: Regenerated.
2200 generated/eoshift1_8.c: Regenerated.
2201 generated/eoshift3_4.c: Regenerated.
2202 generated/eoshift3_8.c: Regenerated.
2203 generated/exp_c4.c: Regenerated.
2204 generated/exp_c8.c: Regenerated.
2205 generated/exponent_r4.c: Regenerated.
2206 generated/exponent_r8.c: Regenerated.
2207 generated/fraction_r4.c: Regenerated.
2208 generated/fraction_r8.c: Regenerated.
2209 generated/hyp_c4.c: Regenerated.
2210 generated/hyp_c8.c: Regenerated.
2211 generated/in_pack_i4.c: Regenerated.
2212 generated/in_pack_i8.c: Regenerated.
2213 generated/in_unpack_i4.c: Regenerated.
2214 generated/in_unpack_i8.c: Regenerated.
2215 generated/matmul_c4.c: Regenerated.
2216 generated/matmul_c8.c: Regenerated.
2217 generated/matmul_i4.c: Regenerated.
2218 generated/matmul_i8.c: Regenerated.
2219 generated/matmul_l4.c: Regenerated.
2220 generated/matmul_l8.c: Regenerated.
2221 generated/matmul_r4.c: Regenerated.
2222 generated/matmul_r8.c: Regenerated.
2223 generated/maxloc0_4_i4.c: Regenerated.
2224 generated/maxloc0_4_i8.c: Regenerated.
2225 generated/maxloc0_4_r4.c: Regenerated.
2226 generated/maxloc0_4_r8.c: Regenerated.
2227 generated/maxloc0_8_i4.c: Regenerated.
2228 generated/maxloc0_8_i8.c: Regenerated.
2229 generated/maxloc0_8_r4.c: Regenerated.
2230 generated/maxloc0_8_r8.c: Regenerated.
2231 generated/maxloc1_4_i4.c: Regenerated.
2232 generated/maxloc1_4_i8.c: Regenerated.
2233 generated/maxloc1_4_r4.c: Regenerated.
2234 generated/maxloc1_4_r8.c: Regenerated.
2235 generated/maxloc1_8_i4.c: Regenerated.
2236 generated/maxloc1_8_i8.c: Regenerated.
2237 generated/maxloc1_8_r4.c: Regenerated.
2238 generated/maxloc1_8_r8.c: Regenerated.
2239 generated/maxval_i4.c: Regenerated.
2240 generated/maxval_i8.c: Regenerated.
2241 generated/maxval_r4.c: Regenerated.
2242 generated/maxval_r8.c: Regenerated.
2243 generated/minloc0_4_i4.c: Regenerated.
2244 generated/minloc0_4_i8.c: Regenerated.
2245 generated/minloc0_4_r4.c: Regenerated.
2246 generated/minloc0_4_r8.c: Regenerated.
2247 generated/minloc0_8_i4.c: Regenerated.
2248 generated/minloc0_8_i8.c: Regenerated.
2249 generated/minloc0_8_r4.c: Regenerated.
2250 generated/minloc0_8_r8.c: Regenerated.
2251 generated/minloc1_4_i4.c: Regenerated.
2252 generated/minloc1_4_i8.c: Regenerated.
2253 generated/minloc1_4_r4.c: Regenerated.
2254 generated/minloc1_4_r8.c: Regenerated.
2255 generated/minloc1_8_i4.c: Regenerated.
2256 generated/minloc1_8_i8.c: Regenerated.
2257 generated/minloc1_8_r4.c: Regenerated.
2258 generated/minloc1_8_r8.c: Regenerated.
2259 generated/minval_i4.c: Regenerated.
2260 generated/minval_i8.c: Regenerated.
2261 generated/minval_r4.c: Regenerated.
2262 generated/minval_r8.c: Regenerated.
2263 generated/nearest_r4.c: Regenerated.
2264 generated/nearest_r8.c: Regenerated.
2265 generated/pow_c4_i4.c: Regenerated.
2266 generated/pow_c4_i8.c: Regenerated.
2267 generated/pow_c8_i4.c: Regenerated.
2268 generated/pow_c8_i8.c: Regenerated.
2269 generated/pow_i4_i4.c: Regenerated.
2270 generated/pow_i4_i8.c: Regenerated.
2271 generated/pow_i8_i4.c: Regenerated.
2272 generated/pow_i8_i8.c: Regenerated.
2273 generated/pow_r4_i4.c: Regenerated.
2274 generated/pow_r4_i8.c: Regenerated.
2275 generated/pow_r8_i4.c: Regenerated.
2276 generated/pow_r8_i8.c: Regenerated.
2277 generated/product_c4.c: Regenerated.
2278 generated/product_c8.c: Regenerated.
2279 generated/product_i4.c: Regenerated.
2280 generated/product_i8.c: Regenerated.
2281 generated/product_r4.c: Regenerated.
2282 generated/product_r8.c: Regenerated.
2283 generated/reshape_i4.c: Regenerated.
2284 generated/reshape_i8.c: Regenerated.
2285 generated/set_exponent_r4.c: Regenerated.
2286 generated/set_exponent_r8.c: Regenerated.
2287 generated/shape_i4.c: Regenerated.
2288 generated/shape_i8.c: Regenerated.
2289 generated/sum_c4.c: Regenerated.
2290 generated/sum_c8.c: Regenerated.
2291 generated/sum_i4.c: Regenerated.
2292 generated/sum_i8.c: Regenerated.
2293 generated/sum_r4.c: Regenerated.
2294 generated/sum_r8.c: Regenerated.
2295 generated/transpose_i4.c: Regenerated.
2296 generated/transpose_i8.c: Regenerated.
2297 generated/trig_c4.c: Regenerated.
2298 generated/trig_c8.c: Regenerated.
2300 2005-01-07 Bud Davis <bdavis9659@comcast.net>
2303 * transfer.c (next_record_r): always skip the
2304 eol search if it was found during sf_read.
2306 2004-12-27 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2308 * libgfortran/libgfortran.h (GFC_UINTEGER_1, GFC_UINTEGER_2):
2310 * intrinsics/ishftc.c: Update copyright years.
2311 (ishftc8): Change 'shift' and 'size' to GFC_INTEGER_4.
2312 * intrinsics/mvbits.c: Correct non-ASCII character in my name.
2313 Add implementations for GFC_INTEGER_1 and GFC_INTEGER_2.
2315 2004-12-23 Bud Davis <bdavis9659@comcast.net>
2318 * io/tranfer.c (formatted_transfer): moved check for
2319 format reversion inside the processing loop.
2321 2004-12-19 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2324 * libgfortran.h (itoa): Rename to gfc_itoa.
2325 * io/write.c (itoa): Same.
2326 * runtime/environ.c (itoa): Same.
2327 * runtime/error.c (itoa): Same.
2329 2004-12-15 Bud Davis <bdavis9659@comcast.net>
2330 Steven G. Kargl <kargls@comcast.net>
2333 * io/list_read.c (read_real): do not push back a comma when
2334 it delimits a real value without a decimal point
2336 2004-12-14 Steve Ellcey <sje@cup.hp.com>
2338 * libgfortran/io/transfer.c (us_read): Use memcpy/memset
2339 instead of assignment to fill unaligned buffer.
2341 (next_record_w): Ditto.
2343 2004-12-14 Steven G. Kargl <kargls@comcast.net>
2346 * gfortran.h: typedef GFC_INTEGER_1 and GFC_INTEGER_2
2347 * intrinsics/cshift0.c (cshift0_1,cshift0_2): New functions.
2348 * intrinsics/eoshift0.c (eoshift0_1,eoshift0_2): New functions.
2349 * intrinsics/eoshift2.c (eoshift2_1,eoshift2_2): New functions.
2351 2004-12-13 David Edelsohn <edelsohn@gnu.org>
2353 * io/transfer.c (read_sf): Change bitwise "and" to logical "and".
2355 2004-12-12 Richard Henderson <rth@redhat.com>
2357 * intrinsics/cshift0.c, intrinsics/eoshift0.c, intrinsics/eoshift2.c,
2358 intrinsics/pack_generic.c, intrinsics/reshape_generic.c,
2359 intrinsics/spread_generic.c, intrinsics/transpose_generic.c,
2360 intrinsics/unpack_generic.c, m4/cshift1.m4, m4/dotprod.m4,
2361 m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4, m4/eoshift3.m4,
2362 m4/iforeach.m4, m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4,
2363 m4/reshape.m4, m4/shape.m4, m4/transpose.m4: Use standard prefix
2365 * generated/*: Rebuild.
2367 2004-12-12 Richard Henderson <rth@redhat.com>
2369 * acinclude.m4 (LIBGFOR_CHECK_ATTRIBUTE_VISIBILITY): New.
2370 (LIBGFOR_CHECK_ATTRIBUTE_DLLEXPORT): New.
2371 (LIBGFOR_CHECK_ATTRIBUTE_ALIAS): New.
2372 * configure.ac: Use them.
2373 * configure, config.h.in, aclocal.m4: Rebuild.
2374 * libgfortran.h (prefix): Remove.
2375 (PREFIX, IPREFIX): New.
2376 (sym_rename, sym_rename1, sym_rename2): New.
2377 (internal_proto, export_proto, export_proto_np): New.
2378 (iexport_proto, iexport): New.
2379 (iexport_data_proto, iexport_data): New.
2380 * intrinsics/abort.c, intrinsics/args.c, intrinsics/associated.c,
2381 intrinsics/cpu_time.c, intrinsics/cshift0.c,
2382 intrinsics/date_and_time.c, intrinsics/env.c, intrinsics/eoshift0.c,
2383 intrinsics/eoshift2.c, intrinsics/etime.c, intrinsics/exit.c,
2384 intrinsics/flush.c, intrinsics/fnum.c, intrinsics/getXid.c,
2385 intrinsics/getcwd.c, intrinsics/ishftc.c, intrinsics/mvbits.c,
2386 intrinsics/pack_generic.c, intrinsics/rand.c, intrinsics/random.c,
2387 intrinsics/reshape_generic.c, intrinsics/size.c,
2388 intrinsics/spread_generic.c, intrinsics/stat.c,
2389 intrinsics/string_intrinsics.c, intrinsics/system.c,
2390 intrinsics/system_clock.c, intrinsics/transpose_generic.c,
2391 intrinsics/umask.c, intrinsics/unlink.c, intrinsics/unpack_generic.c,
2392 io/backspace.c, io/close.c, io/endfile.c, io/inquire.c, io/io.h,
2393 io/open.c, io/rewind.c, io/transfer.c, libgfortran.h, m4/cshift1.m4,
2394 m4/dotprod.m4, m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4,
2395 m4/eoshift3.m4, m4/exponent.m4, m4/fraction.m4, m4/iforeach.m4,
2396 m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4, m4/nearest.m4,
2397 m4/pow.m4, m4/reshape.m4, m4/set_exponent.m4, m4/shape.m4,
2398 m4/transpose.m4, runtime/environ.c, runtime/error.c,
2399 runtime/in_pack_generic.c, runtime/in_unpack_generic.c,
2400 runtime/main.c, runtime/memory.c, runtime/pause.c, runtime/select.c,
2401 runtime/stop.c: Use them to mark symbols internal or external.
2402 * generated/*: Rebuild.
2404 2004-12-09 David Edelsohn <edelsohn@gnu.org>
2407 Revert 2004-12-07 change.
2408 * Makefile.am (AM_MAKEFLAGS): Delete.
2409 * Makefile.in: Regenerate.
2411 2004-12-07 Steve Ellcey <sje@cup.hp.com>
2413 * libgfortran/Makefile.am (AM_MAKEFLAGS): New.
2414 * libgfortran/Makefile.in: Regenerate
2416 2004-12-07 Steve Ellcey <sje@cup.hp.com>
2418 * io/io.h (open_external): Change prototype.
2419 * io/unix.c (regular_file): Change prototype and set flags->action if
2421 (open_external): Ditto.
2422 * io/open.c (new_unit): Let open_external set flags->action.
2424 2004-12-07 Eric Botcazou <ebotcazou@libertysurf.fr>
2426 * configure.ac: Check for ieeefp.h. Check for fabsf in libm.
2427 * configure: Regenerate.
2428 * config.h.in: Likewise.
2429 * c99_protos.h: New file.
2430 * libgfortran.h: Include c99_protos.h and conditionally ieeefp.h.
2431 * intrinsics/c99_functions.c (fabsf): New function.
2433 2004-12-06 Richard Henderson <rth@redhat.com>
2435 * intrinsics/cshift0.c, intrinsics/eoshift0.c, intrinsics/eoshift2.c,
2436 intrinsics/pack_generic.c, intrinsics/string_intrinsics.c,
2437 intrinsics/transpose_generic.c, m4/ifunction.m4, m4/matmul.m4,
2438 m4/matmull.m4, m4/transpose.m4: Use internal_malloc_size instead
2440 * generated/*: Rebuild.
2442 2004-12-06 Richard Henderson <rth@redhat.com>
2444 * intrinsics/c99_functions.c, intrinsics/eoshift0.c,
2445 intrinsics/eoshift2.c, intrinsics/exit.c, intrinsics/flush.c,
2446 intrinsics/ishftc.c, intrinsics/mvbits.c, intrinsics/pack_generic.c,
2447 intrinsics/random.c, intrinsics/reshape_generic.c, intrinsics/size.c,
2448 intrinsics/spread_generic.c, intrinsics/stat.c,
2449 intrinsics/string_intrinsics.c, intrinsics/system_clock.c,
2450 intrinsics/transpose_generic.c, intrinsics/unlink.c,
2451 intrinsics/unpack_generic.c, io/backspace.c, io/format.c,
2452 io/list_read.c, io/lock.c, io/open.c, io/transfer.c, io/unix.c,
2453 io/write.c, runtime/environ.c, runtime/error.c,
2454 runtime/in_pack_generic.c, runtime/in_unpack_generic.c, runtime/main.c,
2455 runtime/memory.c, runtime/pause.c, runtime/stop.c,
2456 runtime/string.c: Whitespace fixes.
2458 2004-12-06 Richard Henderson <rth@redhat.com>
2460 * Makefile.am: Generate all m4 output under $(srcdir).
2461 * Makefile.in: Regenerate.
2463 2004-12-02 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2466 * io/transfer.c (unformatted_read, unformatted_write): width of
2467 a COMPLEX is twice its kind.
2469 2004-12-02 Richard Sandiford <rsandifo@redhat.com>
2471 * configure.ac: Use TL_AC_GCC_VERSION to set gcc_version.
2472 * configure, aclocal.m4, Makefile.in: Regenerate.
2474 2004-12-02 Bud Davis <bdavis9659@comcast.net>
2477 * io/unix.c (fd_alloc_w_at): Update file_length when extending.
2478 * io/backspace.c (formatted_backspace): Reset endfile after backspace.
2480 2004-12-02 Bud Davis <bdavis9659@comcast.net>
2482 * io/inquire.c (inquire_via_unit): do not allow a direct access
2483 file to be opened for sequential I/O.
2485 2004-12-02 Steven G. Kargl <kargls@comcast.net>
2486 Paul Brook <paul@codesourcery.com>
2488 * intrinsics/flush.c: New file.
2489 * intrinsics/fnum.c: ditto
2490 * intrinsics/stat.c: ditto
2491 * io/io.h (unit_to_fd): Add prototype.
2492 * io/unix.c (unit_to_fd): New function.
2493 * configure.ac: Add test for members of struct stat. Check for
2494 sys/types.h and sys/stat.h
2495 * Makefile.am: Add intrinsics/{flush.c,fnum.c,stat.c}
2496 * configure.in: Regenerate.
2497 * config.h.in: Regenerate.
2498 * Makefile.in: Regenerate.
2500 2004-12-01 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2502 * Makefile.am (AM_CPPFLAGS): Use -iquote instead of -I.
2504 2004-11-28 Bud Davis <bdavis9659@comcast.net>
2506 * io/unix.c (mmap_alloc_w_a): check for a write to a location
2507 less than the mapped area.
2509 2004-11-27 Bud Davis <bdavis9659@comcast.net>
2512 * io/endfile.c (st_endfile): flush the stream before truncating.
2514 2004-11-24 Kelley Cook <kcook@gcc.gnu.org>
2516 * configure: Regenerate for libtool change.
2518 2004-11-22 Steven Bosscher <stevenb@suse.de>
2521 * configure.ac: Check for finite in libm.
2522 * libgfortran.h: Define isfinite macro if not defined.
2523 * intrinsics/c99_functions.c: Use defined(fpclassify) instead of
2525 * io/write.c (write_float): Use isfinite instead of finite.
2526 * configure, config.h.in: Rebuilt.
2528 2004-11-20 Roger Sayle <roger@eyesopen.com>
2530 * io/write.c (write_float, list_formatted_write): Fix indentation.
2532 2004-11-20 Eric Botcazou <ebotcazou@libertysurf.fr>
2535 * acinclude.m4 (LIBGFOR_TARGET_ILP32): New check.
2536 * configure.ac: Include LIBGFOR_TARGET_ILP32.
2537 * configure: Regenerate.
2538 * config.h.in: Likewise.
2539 * libgfortran.h: Provide default definitions for C99 types
2540 on ILP32 targets that don't have them.
2543 * configure.ac: Check for snprintf.
2544 * configure: Regenerate.
2545 * config.h.in: Likewise.
2546 * intrinsics/date_and_time.c (date_and_time): Do not
2547 use snprinf if it is not available.
2548 * io/write.c (output_float): Likewise.
2550 2004-11-20 Steven G. Kargl <kargls@comcast.net>
2552 * Makefile.am: Add intrinsics/{umask.c,unlink.c,exit.c}
2553 * Makefile.in: Regenerated
2554 * intrinsics/umask.c: New file
2555 * intrinsics/unlink.c: ditto
2556 * intrinsics/exit.c: ditto
2558 2004-11-18 Victor Leikehman <lei@il.ibm.com>
2560 * m4/matmul.m4: Loops reordered to improve cache behavior.
2561 * generated/matmul_??.c: Regenerated.
2563 2004-11-10 Paul Brook <paul@codesourcery.com>
2566 * configure.ac: Check for strtof.
2567 * configure: Regenerate.
2568 * config.h.in: Regenerate.
2569 * io/read.c (convert_real): Use strtof if available.
2570 (convert_precision_real): Remove.
2571 (read_f): Avoid poor exponentiation algorithm.
2573 2004-11-05 Andreas Schwab <schwab@suse.de>
2575 * configure.ac: Use AC_PROG_FC, FC and FCFLAGS instead of
2576 AC_PROG_F77, F77 and FFLAGS.
2577 * Makefile.am (selected_int_kind.inc, selected_real_kind.inc): Use
2578 FCCOMPILE instead of F77COMPILE.
2579 * configure, Makefile.in: Regenerate.
2581 2004-11-05 Kelley Cook <kcook@gcc.gnu.org>
2583 * acinclude.m4: Properly quote AC_CACHE_CHECK.
2584 * Makefile.am: Add in ACLOCAL_AMFLAGS.
2585 * aclocal.m4, configure, Makefile.in: Regenerate.
2587 2004-10-30 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2589 * config.h.in: Regenerate.
2590 * configure: Regenerate.
2591 * configure.ac (AC_CHECK_FUNCS): Add mkstemp.
2592 * io/unix.c (S_IRGRP): Define if undefined.
2596 (tempfile): Use mktemp if mkstemp missing, fix typos.
2598 2004-10-30 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2600 * intrinsics/system.c ("libgfortran.h"): Move after system headers.
2602 2004-10-30 Canqun Yang <canqun@nudt.edu.cn>
2604 * intrinsics/rand.c (irand): Handle NULL argument.
2606 2004-10-07 Paul Brook <paul@codesourcery.com>
2608 * io/transfer.c (finalize_transfer): Free internal streams.
2609 * io/unix.c (mem_close): Free stream object.
2611 2004-10-07 Paul Brook <paul@codesourcery.com>
2613 * intrinsics/string_intrinsics.c (string_verify): Fix off by one
2616 2004-10-06 Paul Brook <paul@codesourcery.com>
2619 * io/transfer.c (data_transfer_init): Reset sf_seen_eor.
2621 2004-10-04 Andrew Pinski <pinskia@physics.uc.edu>
2623 * intrinsics/mvbits.c: Commit the file.
2625 2004-10-04 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2628 * intrinsics/pack_generic.c (__pack): Allocate memory for return array
2629 if not done by caller.
2630 (__pack_s): New function.
2631 * runtime/memory.c (internal_malloc, internal_malloc64): Allow
2632 allocating zero memory.
2635 * Makefile.am (gfor_helper_src): Add intrinsics/mvbits.h.
2636 * Makefile.in: Regenerate.
2637 * intrinsics/mvbits.h: New file.
2640 * intrinsics/system.c: New file.
2641 * Makefile.am: Add dependency for the new file.
2642 * Makefile.in: Regenerate.
2644 2004-10-04 Paul Brook <paul@codesourcery.com>
2645 Bud Davis <bdavis9659@comcast.net>
2649 * io/format.c (parse_format_list): Set repeat count for S, SP, SS,
2651 * io/write.c (output_float): Don't output minus zero.
2653 2004-10-03 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2655 * intrinsics/abort.c ("libgfortran.h"): Move.
2656 * intrinsics/date_and_time.c ("libgfortran.h"): Same.
2657 * intrinsics/write.c ("libgfortran.h"): Same.
2659 2004-09-26 Tobias Schlueter <tobis.schlueter@physik.uni-muenchen.de>
2662 * config.h.in (HAVE_POWF): Undefine.
2663 * configure.ac: Check for 'powf' in library.
2664 * configure: Regenerate.
2665 * intrinsics/c99_functions.c (powf): New function.
2667 2004-09-24 Tobias Schlueter <tobis.schlueter@physik.uni-muenchen.de>
2669 * intrinsics/etime.c (etime_): New function.
2671 2004-09-21 Steven G. Kargl <kargls@comcast.net>
2673 * libgfortran.h: define gfc_alloca()
2674 * intrinsics/env.c (getenv, get_environment_variable_i4): Use it.
2676 2004-09-21 Bud Davis <bdavis9659@comcast.net>
2679 * io/list_read.c (namelist_read): ignore spaces after
2680 the '=' for namelist reads.
2682 2004-09-15 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2684 * config.h.in: Regenerate.
2685 * configure: Regenerate.
2686 * configure.ac (AC_CHECK_HEADERS): Check for sys/mman.h.
2687 * unix.c: Include stdio.h.
2688 (HAVE_SYS_MMAN_H): Check.
2689 (PROT_READ, PROT_WRITE): Provide default definitions.
2691 2004-09-15 Steven G. Kargl <kargls@comcast.net>
2693 * intrincics/getcwd.c: New file.
2694 * Makefile.am: Add getcwd.c.
2695 * Makefile.in: Regenerated.
2697 2004-09-15 Steven G. Kargl <kargls@comcast.net>
2698 Paul Brook <paul@codesourcery.com>
2700 * intrinsics/env.c (getenv, get_environmental_variable): Remove
2701 trailing white space. Use alloca. Honour trim_name.
2703 2004-09-13 Bud Davis <bdavis9659@comcast.net>
2707 * io/list_read.c (list_formatted_read): Handle trailing spaces
2710 2004-09-06 Steven G. Kargl <kargls@comcast.net>
2712 * io/write.c (output_float): Typo in comment. Remove debugging
2713 printf. Fix format for FP of form 1e10.
2715 2004-09-03 Richard Henderson <rth@redhat.com>
2717 * intrinsics/cshift0.c (DEF_COPY_LOOP, copy_loop_int, copy_loop_long,
2718 copy_loop_double, copy_loop_ldouble): New.
2719 (__cshift0): Make shift type ssize_t. Use % operator instead of
2720 div. Use specialized versions of copy loop depending on the shape.
2722 2004-09-02 Paul Brook <paul@codesourcery.com>
2724 * io/format.c (parse_format_list): Set repeat count for P descriptors.
2725 * write.c (output_float): Fix condition. Correctly handle nonzero
2728 2004-09-01 Eric Botcazou <ebotcazou@libertysurf.fr>
2730 * mk-sik-inc.sh: Use a temporary string instead of 'echo -n'.
2731 * mk-srk-inc.sh: Likewise.
2733 2004-09-01 Paul Brook <paul@codesourcery.com>
2735 * runtime/error.c (generate_error): Set both iostat and
2738 2004-08-31 Paul Brook <paul@codesourcery.com>
2741 * io/list_read.c (next_char): Don't signal EOF for internal files.
2742 * io/unix.c (mem_alloc_r_at): Don't return NULL for incomplete reads.
2744 2004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2746 * io/unit.c: Separate copyright years by ','.
2747 (compare, insert_unit, delete_unit, is_internal_unit, close_units):
2748 Remove blank line in beginning of function.
2749 (get_unit): Simplify code.
2751 2004-08-31 Paul Brook <paul@codesourcery.com>
2753 * io/unit.c (get_unit): Remove superfluous if.
2755 2004-08-31 Paul Brook <paul@codesourcery.com>
2757 * io/transfer.c (read_sf): Rename uinty to readlen. Detect EOF.
2758 (finalize_transfer): Move setjmp after namlist IO.
2759 * io/unix.c (mem_alloc_r_at): Calculate remaining length correctly.
2761 2004-08-31 Paul Brook <paul@codesourcery.com>
2763 * list_read.c (eat_separator): Set at_eo when a '/' is seen.
2765 2004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2767 * libgfortran.h: Replace 'gfc_strlen_type' by
2768 'gfc_charlen_type'. Update comment accordingly.
2769 * intrinsics/args.c, intrinsics/env.c, io/io.h, io/transfer.c:
2770 Replace all occurences of 'gfc_strlen_type' by 'gfc_charlen_type'.
2772 2004-08-31 Paul Brook <paul@codesourcery.com>
2774 * libgfortran.h: Add comments.
2776 2004-08-30 Richard Henderson <rth@redhat.com>
2778 * Makefile.am (gfor_helper_src): Split selected_kind.f90.
2779 (gfor_built_src): Add selected_int_kind.inc selected_real_kind.inc.
2780 (selected_int_kind.inc selected_real_kind.inc): New rules.
2781 * Makefile.in: Regenerate.
2782 * mk-sik-inc.sh, mk-srk-inc.sh: New files.
2783 * intrinsics/selected_int_kind.f90: Split from selected_kind.f90,
2784 include table of detected kinds.
2785 * intrinsics/selected_real_kind.f90: Similarly.
2787 2004-08-29 Steven G. Kargl <kargls@comcast.net>
2788 Paul Brook <paul@codesourcery.com>
2790 * intrinsics/bessel.c: New file.
2791 * intrinsics/erf.c: New file.
2792 * Makefie.am: Add intrinsics/bessel.c and intrinsics/erf.c.
2793 * configure.ac: Test for C99 Bessel and Error functions.
2794 * Makefile.in: Regenerate.
2795 * config.h.in: Regenerate.
2796 * configure: Regenerate.
2798 2004-08-29 Steven G. Kargl <kargls@comcast.net>
2799 Paul Brook <paul@codesourcery.com>
2801 * Makefile.am: Add intrinsics/getXid.c.
2802 * configure.ac: Add tests for get{g,p,u}id.
2803 * config.h.in: Regenerate.
2804 * Makefile.in: Regenerate.
2805 * configure: Regenerate.
2807 2004-08-28 Paul Brook <paul@codesourcery.com>
2810 * libgfortran.h (rtoa): Remove prototype.
2811 * runtime/error.c (rtoa): Remove.
2812 * io/write.c (calculate_G_format): Don't add blanks if E format is
2813 used. Add correct number of blanks when exponent width is specified.
2814 (output_float): Rewrite.
2816 2004-08-27 Paul Brook <paul@codesourcery.com>
2818 * io/rewind.c (st_rewind): Reset unit to read mode.
2820 2004-08-27 Bud Davis <bdavis9659@comcast.net>
2823 * io/io.h: created typedef for unit_mode.
2824 * io/io.h (gfc_unit): added mode to unit structure.
2825 * io/transfer.c (data_transfer_init): flush if a write then
2826 read is done on a unit (direct access files).
2827 * io/rewind.c (st_rewind): Used unit mode instead of global.
2829 2004-08-24 Bud Davis <bdavis9659@comcast.net>
2832 * runtime/error.c (itoa): keep from overflowing during
2833 mod operation by using unsigned variable.
2835 2004-08-24 Bud Davis <bdavis9659@comcast.net>
2838 * runtime/string_intrinsics.c (string_index):check for
2839 substring longer than string.
2841 2004-08-24 David Edelsohn <edelsohn@gnu.org>
2843 * Makefile.am (libgfortran_la_LDFLAGS): Add -lm.
2844 * Makefile.in: Rebuilt.
2846 2004-08-23 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2848 * io/io.h, io/list_read.c, io/open.c, io/transfer.c, io/write.c:
2849 Fix formatting issues, update copyright years.
2851 2004-08-21 Bud Davis <bdavis9659@comcast.net>
2854 * io/transfer.c (next_record_w): Do not blank pad.
2855 * io/transfer.c (next_record): Take into account partial records.
2857 2004-08-18 Victor Leikehman <lei@il.ibm.com>
2860 * io/transfer.c (st_set_nml_var)
2861 * io/write.c (namelist_write): Allow var_name and var_name_len to be
2862 null. For strings, use string_length field instead of len.
2863 * io/io.h (struct namelist_type): New field string_length.
2864 (st_set_nml_var_char): New argument string_length.
2866 2004-08-13 Bud Davis <bdavis9659@comcast.net>
2869 * io/open.c (st_open): use flags instead of the unit structure.
2871 2004-08-10 Victor Leikehman <lei@il.ibm.com>
2873 * io/list_read.c (namelist_read): Convert variable names
2874 to lower case, so that mixed-case names are recognized.
2875 Don't read beyond terminating slash.
2877 2004-08-09 Richard Henderson <rth@redhat.com>
2878 Roger Sayle <roger@eyesopen.com>
2880 * intrinsics/c99_functions.c (nextafterf): New implementation that
2881 works correctly with denormalized numbers.
2883 2004-08-09 Victor Leikehman <lei@il.ibm.com>
2885 * m4/matmul.m4, m4/matmull.m4, intrinsics/eoshift0.c,
2886 intrinsics/eoshift2.c, intrinsics/transpose_generic.c:
2887 Allocate space if return value has NULL in its data field.
2888 * generated/*.c: Regenerate.
2890 2004-08-06 Janne Blomqvist <jblomqvi@cc.hut.fi>
2892 * intrinsics/env.c: New file.
2893 * Makefile.am: Add env.c to build.
2894 * Makefile.in: Regenerate.
2896 2004-08-05 Victor Leikehman <lei@il.ibm.com>
2898 PR libgfortran/16704
2899 * io/read.c (read_radix): Understand letters f and F as hex digits.
2901 2004-08-04 Victor Leikehman <lei@il.ibm.com>
2903 * libgfortran.h (array_t, size0) New declarations.
2904 * m4/ifunction.m4, m4/transpose.m4, intrinsics/cshift0.c: Allocate
2905 space if return value descriptor has NULL in its data field,
2906 and initialize bounds and stride.
2907 * intrinsics/size.c (array_t, size0): Declarations moved to
2909 * generated/*.c: Regenerate.
2911 2004-08-03 Roger Sayle <roger@eyesopen.com>
2913 PR libgfortran/16137
2914 * configure.ac: Add tests for acosf, asinf, atan2f, atanf, ceilf,
2915 copysignf, cosf, coshf, expf, floorf, frexpf, hypotf, logf, log10f,
2916 scalbnf, sinf, sinhf, sqrtf, tanf and tanhf in libm.
2917 * config.h.in: Regenerate.
2918 * configure: Regenerate.
2920 * instrinsics/c99_functions.c (acosf, asinf, atan2f, atanf, ceilf,
2921 copysignf, cosf, coshf, expf, floorf, frexpf, hypotf, logf, log10f,
2922 nextafterf, scalbnf, sinf, sinhf, sqrtf, tanf, tanhf): New stub
2923 implementations for targets that don't support C99 float functions.
2925 2004-08-01 Roger Sayle <roger@eyesopen.com>
2927 * io/write.c (write_float): Use the slightly more portable isnan
2928 in preference to isinf.
2930 2004-07-18 Bud Davis <bdavis9659@comcast.net>
2932 * configure.ac: Add check for LFS support.
2933 * configure: Regenerate
2935 2004-07-11 Paul Brook <paul@codesourcery.com>
2938 * m4/cexp.m4 (carg): Return -pi to pi.
2939 * generated/exp_c?.c: Regenerate.
2941 2004-07-08 Andreas Krebbel <krebbel1@de.ibm.com>
2944 * libgfortran/io/write.c: (write_float): Added length check.
2945 Remove pointless memset calls.
2947 2004-07-04 Bud Davis <bdavis9659@comcast.net>
2948 Paul Brook <paul@codesourcery.com>
2951 * io/transfer.c(us_write): set recl for seq unform writes to max size.
2952 * io/transfer.c(data_transfer_init): handle un-opened seq unform unit.
2953 * io/unix.c(fd_alloc_w_at): handle requests at start, fd_flush at
2955 * io/unix.c(is_seekable): set based upon the file/device, not the
2956 method being used to access it (fd or mmap).
2957 * io/unix.c(fd_flush): don't set file_size if !seekable.
2958 * io/unix.c(fd_truncate: ditto.
2960 2004-07-04 Janne Blomqvist <jblomqvi@cc.hut.fi>
2961 Paul Brook <paul@codesourcery.com>
2965 * libgfortran.h (gfc_strlen_type): Define.
2966 * intrinsics/args.c (getarg): Rename ...
2967 (getarg_i4): ... to this.
2968 (getarg_i8, get_command_argument_i4, get_command_argument_i8,
2969 get_command_i4, get_command_i8): New functions.
2971 2004-07-04 Matthias Klose <doko@debian.org>
2973 * libtool-version: New.
2974 * Makefile.am (libgfortran_la_LDFLAGS): Use -version-info for soname.
2975 * Makefile.in: Regenerate.
2976 * configure.ac: Remove libtool_VERSION macro
2977 * configure: Regenerate
2979 2004-06-30 Steve Kargl <sgk@troutmask.apl.washington.edu>
2980 Steven Bosscher <stevenb@suse.de>
2982 * intrinsics/rand.c (rand): Wrap the irand() call from the previous
2985 2004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2986 Paul Brook <paul@codesourcery.com>
2988 * runtime/normalize.c (normalize_r4_i4, normalize_r8_i8): Fix
2990 * intrinsics/rand.c (rand): Call irand() in call to normalize_r4_i4.
2992 2004-06-27 Bud Davis <bdavis9659@comcast.net>
2995 * io/write.c (write_float): check signbit for Infinity.
2997 2004-06-26 Bud Davis <bdavis9659@comcast.net>
3000 * unix.c(regular_file): create file if it does not exist.
3002 2004-06-24 Andrew Pinski <apinski@apple.com>
3004 * configure.ac: Remove check for libmx.
3005 * configure: Regenerate.
3007 2004-06-22 Janne Blomqvist <jblomqvi@cc.hut.fi>
3010 * inquire.c (st_inquire): Add comment
3011 * io.h (st_parameter): Add iolength.
3012 (st_iolength, st_iolength_done): Declare.
3013 * transfer.c (iolength_transfer, iolength_transfer_init,
3014 st_iolength, st_iolength_done): New functions.
3016 2004-06-21 Steven G. Kargl <kargls@comcast.net>
3018 * etime.c (etime_sub): Remove array rank check;
3019 Add check for sufficient space.
3021 2004-06-19 Bud Davis <bdavis9659@comcast.net>
3024 * io/list_read.c(set_value): fixed spelling.
3026 2004-06-19 Bud Davis <bdavis9659@comcast.net>
3029 * io/list_read.c(set_value): don't copy if the string is null.
3031 2004-06-14 Bud Davis <bdavis9659@comcast.net>
3034 * intrinsics/c99_functions.c: Use fpclassify if it exists.
3036 2004-06-13 Paul Brook <paul@codesourcery.com>
3038 * Makefile.am (gfor_helper_src): Add runtime/normalize.f90.
3039 * configure.ac: Add checks for nextafter and nextafterf.
3040 * Makefile.in, config.h.in, configure: Regenerate.
3041 * libgfortran.h (normalize_r4_i4, normalize_r8_i8): Declare.
3042 * intrinsics/rand.c (rand): Use normalize_r4_i4.
3043 * intrinsics/random.c (random_r4): Use normalize_r4_i4.
3044 (random_r8): Use normalize_r8_i8.
3045 * runtime/normalize.c: New file.
3047 2004-06-13 Steven G. Kargl <kargls@comcast.net>
3048 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3050 * random.c: Fix several spelling and formatting mistakes in
3052 (random_r8): Fix loop to make random numbers range in [0,1(.
3055 2004-06-13 Steven G. Kargl <kargls@comcast.net>
3057 * random.c (random_r4): Burn a random number.
3058 (random_r8): fix infinite loop.
3060 2004-06-12 Bud Davis <bdavis9659@comcast.net>
3061 Steve Kargl <sgk@troutmask.apl.washington.edu>
3064 * intrinsics/c99_functions.c: New file.
3065 * Makefile.am: Add new file.
3066 * configure.ac: Added test for round/roundf.
3067 * Makefile.in: Regenerate.
3068 * configure: Regenerate.
3069 * configure.h.in: Regenerate.
3071 2004-06-12 Steven G. Kargl <kargls@comcast.net>
3073 * Makefile.am: Add rand.c and etime.c
3074 * Makefile.in: Regenerated.
3075 * aclocal.in: Regenerated.
3076 * cpu_time.c (second_sub, second): New functions.
3077 * rand.c (irand, rand, srand): New file.
3078 * etime.c (etime_sub, etime): New file.
3080 2004-06-12 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3081 Steven Bosscher <stevenb@suse.de>
3084 * intrinsics/date_and_time.c: New file.
3085 * Makefile.am (gfor_helper_src): Add intrinsics/date_and_time.c.
3086 * Makefile.in, aclocal.m4: Regenerate.
3087 * libgfortran.h: Prototype date_and_time().
3089 2004-06-12 Bud Davis <bdavis9659@comcast.net>
3092 * intrinsics/args.c: Implement GETARG and IARGC.
3093 * Makefile.am: Add it.
3094 * Makefile.in: Regenerate.
3096 2004-06-12 Bud Davis <bdavis9659@comcast.net>
3099 * io/write.c(write_float): Format inf and nan IAW F2003.
3101 2004-06-09 Bud Davis <bdavis9659@comcaste.net>
3104 * io/transfer.c (formatted_transfer): position is unique
3105 for T and TL edit descriptors.
3106 (data_transfer_init): set record length to size of internal
3109 2004-06-09 Bud Davis <bdavis9659@comcast.net>
3112 * io/backspace.c(st_backspace): call correct routine for
3113 formatted and un-formatted units.
3115 2004-05-30 Andreas Jaeger <aj@suse.de>, Steven Bosscher <stevenb@suse.de>
3118 * Makefile.am (AM_CPPFLAGS): Renamed from INCLUDES.
3119 (lib_LTLIBRARIES): Rename to ...
3120 (toolexeclib_LTLIBRARIES): this for multilib support.
3121 * configure.in: Rename to ...
3122 * configure.ac: this. Update to modern autoconf style, enable
3123 multilibs, support --enable-version-specific-runtime-libs.
3124 * Makefile.in: Regenerated.
3125 * configure: Regenerated.
3126 * aclocal.m4: Regenerated.
3128 2004-05-30 Steven G. Kargl <kargls@comcast.net>
3130 * libgfortran.h (random_seed): Update prototype.
3131 * intrinsics/random.c: Disable old implementation and add new one.
3133 2004-05-30 Andreas Jaeger <aj@suse.de>
3135 * intrinsics/random.c: Include unistd.h for close and read
3136 prototypes, remove unneeded inclusion of assert.h.
3138 * intrinsics/abort.c: Include stdlib.h for abort prototype, remove
3139 unneeded inclusion of assert.h.
3141 2004-05-27 Tobias Schlueter <tobias.shclueter@physik.uni-muenchen.de>
3144 * intrinsics/associated.c: Remove enum.
3145 (associated): Replace TRUE/FALSE by 1/0.
3147 2004-05-23 Steven G. Kargl <kargls@comcast.net>
3149 * random.c (random_seed): Use correct variable.
3151 2004-05-22 Steven G. Kargl <kargls@comcast.net>
3153 * intrinsics/system_clock: New file.
3154 * Makefile.am: Add intrinsics/system_clock.c.
3155 * Makefile.in: Regenerate.
3157 2004-05-21 Roger Sayle <roger@eyesopen.com>
3159 * io/format.c (parse_format_list): Allow the comma after a string
3160 literal to be optional.
3162 2004-05-18 Paul Brook <paul@codesourcery.com>
3163 Feng Wang <fengwang@nudt.edu.cn>
3165 * Makefile.am (i_pow_c): Set it. Add build rule.
3166 (gfor_built_src): Use it.
3167 (m4_files): add m4/pow.m4.
3168 * Makefile.in: Regenerate.
3169 * m4/pow.m4: New file.
3170 * generated/pow_*.c: Regenerate.
3172 2004-05-18 Paul Brook <paul@codesourcery.com>
3174 * Makefile.am: Remove references to types.m4.
3175 * m4/iparm.m4: Merge with types.m4.
3176 * m4/types.m4: Remove.
3177 * m4/cshift1.m4, m4/dotprod.m4, m4/dotprodc.m4, m4/dotprodl.m4,
3178 m4/eoshift1.m4, m4/eoshift3.m4, m4/iforeach.m4, m4/ifunction.m4,
3179 m4/in_pack.m4, m4/in_unpack.m4, m4/iparm.m4, m4/matmul.m4,
3180 m4/matmull.m4, m4/maxloc0.m4, m4/maxloc1.m4, m4/maxval.m4,
3181 m4/minloc0.m4, m4/minloc1.m4, m4/minval.m4, m4/reshape.m4,
3182 m4/shape.m4, m4/specific.m4, m4/specific2.m4, m4/transpose.m4):
3183 Update to use new iparm.m4.
3184 * generated/*.c: Regenerate.
3186 2004-05-18 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3189 * gfortran.h (offset_t): Rename to ...
3190 (gfc_offset): ... this.
3191 * io/backspace.c (formatted_backspace, unformatted_backspace),
3192 io/io.h (stream, gfc_unit, global_t, file_length, file_position),
3193 transfer.c (us_read, us_write, next_record_r, next_record_w),
3194 io/unit.c (init_units), unix.c (unix_stream, fd_alloc,
3195 fd_alloc_r_at, fd_alloc_w_at, fd_seek, mmap_alloc,
3196 mmap_alloc_r_at, mmap_alloc_w_at, mmap_seek, mem_alloc_r_at,
3197 mem_alloc_w_at, mem_seek, file_length, file_position): Replace all
3198 occurences of offset_t by gfc_offset.
3200 2004-05-16 Paul Brook <paul@codesourcery.com>
3202 * io/format.c (write_real): Don't include padding in format.
3204 2004-05-16 Paul Brook <paul@codesourcery.com>
3206 * io/format.c (format_lex): Make c an int.
3208 2004-05-16 Janne Blomqvist <jblomqvi@cc.hut.fi>
3209 Paul Brook <paul@codesourcery.com>
3211 * io/write.c (write_logical): Don't print extra blank.
3212 (write_integer): Base field width on kind.
3213 (list_formatted_write): Output initial blank.
3215 2004-05-16 Janne Blomqvist <jblomqvi@cc.hut.fi>
3217 * io/io.h (flush): Add prototype.
3218 * io/transfer.c (finalize_transfer): Flush partial records.
3219 * io/unix.c (flush): New function.
3221 2004-05-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3224 * io/io.h (unit_t): Rename to ...
3225 (gfc_unit) ... this.
3226 (unit_root, current_unit, find_file, find_unit, get_unit): Now
3228 (delete_file, insert_unit, close_unit): Argument now of type
3230 * backspace.c (st_backspace), close.c (st_close), endfile.c
3231 (st_endfile), inquire.c (inquire_via_unit, st_inquire), open.c
3232 (test_endfile, edit_modes, new_unit, already_open, st_open),
3233 rewind.c (st_rewind), transfer.c (current_unit), unit.c
3234 (internal_unit, unit_cache, rotate_left, rotate_right, insert,
3235 insert_unit, delete_root, delete_treap, delete_unit, find_unit,
3236 get_unit, init_units, close_unit), unix.c (find_file0,
3237 find_file, delete_file): Replace all occurences of unit_t by
3240 2004-05-15 Bud Davis <bdavis9659@comcast.net>
3243 * io/write.c (write_a): right justify A edit output.
3245 2004-05-14 Bud Davis <bdavis9659@comcast.net>
3248 * libgfortan.h,intrinsics/random.c: Made random_seed visible.
3249 * runtime/main.c(init): Call random_seed as part of MAIN init.
3251 2004-05-13 Tobias Schlter <tobias.schlueter@physik.uni-muenchen.de>
3253 * io/format.c: (parse_format_list): No comma is required after
3256 2004-05-13 Bud Davis <bdavis9659@comcast.net>
3259 * io/intrinsic/string_intrinsics.c (adjustr): rework logic.
3261 2004-05-06 Rainer Orth <ro@TechFak.Uni-Bielefeld.DE>
3262 Steven Bosscher <stevenb@suse.de>
3265 * libgfortran.h: Include <inttypes.h> if available.
3267 2004-05-03 Rainer Orth <ro@TechFak.Uni-Bielefeld.DE>
3269 * io/unix.c (MAP_FAILED): Define if missing.
3270 (mmap_alloc): Cast MAP_FAILED to char *.
3271 (mmap_open): Likewise.
3273 2004-04-26 Bud Davis <bdavis9659@comcast.net>
3275 * generated/_abs_i8.f90: New file.
3276 * generated/_abs_c4.f90: New file.
3277 * generated/_abs_c8.f90: New file.
3278 * Makefile.am: Add them.
3279 * Makefile.in: Regenerate.
3281 2004-04-26 Bud Davis <bdavis9659@comcast.net>
3284 * generated/_abs_i4.f90: New file.
3285 * Makefile.am: Add it.
3286 * Makefile.in: Regenerate.
3288 2004-04-25 Bud Davis <bdavis9659@comcast.net>
3291 * io/list_read.c(list_formatted_read): finish consuming the
3292 spaces and seperators at eoln to get ready for next item.
3294 2004-04-23 Bud Davis <bdavis9659@comcast.net>
3297 * io/read.c(read_a): Handle field width > destination and no field width.
3299 2004-04-22 Bud Davis <bdavis9659@comcast.net>
3302 * io/format.c (format_item): gracefully handle a ')'
3303 when it is the first character encountered in the string.
3305 2004-04-11 Bud Davis <bdavis9659@comcast.net>
3308 * io/transfer.c (next_record): Update last_record when
3309 more than one record is written to a direct access file
3310 with one write statement.
3312 2004-04-11 Bud Davis <bdavis9659@comcast.net>
3315 * io/transfer.c (next_record_w) : No '\n' if internal.
3316 * io/unix.c (empty_internal_buffer) : Init to spaces, not '\n'.
3318 2004-04-11 Bud Davis <bdavis9659@comcast.net>
3320 * io.h (ioparm): Interface from FE is 32 bit, irregardless of offset_t.
3321 Will need to change this later to support direct access files > 2gb.
3323 2004-04-03 Bud Davis <bdavis9659@comcast.net>
3326 * io/transfer.c (next_record_r) : Skip to next record.
3328 2004-04-03 Bud Davis <bdavis9659@comcast.net>
3331 * io/transfer.c (next_record): Update last_record for DIRECT
3333 2004-04-03 Bud Davis <bdavis9659@comcast.net>
3336 * io/unix.c (find_file0): Use fd field of struct
3338 2004-04-03 Bud Davis <bdavis9659@comcast.net>
3341 * io/inquire.c (inquire_via_unit): Changed return string for
3342 BLANK=NULL. Use correct variable for ACTION.
3344 2004-04-01 Bud Davis <bdavis9659@comcast.net>
3347 * io/read.c (read_f): Allow a decimal without a leading digit.
3348 * io/write.c (output_float): remove a leading '0' to keep from
3349 overflowing the field (F edit descriptor).
3351 2004-04-01 Bud Davis <bdavis9659@comcast.net>
3354 * io/open.c (new_unit),
3355 * io/io.h : new_unit is now visible
3356 * io/transfer.c (data_transfer_init): open unit if no OPEN statement.
3357 * io/transfer.c (data_transfer_init): remove compile warnings.
3358 * io/rewind.c (st_rewind): ftruncate if writing.
3360 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3362 * write.c (write_l): Use extract_int for 'L' edit descriptor.
3364 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3367 * io/io.h (global_t):
3368 * io/list_read.c (next_char,list_formatted_read,ist_formatted_read):
3369 Move eof_jmp to a global structure.
3370 * io/transfer.c(finalize_transfer) : Set up eof_jump for callers.
3372 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3374 * m4/cexp.m4 (csqrt): Actually use the passed value.
3375 * generated/exp_c?.c: Regenerate.
3377 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3380 * io.h, transfer.c, open.c : recl_in changed from ptr to variable.
3381 * open.c (new_unit): Moved test for positioned direct access error.
3382 (init_units): Corrected calculation of max records.
3384 2004-02-06 Feng Wang <fengwang@nudt.edu.cn>
3386 * Makefile.am: Add m4/dotprodc.m4. And fix spelling.
3387 * Makefile.in: Regenerate.
3388 * m4/dotprodc.m4: New file. Implement complex dot_product.
3389 * m4/dotprod.m4: Delete the complex implementation.
3390 * generated/dotprod_*: Update.
3392 2004-02-07 Bud Davis <bdavis9659@comcast.net>
3394 * transfer.c (write_constant_string): Do not delete H's in hollerith
3397 2004-01-05 Andrew Pinski <apinski@apple.com>
3399 * configure.in: Check for csin in -lmx also.
3400 * configure: Regenerate.
3402 2004-01-01 Paul Brook <paul@codesourcery.com>
3404 * io/list_read.c (find_nml_node): Make static.
3405 (match_namelist_name): Ditto.
3406 * io/read.c (convert_precision_real): Make static, fix spelling.
3407 * io/transfer.c (extract_real): Remove unused prototype.
3408 (st_set_nml_var): Make static.
3409 * io/write.c (extract_real): Make static.
3411 2003-12-12 Huang Chun <chunhuang73@hotmal.com>
3413 * intrinsics/string_intrinsics.c (string_index): Fix logics thinko.
3415 2003-12-05 Melvin Hadasht <melvin.hadasht@free.fr>
3417 * io/transfer.c (data_transfer_init): Give a runtime error for list
3418 formatted reads and writes from/to files opened for unformatted IO.
3420 2003-11-30 Paul Brook <paul@nowt.org>
3422 * runtime/memory.c (push_context): Remove.
3423 (pop_context): Remove.
3424 * libgfortran.h: Remove prototypes.
3426 2003-11-27 Paul Brook <paul@nowt.org>
3428 * runtime/memory.c (deallocate): Nullify pointer after freeing.
3430 2003-11-27 Paul Brook <paul@nowt.org>
3432 * intrinsics/string_intrinsics.c: Use new memory allocation interface.
3433 * libgfortran.h: Ditto.
3434 * m4/in_pack.m4: Ditto.
3435 * runtime/in_pack_generic.c: Ditto.
3436 * runtime/memory.c: Ditto.
3438 2003-11-26 Richard Henderson <rth@redhat.com>
3440 * m4/exponent.m4, m4/fraction.m4: New.
3441 * m4/nearest.m4, m4/set_exponent.m4: New.
3442 * generated/*: Update.
3443 * Makefile.am: Add them.
3444 (AM_CFLAGS): New. Use -std=gnu99.
3445 * Makefile.in: Regenerate.
3447 2003-11-08 Paul Brook <paul@nowt.org>
3450 * m4/maxloc0.m4: Use default value of 1. Handle zero sized arrays.
3451 * m4/maxloc1.m4: Ditto.
3452 * m4/minloc0.m4: Ditto.
3453 * m4/minloc1.m4: Ditto.
3454 * m4/ifunction.m4: Set return value for zero sized arrays.
3455 * m4/iforeach.m4: Ditto.
3456 * m4/all.m4, m4/any.m4, m4/count.m4, m4/maxloc1.m4, m4/minloc1.m4,
3457 m4/mxaval.m4, m4/minval.m4, m4/product.m4, m4/sum.m4: Ditto.
3458 * generated/*: Update.
3460 2003-10-30 Toon Moene <toon@moene.indiv.nluug.nl>
3463 * io/list_read.c (eat_spaces): Treat tab as space.
3465 2003-10-30 Lars Segerlund <Lars.Segerlund@comsys.se>
3467 * intrinsics/random.c: Add reference to paper containing algorithm.
3468 (random_seed): Extra error checking and proper handling of arrays.
3469 (arandom_r4, arandom_r8): Implement.
3471 2003-10-29 Toon Moene <toon@moene.indiv.nluug.nl>
3474 * runtime/memory.c (allocate_size): Allow allocation
3475 of zero-sized objects.
3477 2003-10-29 Toon Moene <toon@moene.indiv.nluug.nl>
3480 * open.c (new_unit): Open without a file name opens
3481 a file with name fort.<unit>.
3483 2003-10-12 Feng Wang <wf_cs@yahoo.com>
3485 * intrinsics/cshift0.c: New file.
3486 * m4/cshift1.m4: New file
3487 * generated/cshift*.c: New files.
3488 * Makefile.am: Add them.
3489 * Makefile.in: Regenerate.
3491 2003-10-12 XiaoQiang Zhang <zhangapache@yahoo.com>
3493 * io/list_read.c (read_character): Remove unwanted call to free_saved.
3495 2003-10-11 Huang Chun <jiwang@mail.edu.cn>
3497 * intrinsics/string_intrinsics.c (string_trim): New function.
3498 (string_repeat): New function.
3500 2003-10-11 Paul Brook <paul@nowt.org>
3502 * intrinsics/dprod_r8.f90: New file.
3503 * Makefile.am (gfor_specific_src): Add it.
3504 (gfor_built_specific_src): Rename from gfor_build_specific_c.
3506 (gfor_specific2_src): Rename from gfor_built_specific2_c.
3508 * Makefile.in: Regenerate.
3509 * generated/_aint_*.f90: New files.
3510 * generated/_anint*.f90: New files.
3511 * generated/_atan2*.f90: New files.
3512 * generated/_mod*.f90: New files.
3514 2003-09-20 Kejia Zhao <kejia_zh@yahoo.com.cn>
3516 * intrinsics/selected_kind.f90: New file.
3517 * Makefile.am: Add it.
3518 * Makefile.in: regenerate.
3520 2003-09-19 Lars Segerlund <Lars.Segerlund@comsys.se>
3521 Paul Brook <paul@nowt.org>
3523 * intrinsics/random.c: New file.
3524 * Makefile.am (gfor_hemper_src): Add it.
3525 (gfor_specific_c): Fix typo.
3527 2003-09-19 Paul Brook <paul@nowt.org>
3529 * All: rename g95->gfc.
3531 2003-09-18 XiaoQiang Zhang <zhangapache@yahoo.com>
3533 * io/write.c (output_float): Fix bug of FMT_E, Add comments.
3535 2003-09-09 XiaoQiang Zhang <zhangapache@yahoo.com>
3537 * io/write.c (write_float): Dectection of positive infinite number,
3538 Not a Number(NaN) and negative infinite number.
3539 (ioutput_float): Bug fix for FMT_E and FMT_D processing to
3540 output a very_very small number ( < 0.1e-100 ).
3542 2003-09-07 XiaoQiang Zhang <zhangapache@yahoo.com>
3544 * libgfortran.h (xtoa, itoa): Parameter modified.
3545 * io/io.h (namelist_info): Declaration to support namelist I/O
3546 (st_parameter): Add namelist related component
3547 (ionml, empty_internal_buffer, st_set_nml_var_int,
3548 st_set_nml_var_float, st_set_nml_var_char, st_set_nml_var_complex,
3549 st_set_nml_var_log): Declaration
3550 (set_integer, set_integer): Parameter changed
3551 * io/format.c (free_nodes): Fix annoying bug of lefting "deallocated"
3553 (parse_format_list): Fix bug about FMT_SLASH
3554 * io/list_read.c (push_char): Totally clear old saved_string, zeroize
3555 newly allocated saved_string
3556 (next_char): Add detection of End_Of_Line support
3557 (convert_integer): Now can process 64 bits interger
3558 (read_real): Bug fixed
3559 (init_at_eol, find_nml_node, match_namelist_name): Add new functions
3560 (match_namelist_name): New implemention
3561 * io/lock.c (ionml): New global variable
3562 (library_end): Free memory in ionml
3563 * io/open.c (st_open): Variable initializtion
3564 * io/read.c (max_value): 64 bits interger support
3565 (convert_precsion_real): New procedure to replace "strtod" with more
3567 (read_f, read_radix): Input bug fix
3568 * io/transfer.c: (sf_seen_eor): New static variable
3569 (read_sf): Zeroize base buffer; fix bugs: single read statement can
3570 not get input in mutli line when read from stdin
3571 (formatted_transfer): Fix bug of FMT_O, FMT_B, FMT_Z for INTEGER type
3573 (data_transfer_init): Clear internal buffer for Internel File I/O.
3574 Internal File now worked. Detect some error condition for namelist.
3576 (next_record_w): Internal file and Namelist I/O support.
3577 (st_set_nml_var, st_set_nml_var_float, st_set_nml_var_char,
3578 st_set_nml_var_complex, st_set_nml_var_log): Implemention.
3579 * io/unit.c (implicit_unit): Deletion
3580 (get_unit): Now cannot open a unit implicitly.
3581 * io/unix.c (mmap_alloc): Fix fatal error in calculating the length of
3583 (mem_alloc_r_at): Internal file I/O support added
3584 (empty_internal_buffer): New function
3585 * io/write.c (extract_int): Support 64 bits interger processing
3586 (output_float): Varibale initialization
3587 (write_float): Infinite real number detection.
3588 (write_int): 64 bits integer I/O support
3589 (write_decimal): New function to output decimal number
3590 (otoa, btoa): Better implemention and 64 bits interger support
3591 (namelist_write): New function
3592 * runtime/error.c (itoa, xtoa): Better implemention and 64 bits
3595 2003-08-15 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
3597 * libgfortran.h (os_error, runtime_error,internal_error, sys_exit,
3598 get_mem ): Add attribute.
3599 * intrinsics/spread_generic.c (__spread): Fix spelling.
3600 * io/inquire.c (inquire_via_filename): Add const.
3601 * io/io.h (sys_exit): Add attribute.
3602 * io/io.h (move_pos_offset): Add move_pos_offset.
3603 * io/io.h (compare_file_filename, inquire_sequential, inquire_direct,
3604 inquire_formatted, inquire_unformatted, inquire_read, inquire_write,
3605 inquire_readwrite, convert_real, write_a, write_b, write_d, write_e,
3606 write_en, write_es, write_f, write_i, write_l, write_o, write_x,
3607 write_z): Add const.
3608 * io/read.c (convert_real): Add const.
3609 * io/transfer.c (type_name): Add const.
3610 * io/unix.c (unpack_filename, compare_file_filename,inquire_sequential,
3611 inquire_direct, inquire_formatted, inquire_unformatted, inquire_access,
3612 inquire_read, inquire_write, inquire_readwrite): Add const.
3613 * io/write.c (output_float): Remove unused variable.
3614 * io/write.c (write_a, extract_int, extract_real, output_float,
3615 write_float, write_int, write_i, write_b, write_o, write_z, write_d,
3616 write_e, write_f, write_en, write_es, write_logical, write_integer,
3617 write_character, write_real, write_complex): Add const.
3618 * runtime/error.c (rtoa): Remove unused variable.
3619 * runtime/select.c (select_string): Add const.
3620 * runtime/stop.c (stop_string): Add const.
3622 2003-08-10 Paul Brook <paul@nowt.org>
3624 * Makefile.am (gfor_helper_src): Add intrinsics/abort.c.
3625 (FFLAGS): Add -fno-underscoring.
3626 * Makefile.in: Regenerate.
3627 * intrinsics/abort.c: New file.
3629 2003-08-10 Erik Schnetter <schnetter@uni-tuebingen.de>
3631 * fmain.c (main): Do not call init and cleanup; call set_args instead.
3632 * libgfortran.h (init, cleanup): Remove declarations.
3633 (set_args): Add declaration.
3634 * runtime/main.c (init, cleanup): Make them static, and give them
3635 the constructor and destructor attributes.
3636 (set_args): New function.
3638 2003-08-10 Paul Brook <paul@nowt.org>
3640 * intrinsics/strinf_intrinsics.c (compare_string): Return value based
3641 on which string is longest.
3643 2003-08-10 Paul Brook <paul@nowt.org>
3645 * Makefile.am (EXTRA_DIST): Remove old files.
3646 * Makefile.in: Regenerate.
3648 2003-07-26 Paul Brook <paul@nowt.org>
3650 Rename library to libgfortran.
3651 * libgfortran.h: Change prefix to _libgfortran_.
3653 2003-07-24 Paul Brook <paul@nowt.org>
3655 * configure.in: Don't pull in system libtool. Use toplevel
3658 2003-07-22 Paul Brook <paul@nowt.org>
3660 Regenerate all configury files.
3662 2003-07-09 Chun Huang <compiler@sohu.com>
3664 * intrinsics/string_intrinsic.c (string_scan): New function.
3665 (string_verify): New function.
3667 2003-06-25 Paul Brook <paul@nowt.org>
3669 * io/unix.c (mem_alloc_r_at, mem_alloc_w_at): Advance logical_offset.
3670 (mem_seek): Don't bother setting physical_offset.
3672 2003-06-20 Paul Brook <paul@nowt.org>
3674 * libgfor.h (stop_numeric): Declare.
3675 * runtime/pause.c: New file.
3676 * Makefile.am: Add it.
3678 2003-06-08 Paul Brook <paul@nowt.org>
3680 * m4/cexp.m4 (cabs): Use correct typed version.
3681 (csqrt): New function.
3683 2003-06-07 Canqun Yang <canqun@yahoo.com.cn>
3685 Spotted by Benjamin and Tobias:
3686 * io/list_read.c: Add Separator '\t'.
3687 (parse_real, read_real): Accept real values starting with an optional
3688 sign follows a decimal point.
3690 2003-06-06 Steven Bosscher <steven@gcc.gnu.org>
3692 * Makefile.am: Don't put cmath objects in subdir.
3693 * configure.in: Rename MATHOBJ to MATH_OBJ.
3695 2003-06-02 Kejia Zhao <Kejia_zh@yahoo.com.cn>
3697 * intrinsics/associated.c: New file.
3698 * Makefile.am: Add it. Regenerate Makefile.in.
3699 * libgfor.h: Define g95_array_void, G95_DESCRIPTOR_DATA, and
3700 G95_DESCRIPTOR_DTYPE.
3702 2003-06-01 Canqun Yang <canqun@yahoo.com.cn>
3704 * io/write.c (calcuate_exp): Rewrite it to avoid overflow.
3705 (calculate_G_format): Rewrite it to eliminate an infinte loop and set
3706 the scale_factor to 0 for F editing.
3708 2003-05-11 Tobias Schlter <innenminister@gmx.de>
3710 * libgfor.h: Only include stdint.h if it exists.
3712 2003-05-07 Paul Brook <paul@nowt.org>
3714 * libgfor.h: Use stdint.h types.
3715 * intrinsics/ishift.c: Ditto.
3716 * runtime/memory.c (malloc_t): Reorder fields for better alignment.
3718 2003-05-05 Steven Bosscher <steven@gcc.gnu.org>
3720 * libgfor.h (offsetof): Define if nobody else does.
3721 * runtime/memory.c (HEADER_SIZE): Use it.
3723 2003-05-01 Tobias Schlter <innenminister@gmx.de>
3725 * configure.in: Require autoconf 2.54.
3727 2003-04-28 Tobias Schlter <innenminister@gmx.de>
3728 Paul Brook <paul@nowt.org>
3730 * intrinsics/reshape_generic.c: Copy the whole element, not just the
3732 * m4/transpose.m4: New file.
3733 * Makefile.am: Add them.
3734 Regenerate generated files.
3736 2003-04-18 Steven Bosscher <steven@gcc.gnu.org>
3738 * io/format.c (parse_format_list): Allow 'X' without integer
3739 prefix. This is an extension. Interpretation is '1X'.
3741 2003-04-18 Tobias Schlter <Tobias.Schlueter@physik.uni-muenchen.de>
3743 * io/format.c (parse_format_list): Allow '0P'.
3745 2003-04-18 Steven Bosscher <steven@gcc.gnu.org>
3747 * Makefile.in: Re-regenerate for automake 1.7.3.
3749 2003-04-18 Canqun Yang <canqun@yahoo.com.cn>
3751 Port implementation for CHARACTER SELECT from Andy's tree.
3752 * runtime/select.c: New file
3753 * Makefile.am: Add it.
3754 * Makefile.in: Regenerate.
3756 2003-04-17 Xiaoqiang Zhang <zhangapache@yahoo.com>
3758 * io/transfer.c (formatted_transfer): Modified
3759 * io/unix.c (move_pos_offset): New Function.
3760 * io/format.c (parse_format_list): Modified.
3762 2003-04-15 Xiaoqiang Zhang <zhangapache@yahoo.com>
3764 * io/write.c (write_float,write_real): New implemention of
3765 FMT_G and default float editing.
3766 (calculate_exp,calculate_G_format,output_float): New Function.
3767 (write_float,write_real,write_logical): Modified
3768 * libgfor.h (default_rtoa): Remove Declaration.
3769 * runtime/error.c (default_rtoa): Remove Function.
3771 2003-04-15 Steven Bosscher <steven@gcc.gnu.org>
3774 * io/write.c (extract_real): Add missing break statement.
3776 2003-04-13 Steven Bosscher <steven@gcc.gnu.org>
3778 * cpu_time.c: Make sure we have a definition of HZ. Don't
3779 rely on CLOCKS_PER_SEC, it is always 1000000, on any system.
3781 2003-04-13 Steven Bosscher <steven@gcc.gnu.org>
3782 Paul Brook <paul@nowt.org>
3784 * configure.in: Check for process time headers and GETTIMEOFDAY.
3785 * makefile.am: Add intrinsics/cpu_time.c.
3786 * acinclude.m4: New file.
3787 * intrinsics/cpu_time.c: New file.
3788 * m4/dotprodl.m4: Fix typo.
3789 Regenerate generated files.
3791 2003-04-11 Xiaoqiang Zhang <zhangapache@yahoo.com>
3793 * io/write.c (extract_real): Ouput floating point value.
3794 (write_float): New Function.
3795 (write_e, write_f, write_en, write_es): Modified
3796 * io/transfer.c (formatted_transfer): Modified.
3797 * libgfor.h (default_rtoa): Declaration.
3798 (rtoa): Declaration.
3799 * runtime/error.c (default_rtoa): New Function.
3800 (rtoa): New Function.
3802 2003-04-05 Paul Brook <paul@nowt.org>
3804 * intrinsics/spread_generic.c: New file.
3805 * Makefile.am: Add it. Regenerate Makefile.in.
3807 2003-03-29 Paul Brook <paul@nowt.org>
3809 * intrinsics/pack_generic.c: New file.
3810 * intrinsics/unpack_generic.c: New file.
3811 * Makefile.am: Add them. Regenerate Makefile.in.
3813 2003-03-25 Paul Brook <paul@nowt.org>
3815 * intrinsics/eoshift0.c: New file.
3816 * intrinsics/eoshift2.c: New file.
3817 * m4/eoshift1.m4: New file.
3818 * m4/eoshift3.m4: New file.
3819 * Makefile.am: Add them.
3820 * in_unpack_generic.c: Initialize src.
3821 Regenerate generated files.
3823 2003-03-14 Paul Brook <paul@nowt.org>
3825 * m4/shape.m4: Work properly with array temporaries.
3826 * m4/in_pack.m4: Skip redundant checks for array temporaries.
3827 * runtime/in_pack_generic.c: Ditto.
3829 2003-03-12 Paul Brook <paul@nowt.org>
3831 * m4/shape.m4: Work properly with noncontiguous arrays.
3833 2003-03-08 Paul Brook <paul@nowt.org>
3835 * m4/in_pack.m4: Correctly handle zero sized and assumed size arrays.
3836 * runtime/in_pack_generic.c: Ditto.
3838 2003-02-08 Paul Brook <paul@nowt.org>
3840 * intrinsics/reshape_generic.c: Use runtime_error to report errors.
3841 * io/close.c (st_close): Return void.
3842 * io/open.c (st_open): Return void.
3843 * libgfor.h (g95_array_char): Declare.
3844 (internal_malloc_size): Ditto.
3845 (internal_pack*, internal_unpack*): Ditto.
3846 * m4/in_pack.m4: Allocate storage if neccessary. Fix logic for packed
3848 * m4/in_unpack.m4: Include file fixes.
3849 * m4/reshape.m4: Increment the correct source pointer.
3850 * Makefile.am (maxloc): Fix typo.
3851 * runtime/in_pack_generic.c: Call optimized functions. Allocate
3852 storage if neccessary. Fix logic for packed arrays.
3853 * runtime/in_unpack_generic.c: Call optimized functions.
3854 * runtime/main.c: Use runtime_error to report errors.
3855 * memory.c (internal_malloc_size): Make non-static.
3857 2003-02-02 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
3859 * reshape_packed.c, lock.c: Add #include <string.h>.
3860 * libgfor.h, format.c, inquire.c, io.h, transfer.c, unix.c,
3861 environ.c, error.c, memory.c, string.c: Add const.
3862 * error.c (show_locus): Add void.
3864 2003-02-21 Paul Brook <paul@nowt.org>
3866 * m4/in_pack.m4: Avoid returning const * parameter.
3867 * Makefile.am: Only regenerate files in maintainer mode.
3869 2003-02-20 Paul Brook <paul@nowt.org>
3871 Add array repacking support functions.
3872 * m4/in_pack.m4, m4/in_unpack.m4: New files.
3873 * runtime/in_pack_generic.c, runtime/in_unpack_generic.c: New files.
3874 * Makefile.am: Build them. Regenerate configury files.
3875 * generated/: New directory for generated files (need to move
3876 everything else there).
3878 2003-02-07 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3880 * m4/cexp.m4: Fix typo.
3882 2003-01-26 Paul Brook <paul@nowt.org>
3884 * intrinsics/: Add missing generated files.
3886 2003-01-26 Paul Brook <paul@nowt.org>
3888 * Makefile.am: Put -I before the filename.
3890 2003-01-24 Paul Brook <paul@nowt.org>
3892 * configure.in: Add AM_MAINTAINER_MODE.
3894 2003-01-23 Paul Brook <paul@nowt.org>
3896 * configure.in, Makefile.am: Modify to work with unmodified autoconf
3898 Also regenerate other configury files.
3900 2003-01-21 Paul Brook <paul@nowt.org>
3902 * io/read.c: Don't use stdint.h, it doesn't exist on cygwin.
3904 2003-01-20 Steven Bosscher <s.bosscher@student.tudelft.nl>
3906 * io/read.c (read_f): Don't use alloca, but safe get_mem instead.
3907 Don't include "alloca.h".
3909 2003-01-20 Steven Bosscher <s.bosscher@student.tudelft.nl>
3911 * intrinsics/string.c: Rename to intrinsics/string_intrinsics.c.
3912 * Makefile.am: Adjust file name.
3913 * Makefile.in: Regenerate.
3914 * gfortypes.h: Kill, include everything in...
3915 * libgfor.h: ...here. Include config.h
3916 * fmain.c, intrinsics/ishftc.c, intrinsic/reshape_generic.c,
3917 intrinsics/reshape_i4.c, intrinsics/reshape_i8.c,
3918 intrinsics/reshape_packed.c, intrinsics/size.c,
3919 m4/reshape.m4, runtime/main.c, runtime/memory.c: Use macro
3920 for prefix for all functions instead of hardcoded.
3922 2003-01-19 Steven Bosscher <s.bosscher@student.tudelft.nl>
3924 * io/lock.c (library_end): Propagate library return
3927 2003-01-19 Steven Bosscher <s.bosscher@student.tudelft.nl>
3929 Port fixes from Andy's tree:
3930 * io/read.c (read_decimal): Reverse sense of overflow
3931 comparison during integer reads.
3932 * io/format.c (revert): Fix comment.
3933 (next_format): Fix format revision.
3934 * io/unix.c: Fix and simplify mmap version of stream
3937 2003-01-11 Paul Brook <paul@nowt.org>
3939 * configure, Makefile.in: Regenerate.
3941 2003-01-11 Paul Brook <paul@nowt.org>
3943 * runtime/stop.c: Rewrite.
3945 2003-01-08 Paul Brook <paul@nowt.org>
3947 * configure, Makefile.in: Regenerate.
3949 2003-01-05 Paul Brook <paul@nowt.org>
3951 * (*.m4) Move to m4/.
3952 * intrinsics/string.c (_gfor_string_index): New Function.
3954 2002-12-29 Paul Brook <paul@nowt.org>
3956 * intrinsics/reshape.*: New files.
3957 * gcc_config.patch: Update to new GCC configure system.
3959 2002-10-10 Paul Brook <paul@nowt.org>
3961 * intrinsics/size.c: New file.
3962 * intrinsics/shape.m4: New file.
3963 * Makefile.am: Add above files.
3965 2002-10-02 Paul Brook <paul@nowt.org>
3967 * fmain.c (main): Move here.
3968 * libgfor.c: From here.
3969 * libgfor.h (gfor_init, gfor_runtime_cleanup): Declare.
3970 * Makefile.am: Build libgforbegin.
3971 * gcc_config.patch: Remove stray -march=athlon.
3972 * dotprodl.m4: Fix use of L8_TO_L4 macro.
3973 * ifunction.m4: Move variable declarations to allow compilation with
3975 * specific.m4, specific4.m4: Fix typo typecode->type_code.
3976 * README: Document use of patch -p1.
3978 2002-09-12 Paul Brook <paul@nowt.org>
3980 * math/*: Add complex math library functions.
3981 * intrinsics/specific(2).m4: Generate Specific intrinsic functions.
3982 * Makefile.am: Add details for above.
3983 * configure.in: Use AC_PROG_F95. Test for the presence of csin.
3985 2002-09-09 Paul Brook <paul@nowt.org>
3987 * libgfor.c (determine_endianness): Use an array rather than a struct.
3988 * intrinsics/dotprod*, matmul*: Implement DOT_PRODUCT and MATMUL.
3990 2002-09-09 Steven Bosscher <s.bosscher@student.tudelft.nl>
3992 * libgfor.c: Add fatal signal handler.
3993 Romove superfluous abort() calls.
3995 2002-09-07 Paul Brook <paul@nowt.org>
3997 * Makefile.am, intrinsics: Major rewrite.
3999 2002-09-02 Paul Brook <paul@nowt.org>
4001 * Makefile.am: Added -I$(srcdir) to m4 rule.
4003 2002-08-30 Paul Brook <paul@nowt.org>
4005 * io/*: Integrated libgforio.
4006 * Makefile.am, configure.in: Make compatable with GCC. Build code for
4007 intrinsics in the intrisics directory.
4008 * intrinsics/intrinsics.m4: Move here. Strip directories from the
4009 filename. Add 'and' and 'all' intrinsics.
4011 2002-08-17 Paul Brook <paul@nowt.org>
4013 * ALL: First release as more than just a single file