1 2005-10-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
4 * acinclude.m4 (LIBGFOR_CHECK_WORKING_STAT): New check.
5 * configure.ac: Use LIBGFOR_CHECK_WORKING_STAT.
6 * Makefile.in: Regenerate.
7 * configure: Regenerate.
8 * config.h.in: Regenerate.
9 * aclocal.m4: Regenerate.
10 * io/unix.c (compare_file_filename): Add fallback case for
11 systems without working stat.
12 * io/open.c (already_open): Correct call to
13 compare_file_filename.
14 * io/io.h: Correct proto for compare_file_filename.
16 2005-10-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
18 * runtime/fpu.c: Add _GNU_SOURCE definition.
19 * config/fpu-glibc.h: Remove __USE_GNU definition.
21 2005-10-23 Paul Thomas <pault@gcc.gnu.org>
24 * intrinsics/spread_generic.c (spread_internal_scalar): New
25 function that handles the special case of spread with a scalar
26 source. This has new interface functions -
27 (spread_scalar, spread_char_scalar): New functions to interface
28 with the calls specified in gfc_resolve_spread.
30 2005-10-21 Francois-Xavier Coudert <coudert@clipper.ens.fr>
33 * io/unix.c: Add fallback definition for SSIZE_MAX.
35 2005-10-19 Francois-Xavier Coudert <coudert@clipper.ens.fr>
37 * c99_protos.h: Define preprocessor HAVE_ macros with value 1
38 instead of empty value.
39 * intrinsics/c99_functions.c: Likewise.
40 * intrinsics/getXid.c: Define HAVE_GETPID with value 1 instead of
42 * intrinsics/sleep.c: Define HAVE_SLEEP with value 1 instead of
45 2005-10-19 Francois-Xavier Coudert <coudert@clipper.ens.fr>
48 * c99_protos.h: Define HAVE_ macros for all provided functions.
50 2005-10-14 Uros Bizjak <uros@kss-loka.si>
52 * config/fpu-387.h (set_fpu): Remove extra ":" in stmxcsr.
53 Change cw and cw_sse variables to unsigned.
54 (SSE): New definition.
57 2005-10-13 Thomas Koenig <Thomas.Koenig@online.de>
59 * io/unix.c(fd_alloc_r_at): Use read() instead of do_read()
60 only in case of special files (e.g. terminals).
62 2005-10-13 Uros Bizjak <uros@kss-loka.si>
64 * config/fpu-387.h (set_fpu): Add "=m" for stmxcsr.
66 2005-10-12 Francois-Xavier Coudert <coudert@clipper.ens.fr>
68 * Makefile.am: Add fpu.c to the build process, and
69 target-dependent code as fpu-target.h.
70 * Makefile.in: Regenerate.
71 * configure.ac: Add call to configure.host to set
73 * configure: Regenerate.
74 * configure.host: New script to determine which host-dependent
76 * libgfortran.h: Add fpe option, remove previous fpu_ options.
77 Add bitmasks for different FPE traps. Add prototype for set_fpu.
78 * runtime/environ.c: Remove environment variables to control
80 * runtime/fpu.c (set_fpe): New function for the front-end.
81 * runtime/main.c (init): Set FPU state.
82 * config: New directory to store host-dependent code.
83 * config/fpu-387.h: New file with code handling the i387 FPU.
84 * config/fpu-glibc.h: New file with code for glibc systems.
85 * config/fpu-generic.h: Fallback for the most generic host. Issue
88 2005-10-12 Janne Blomqvist <jblomqvi@cc.hut.fi>
90 * io/unix.c(fd_alloc_r_at): Remove parts of patch of 2005/10/07 that
91 cause input from the terminal to hang.
93 2005-10-11 Steven G. Kargl <kargls@comcast.net>
96 * c99_functions.c (csqrtf, csqrt): Fix choice of branch cut. Note
97 csqrt{f} were imported from glibc, and this bug is still present
98 there. glibc PR is 1146.
100 2005-10-07 Janne Blomqvist <jblomqvi@cc.hut.fi>
104 * io/io.h: Add read and write members to stream, define access
106 * io/transfer.c (read_block_direct): New function.
107 (write_block_direct): New function.
108 (unformatted_read): Change to use read_block_direct.
109 (unformatted_write): Change to use write_block_direct.
110 * io/unix.c: Remove mmap includes and defines.
113 (reset_stream): New function.
114 (do_read): New function.
115 (do_write): New function.
116 (fd_flush): Change to use do_write() instead of writen().
117 (fd_alloc_r_at): Change to use do_read().
118 (fd_seek): Change return type to try, as the prototype. Add check
119 to avoid syscall overhead if possible.
120 (fd_read): New function.
121 (fd_write): New function.
122 (fd_open): Set pointers for new functions.
123 (mem_read): New function.
124 (mem_write): New function.
125 (open_internal): Set pointers for new functions.
126 (is_seekable): Clean up comment.
128 2005-10-07 Jerry DeLisle <jvdelisle@verizon.net>
130 * io/transfer.c (write_block): Add test for end-of-file condition,
131 removed from mem_alloc_w_at. (next_record_w): Clean up checks for
132 NULL pointer returns from s_alloc_w.
133 * io/unix.c (mem_alloc_w_at): Remove call to generate_error end-of-file.
134 * io/write.c (write_float): Add checks for NULL pointer returns from
135 write_block calls. (write_integer): Same.
137 2005-10-03 Jakub Jelinek <jakub@redhat.com>
139 * runtime/memory.c (allocate_size): Malloc 1 byte if size == 0.
141 2005-10-03 Francois-Xavier Coudert <coudert@clipper.ens.fr>
145 * Makefile.am: Add generated files for large real and integers
146 kinds. Add a rule to create the kinds.inc c99_protos.inc files.
147 Use kinds.inc to preprocess Fortran generated files.
148 * libgfortran.h: Add macro definitions for GFC_INTEGER_16_HUGE,
149 GFC_REAL_10_HUGE and GFC_REAL_16_HUGE. Add types gfc_array_i16,
150 gfc_array_r10, gfc_array_r16, gfc_array_c10, gfc_array_c16,
152 * mk-kinds-h.sh: Define macros HAVE_GFC_LOGICAL_* and
153 HAVE_GFC_COMPLEX_* when these types are available.
154 * intrinsics/ishftc.c (ishftc16): New function for GFC_INTEGER_16.
155 * m4/all.m4, m4/any.m4, m4/count.m4, m4/cshift1.m4, m4/dotprod.m4,
156 m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4, m4/eoshift3.m4,
157 m4/exponent.m4, m4/fraction.m4, m4/in_pack.m4, m4/in_unpack.m4,
158 m4/matmul.m4, m4/matmull.m4, m4/maxloc0.m4, m4/maxloc1.m4,
159 m4/maxval.m4, m4/minloc0.m4, m4/minloc1.m4, m4/minval.m4, m4/mtype.m4,
160 m4/nearest.m4, m4/pow.m4, m4/product.m4, m4/reshape.m4,
161 m4/set_exponent.m4, m4/shape.m4, m4/specific.m4, m4/specific2.m4,
162 m4/sum.m4, m4/transpose.m4: Protect generated functions with
163 appropriate "#if defined (HAVE_GFC_type_kind)" preprocessor directives.
164 * Makefile.in: Regenerate.
165 * all files in generated/: Regenerate.
167 2005-10-01 Jakub Jelinek <jakub@redhat.com>
169 * runtime/memory.c (malloc_t): Remove.
170 (GFC_MALLOC_MAGIC, HEADER_SIZE, DATA_POINTER, DATA_HEADER): Remove.
171 (mem_root, runtime_cleanup, malloc_with_header): Remove.
172 (internal_malloc_size): Use just get_mem if size != 0, return NULL
174 (internal_free): Just free if non-NULL.
175 (internal_realloc_size): Remove debugging stuff.
176 (allocate_size): Use malloc directly, remove debugging stuff.
177 (deallocate): Use free directly, fix error message wording.
179 * libgfortran.h (GFC_ITOA_BUF_SIZE, GFC_XTOA_BUF_SIZE,
180 GFC_OTOA_BUF_SIZE, GFC_BTOA_BUF_SIZE): Define.
181 (gfc_itoa, xtoa): Add 2 extra arguments.
182 * runtime/environ.c: Include stdio.h.
183 (check_buffered): Use sprintf.
184 * runtime/error.c: Include assert.h.
185 (gfc_itoa, xtoa): Add 2 extra arguments, avoid using static
187 (st_printf, st_sprintf): Adjust callers.
188 * io/write.c (otoa, btoa): Add 2 extra arguments, avoid using
190 (write_int, write_decimal): Add 2 extra arguments to conv
191 function pointer, adjust caller.
192 (write_integer): Adjust gfc_itoa caller.
194 * io/unit.c (get_array_unit_len): Return 0 rather than NULL.
196 * io/read.c (read_f): Remove spurious pointer dereference.
198 2005-09-30 Janne Blomqvist <jblomqvi@cc.hut.fi>
201 * io/open.c (edit_modes): Check for correct flag.
203 2005-09-29 Jakub Jelinek <jakub@redhat.com>
205 * runtime/string.c (find_option): Change 3rd argument to
207 * libgfortran.h (find_option): Likewise.
208 * runtime/environ.c (rounding, precision, signal_choices): Constify.
209 (init_choice, show_choice): Change 2nd argument to const choice *.
210 * io/open.c (access_opt, action_opt, blank_opt, delim_opt, form_opt,
211 position_opt, status_opt, pad_opt): Constify.
212 * io/transfer.c (advance_opt): Likewise.
213 * io/inquire.c (undefined): Likewise.
214 * io/close.c (status_opt): Likewise.
215 * io/format.c (posint_required, period_required, nonneg_required,
216 unexpected_element, unexpected_end, bad_string, bad_hollerith,
217 reversion_error): Likewise.
218 * io/unix.c (yes, no, unknown): Change from const char *
221 2005-09-27 Steve Ellcey <sje@cup.hp.com>
224 * acinclude.m4 (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE): New.
225 (LIBGFOR_CHECK_FOR_BROKEN_ISNAN): New.
226 (LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): New.
227 * configure.ac (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE): Add use.
228 (LIBGFOR_CHECK_FOR_BROKEN_ISNAN): Add use.
229 (LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): Add use.
230 * configure: Regenerate.
231 * config.h.in: Regenerate.
232 * libgfortan.h (isfinite): undef if broken, set if needed.
233 (isnan): undef if broken, set if needed.
234 (fpclassify): undef if broken, set if needed.
235 * io/write.c: Remove TODO comment about working isfinite.
236 * intrinsics/c99_functions.c (round): Use isfinite instead
238 * intrinsics/c99_functions.c (roundf): Ditto.
240 2005-09-24 Janne Blomqvist <jblomqvi@cc.hut.fi>
242 * io.h: Changed prototypes of list_formatted_{read|write}.
243 * list_read.c (list_formatted_read): Renamed to
244 list_formatted_read_scalar and made static.
245 (list_formatted_read): New function.
246 * transfer.c: Prototype for transfer_array. Changed transfer
248 (unformatted_read): Add nelems argument, use it.
249 (unformatted_write): Likewise.
250 (formatted_transfer): Changed name to formatted_transfer_scalar.
251 (formatted_transfer): New function.
252 (transfer_integer): Add nelems argument to transfer call, move
253 updating item count to transfer functions.
254 (transfer_real): Likewise.
255 (transfer_logical): Likewise.
256 (transfer_character): Likewise.
257 (transfer_complex): Likewise.
258 (transfer_array): New function.
259 (data_transfer_init): Call formatted_transfer with new argument.
260 (iolength_transfer): New argument, use it.
261 * write.c (list_formatted_write): Renamed to
262 list_formatted_write_scalar, made static.
263 (list_formatted_write): New function.
265 2005-09-26 David Edelsohn <edelsohn@gnu.org>
267 * configure.ac: Add check for __clog.
268 * configure: Regenerate.
270 2005-09-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
272 * c99_protos.h: Add prototypes for C99 complex functions.
273 * libgfortran.h: Include complex.h before c99_protos.h.
274 * intrinsics/c99_functions.c: Define HAVE_ macros for the
275 fallback functions we provide.
276 (cabsf, cabs, cabsl, cargf, carg, cargl, cexpf, cexp, cexpl,
277 clogf, clog, clogl, clog10f, clog10, clog10l, cpowf, cpow, cpowl,
278 cqsrtf, csqrt, csqrtl, csinhf, csinh, csinhl, ccoshf, ccosh,
279 ccoshl, ctanhf, ctanh, ctanhl, csinf, csin, csinl, ccosf, ccos,
280 ccosl, ctanf, ctan, ctanl): New fallback functions.
281 * Makefile.am (gfor_math_trig_c, gfor_math_trig_obj,
282 gfor_specific_c, gfor_cmath_src, gfor_cmath_obj): Remove.
283 * Makefile.in: Regenerate.
284 * configure.ac: Remove checks for csin. Add checks for all C99
286 * config.h.in: Regenerate.
287 * configure: Regenerate.
288 * aclocal.m4: Regenerate.
290 2005-09-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
291 Danny Smith <dannysmith@users.sourceforge.net>
294 * intrinsics/getXid.c: Add getpid wrapper for MinGW.
295 * intrinsics/getlog.c: Add getlogin wrapper for MinGW.
296 * intrinsics/hostnm.c: Add gethostname wrapper for MinGW.
298 2005-09-24 Francois-Xavier Coudert <coudert@clipper.ens.fr>
301 * intrinsics/sleep.c: Add correct sleep macro for MinGW.
303 2005-09-24 Francois-Xavier Coudert <coudert@clipper.ens.fr>
306 * intrinsics/cpu_time.c (__cpu_time_1): Provide a MS Windows
309 2005-09-14 Jerry DeLisle <jvdelisle@verizon.net
311 PR fortran/21875 Internal Unit Array I/O, NIST
312 * libgfortran.h: Add run time error code for array stride.
313 * runtime/error.c (translate_error): Add error message for
315 * io/io.h: Add array descriptor pointer to IOPARM structure.
316 Add prtotypes for two new functions.
317 * io/transfer.c (data_transfer_init): Removed initialization and
318 moved to unit.c (get_unit)
319 * io/transfer.c (next_record_r): Include internal unit read
321 * io/transfer.c (next_record_w): Include internal unit write
322 functionality, including padding of character array records.
323 * io/unit.c (get_array_unit_len): New function to return the number
324 of records in the character array 'file' from the array descriptor.
325 * io/unit.c (get_unit): Gathered initialization code from
326 init_data_transfer for internal units and added initialization of
327 character array unit.
328 * io/unit.c (is_array_io): New function to determine if internal unit
330 * io/unix.c (mem_alloc_w_at): Add error checks for bad record length
333 2005-09-13 Richard Sandiford <richard@codesourcery.com>
336 * intrinsics/cshift0.c (cshift0): Add an extra size argument.
337 (cshift0_1, cshift0_2, cshift0_4, cshift0_8): Replace explicit
338 implementations with...
339 (DEFINE_CSHIFT): ...this new macro. Define character versions too.
340 * intrinsics/eoshift0.c (zeros): Delete.
341 (eoshift0): Add extra size and filler arguments. Use memset if no
343 (eoshift0_1, eoshift0_2, eoshift0_4, eoshift0_8): Replace explicit
344 implementations with...
345 (DEFINE_EOSHIFT): ...this new macro. Define character versions too.
346 * intrinsics/eoshift2.c (zeros): Delete.
347 (eoshift2): Add extra size and filler arguments. Use memset if no
349 (eoshift2_1, eoshift2_2, eoshift2_4, eoshift2_8): Replace explicit
350 implementations with...
351 (DEFINE_EOSHIFT): ...this new macro. Define character versions too.
352 * intrinsics/pack.c (pack_internal): New static function, reusing
353 the contents of pack and adding an extra size argument. Change
354 "mptr" rather than "m" when calculating the array size.
355 (pack): Redefine as a forwarder to pack_internal.
356 (pack_s_internal): New static function, reusing the contents of
357 pack_s and adding an extra size argument.
358 (pack_s): Redefine as a forwarder to pack_s_internal.
359 (pack_char, pack_s_char): New functions.
360 * intrinsics/reshape.c (reshape_internal): New static function,
361 reusing the contents of reshape and adding an extra size argument.
362 (reshape): Redefine as a forwarder to reshape_internal.
363 (reshape_char): New function.
364 * intrinsics/spread.c (spread_internal): New static function,
365 reusing the contents of spread and adding an extra size argument.
366 (spread): Redefine as a forwarder to spread_internal.
367 (spread_char): New function.
368 * intrinsics/transpose.c (transpose_internal): New static function,
369 reusing the contents of transpose and adding an extra size argument.
370 (transpose): Redefine as a forwarder to transpose_internal.
371 (transpose_char): New function.
372 * intrinsics/unpack.c (unpack_internal): New static function, reusing
373 the contents of unpack1 and adding extra size and fsize arguments.
374 (unpack1): Redefine as a forwarder to unpack_internal.
375 (unpack0): Call unpack_internal instead of unpack1.
376 (unpack1_char, unpack0_char): New functions.
377 * m4/cshift1.m4 (cshift1): New static function, reusing the contents
378 of cshift1_<kind> and adding an extra size argument.
379 (cshift1_<kind>): Redefine as a forwarder to cshift1.
380 (cshift1_<kind>_char): New function.
381 * m4/eoshift1.m4 (zeros): Delete.
382 (eoshift1): New static function, reusing the contents of
383 eoshift1_<kind> and adding extra size and filler arguments.
384 Fix calculation of hstride. Use memset if no bound is provided.
385 (eoshift1_<kind>): Redefine as a forwarder to eoshift1.
386 (eoshift1_<kind>_char): New function.
387 * m4/eoshift3.m4 (zeros): Delete.
388 (eoshift3): New static function, reusing the contents of
389 eoshift3_<kind> and adding extra size and filler arguments.
390 Use memset if no bound is provided.
391 (eoshift3_<kind>): Redefine as a forwarder to eoshift3.
392 (eoshift3_<kind>_char): New function.
393 * generated/cshift1_4.c, generated/cshift1_8.c,
394 * generated/eoshift1_4.c, generated/eoshift1_8.c,
395 * generated/eoshift3_4.c, generated/eoshift3_8.c: Regenerate.
397 2005-09-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
400 * io/unix.c (is_preconnected): Add function to test if a stream
401 corresponds to a preconnected unit.
402 * io/io.h: Add prototype for is_preconnected.
403 * io/transfer.c (data_transfer_init): Do not truncate
406 2005-09-10 Janne Blomqvist <jblomqvi@cc.hut.fi>
408 * io/unix.c: Remove mmap code.
410 2005-09-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
413 * io/close.c (st_close): Call library_end even in case of error.
415 2005-09-09 Thomas Koenig <Thomas.Koenig@online.de>
417 * io/io.h: Add iomsg as last field of st_parameter.
418 * runtime/error.c (generate_error): If iomsg is present, copy
421 2005-09-09 Richard Sandiford <richard@codesourcery.com>
424 * runtime/memory.c (internal_malloc_size): Return a null pointer
426 (internal_free): Do nothing if the pointer is null.
427 (internal_realloc_size, internal_realloc, internal_realloc64): New.
429 2005-09-07 Francois-Xavier Coudert <coudert@clipper.ens.fr>
432 * acinclude.m4 (LIBGFOR_CHECK_CRLF): New check.
433 * configure.ac: Use new check.
434 * configure.in: Regenerate.
435 * config.h.in: Regenerate.
436 * configure: Regenerate.
437 * io/transfer.c (next_record_w): Add case for CRLF as line
439 * io/unix.c (tempfile, regular_file): Open files with
440 O_BINARY on systems with CRLF.
442 2005-09-07 Steve Ellcey <sje@cup.hp.com>
445 * io/write.c (extract_int): Use memcpy to access buffer.
446 (extract_uint): Ditto.
447 (extract_real): Ditto.
449 2005-09-05 Thomas Koenig <Thomas.Koenig@online.de>
451 * io/list_read.c: Adjust size of of value to 32 (to hold
452 kind=16 complex values).
454 2005-09-04 Thomas Koenig <Thomas.Koenig@online.de>
457 * io/transfer.c(data_transfer_init): Check for a too-large
458 record number. Return if sseek failed.
460 2005-09-03 Jakub Jelinek <jakub@redhat.com>
462 * io/read.c (read_x): Take int argument instead of fnode * and
463 digging the N from F->u.n.
464 * io/io.h (read_x): Adjust prototype.
465 * io/transfer.c (formatted_transfer): Adjust callers. Don't clobber
468 2005-09-02 Francois-Xavier Coudert <coudert@clipper.ens.fr>
470 * io/unix.c (stream_ttyname): Protect use of ttyname by
472 * configure.ac: Add check for ttyname.
473 * config.h.in: Regenerate.
474 * configure: Regenerate.
476 2005-09-02 Andreas Jaeger <aj@suse.de>
478 * libgfortran.h: Add prototype for init_compile_options.
480 * io/io.h: Add prototype for notify_std.
482 2005-08-31 Steve Ellcey <sje@cup.hp.com>
484 * io/read.c (set_integer): Use memcpy to fill buffer.
486 2005-08-31 Steve Ellcey <sje@cup.hp.com>
489 * io/read.c (convert_real): Use memcpy to fill buffer.
491 2005-08-29 Thomas Koenig <Thomas.Koenig@online.de>
494 * io/lock.c(library_start): If ioparm.iostat is present, clear
497 2005-08-27 Francois-Xavier Coudert <coudert@clipper.ens.fr>
499 * acinclude.m4 (LIBGFOR_CHECK_UNLINK_OPEN_FILE): Add check to see
500 if target can unlink open files.
501 * configure.ac: Use this new test.
502 * config.h.in: Regenerate.
503 * configure: Regenerate.
504 * Makefile.in: Regenerate.
505 * aclocal.ac: Regenerate.
506 * io/io.h: Add prototype for unpack_filename.
507 * io/close.c (st_close): Delete file after closing unit if
508 HAVE_UNLINK_OPEN_FILE is not defined.
509 * io/unix.c (unpack_filename): Unlink scratch file after opening
510 it only if HAVE_UNLINK_OPEN_FILE is defined.
512 2005-08-17 Kelley Cook <kcook@gcc.gnu.org>
514 * All files: Update FSF address.
516 2005-08-16 Thomas Koenig <Thomas.Koenig@online.de>
519 * io/transfer.c (iolength_transfer): Remove __attribute__ ((unused))
520 from type. Return correct length for inquire(iolength=)
521 for complex variables.
523 2005-08-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
524 Steven Bosscher <stevenb@suse.de>
527 * Makefile.am: Add file runtime/compile_options.c.
528 * Makefile.in: Regenerate.
529 * libgfortran.h: Create structure compile_options_t. Define the
530 compile_options variable and GFC_STD_ macros.
531 * runtime/compile_options.c: New file.
532 * runtime/error.c (notify_std): New function.
533 * runtime/main.c (init): Call init_compile_options during
535 * io/format.c: Use the new notify_std function for the $
536 descriptor extension.
538 2005-08-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
539 * Makefile.am: Add file intrinsics/tty.c to Makefile process.
540 * Makefile.in: Regenerate.
541 * io/io.h: Prototypes for new functions stream_isatty and
543 * io/unix (stream_isatty, stream_ttyname): New functions to call
544 isatty() and ttyname() on a given unit.
545 * intrinsics/tty.c: New file to implement g77 intrinsics TTYNAM
548 2005-08-08 Jerry DeLisle <jvdelisle@verizon.net>
551 * io/transfer.c (data_transfer_init): Initialize
552 current_unit->bytes_left for a read.
554 2005-08-07 Janne Blomqvist <jblomqvi@cc.hut.fi>
557 * io/backspace.c: File removed, contents moved to ...
558 * io/endfile.c: Ditto.
559 * io/rewind.c: Ditto.
560 * io/file_pos.c: New file, ... here.
561 * Makefile.am: Add file_pos.c to list, remove obsolete files.
562 * Makefile.in: Regenerated.
564 2005-08-07 Francois-Xavier Coudert <coudert@clipper.ens.fr>
566 * io/io.h: Change DEFAULT_TEMPDIR to /tmp instead of /var/tmp.
567 * io/unix.c (tempfile): Look at the TEMP environment variable
568 to find the temporary files directory. Whitespace correction.
570 2005-08-06 Francois-Xavier Coudert <coudert@clipper.ens.fr>
572 * io/unix.c: Add O_RDWR to open() call.
574 2005-08-04 Paul Thomas <pault@gcc.gnu.org>
576 * transfer.c (data_transfer_init): Truncate file in
577 sequential WRITE when last_record == 0, rather than
578 current_record. Cures problem on RH9.
580 2005-08-03 Francois-Xavier Coudert <coudert@clipper.ens.fr>
582 * libgfortran.h: When isfinite is not provided by the system,
583 define it as a macro, so that it can accept any floating point
586 2005-08-01 Francois-Xavier Coudert <coudert@clipper.ens.fr>
589 * intrinsics/flush.c (flush_i8): Add function flush_i8. Update
592 2005-07-31 Francois-Xavier Coudert <coudert@clipper.ens.fr>
595 * intrinsics/abort.c (abort): Close units before aborting.
596 Updated copyright years.
598 2005-07-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
601 * io/write.c (write_real): Add default formats for real(10) and
604 2005-07-30 Paul Thomas <pault@gcc.gnu.org>
606 PR fortran/22570 and related issues.
607 * transfer.c (formatted_transfer): Make sure that there
608 really is data present before X- or T- editing. Move all
609 treatment of tabbing during writes to start of next data
610 producing format. Suppress incorrect zeroing of bytes_left
611 in slash formating. Insert int cast for assignment of a
612 difference of two gfc_offsets.
614 2005-07-23 Jerry DeLisle <jvdelisle@verizon.net>
616 * io/write.c (write_float): Revise output of IEEE exceptional
617 values to comply with F95 and F2003 standards.
619 2005-07-22 Jerry DeLisle <jvdelisle@verizon.net>
622 * io/unit.c (init_units): Replace BLANK_ZERO with
625 2005-07-22 Jerry DeLisle <jvdelisle@verizon.net>
627 PR libfortran/21875 (FM111.f)
628 * io/read.c (next_char): Return a ' ' character when BLANK_ZERO
629 or BLANK_NULL are active.
630 (read_decimal): Interpret ' ' character correctly for BZ or BN.
631 (read_radix): Interpret ' ' character correctly for BZ or BN.
632 (read_f): Interpret ' ' character correctly for BZ or BN.
634 2005-07-22 Paul Thomas <pault@gcc.gnu.org>
637 * read.c (read_x): Correct the condition for doing the
638 x-editing during formatted input.
639 * transfer.c (formatted_transfer): Cast offset difference
640 as int, clean-up arithmetic with new variable, bytes_used,
641 zero counters for FMT_SLASH,
642 (data_transfer_init) Zero X- and T-editing counters
644 (next_record_w) Zero X- and T-editing counters.
647 2005-07-17 Jerry DeLisle <jvdelisle@verizon.net>
649 * io/write.c (write_float): Fix field width checks for
650 printing 'Infinity' or 'Inf'.
651 (output_float): Fix typo in comment.
653 2005-07-12 Paul Thomas <pault@gcc.gnu.org>
656 * transfer.c (formatted_transfer): Correct the problems
657 with X- and T-editting that caused TLs followed by TRs
658 to overwrite data, which caused NIST FM908.FOR to fail
660 (data_transfer_init): Zero X- and T-editting counters at
661 the start of formatted IO.
662 * write.c (write_x): Write specified number of skips with
663 specified number of spaces at the end.
665 2005-07-13 Paul Thomas <pault@gcc.gnu.org>
667 * io/read.c (read_complex): Prevent X formatting during reads
668 from going beyond EOR to fix NIST fm908.FOR failure.
669 * io/list_read.c (read_complex): Allow complex data in list-
670 directed reads to have eols either side of the comma to
671 fix NIST FM906.FOR failure.
673 2005-07-12 Thomas Koenig <Thomas.Koenig@online.de>
676 * io/unix.c: Add member special_file to type unix_stream.
677 (fd_truncate): Don't call ftruncate or chsize if
678 s refers to a special file.
679 (fd_to_stream): initialize s->special_file.
681 2005-07-11 David Edelsohn <edelsohn@gnu.org>
684 * io/write.c (otoa): Bias p by SCRATCH_SIZE, not
685 sizeof (SCRATCH_SIZE).
688 2005-07-09 Jerry DeLisle <jvdelisle@verizon.net>
690 PR libfortran/21875 (FM111.f)
691 * io/read.c (next_char): Return a ' ' character when BLANK_ZERO or
692 BLANK_NULL are active.
693 (read_decimal): Interpret ' ' character correctly for BZ or BN.
694 (read_radix): Interpret ' ' character correctly for BZ or BN.
695 (read_f): Interpret ' ' character correctly for BZ or BN.
696 * gfortran.dg/test (fmt_read_bz_bn.f90): New test case.
698 2005-07-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
699 Thomas Koenig <Thomas.Koenig@online.de>
702 * io/write.c (extract_unit): New function; extract
703 ints as unsigned signed int of the correct size.
705 * runtime/error.c: Adjust copyright years.
706 Adjust size of buffer to maximum that can occur.
708 2005-07-07 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
710 * libgfortran.h (GFC_ARRAY_DESCRIPTOR): Replace 'type *base' by
712 * intrinsics/cshift0.c, intrinsics/eoshift0.c,
713 intrinsics/eoshift2.c,intrinsics/pack_generic.c,
714 intrinsics/reshape_generic.c, intrinsics/spread_generic.c,
715 intrinsics/transpose_generic.c, intrinsics/unpack_generic,
716 m4/cshift1.m4, m4/eoshift1.m4, m4/eoshift3.m4, m4/iforeach.m4,
717 m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4, m4/reshape.m4,
718 m4,transpose.m4: Set renamed field 'offset' to zero instead of
720 * generated/all_l4.c, generated/all_l8.c,
721 generated/any_l4.c, generated/any_l8.c, generated/count_4_l4.c,
722 generated/count_4_l8.c, generated/count_8_l4.c,
723 generated/count_8_l8.c, generated/chift1_4.c,
724 generated/cshift1_8.c, generated/eoshift1_4.c,
725 generated/eoshift1_8.c, generated/eoshift3_4.c,
726 generated/eoshift3_8.c, generated/matmul_c4.c,
727 generated/matmul_c8.c, generated/matmul_i4.c, matmul_i8.c,
728 generated/matmul_l4.c, generated/matmul_l8.c,
729 generated/matmul_r4.c, generated/matmul_r8.c,
730 generated/maxloc0_4_i4.c, generated/maxloc0_4_i8.c,
731 generated/maxloc0_4_r4.c, generated/maxloc0_4_r8.c,
732 generated/maxloc0_8_i4.c, generated/maxloc0_8_i8.c,
733 generated/maxloc0_8_r4.c, generated/maxloc0_8_r8.c,
734 generated/maxloc1_4_i4.c, generated/maxloc1_4_i8.c,
735 generated/maxloc1_4_r4.c, generated/maxloc1_4_r8.c,
736 generated/maxloc1_8_i4.c, generated/maxloc1_8_i8.c,
737 generated/maxloc1_8_r4.c, generated/maxloc1_8_r8.c,
738 generated/maxval_i4.c, generated/maxval_i8.c,
739 generated/maxval_r4.c, generated/maxval_r8.c,
740 generated/minloc0_4_i4.c, generated/minloc0_4_i8.c,
741 generated/minloc0_4_r4.c, generated/minloc0_4_r8.c,
742 generated/minloc0_8_i4.c, generated/minloc0_8_i8.c,
743 generated/minloc0_8_r4.c, generated/minloc0_8_r8.c,
744 generated/minloc1_4_i4.c, generated/minloc1_4_i8.c,
745 generated/minloc1_4_r4.c, generated/minloc1_4_r8.c,
746 generated/minloc1_8_i4.c, generated/minloc1_8_i8.c,
747 generated/minloc1_8_r4.c, generated/minloc1_8_r8.c,
748 generated/minval_i4.c, generated/minval_i8.c,
749 generated/minval_r4.c, generated/minval_r8.c,
750 generated/product_c4.c, generated/product_c8.c,
751 generated/product_i4.c, generated/product_i8.c,
752 generated/product_r4.c, generated/product_r8.c,
753 generated/reshape_c4.c, generated/reshape_c8.c,
754 generated/reshape_i4.c, generated/reshape_i8.c,
755 generated/sum_c4.c, generated/sum_c8.c, generated/sum_i4.c,
756 generated/sum_i8.c, generated/sum_r4.c, generated/sum_r8.c,
757 generated/transpose_c4.c, generated/transpose_c8.c,
758 generated/transpose_i4.c, generated/transpose_i8.c: Regenerate:
760 2005-07-07 Thomas Koenig <Thomas.Koenig@online.de>
763 * intrinsics/eoshift0.c: If abs(shift) > len, fill the
764 the whole array with the boundary value, but don't overrun it.
765 * intrinsics/eoshift2.c: Likewise.
766 * m4/eoshift1.m4: Likewise.
767 * m4/eoshift3.m4: Likewise.
768 * generated/eoshift1_4.c: Regenerated.
769 * generated/eoshift1_8.c: Regenerated.
770 * generated/eoshift3_4.c: Regenerated.
771 * generated/eoshift3_8.c: Regenerated.
773 2005-07-07 Feng Wang <fengwang@nudt.edu.cn>
776 * io/transfer.c (formatted_transfer): Enable FMT_A on other types to
777 support Hollerith constants.
779 2005-07-01 Andreas Jaeger <aj@suse.de>
781 * intrinsics/unpack_generic.c: Remove const from parameter.
783 * io/transfer.c (formatted_transfer): Remove unused variable.
785 2005-06-28 Thomas Koenig <Thomas.Koenig@online.de>
788 * m4/eoshift1.m4: Correct bstride (it needs to be multiplied
789 by size since it's a char pointer).
790 * m4/eoshift1_4.c: Regenerated.
791 * m4/eoshift1_8.c: Regenerated.
793 2005-06-28 Thomas Koenig <Thomas.Koenig@online.de>
796 * m4/eoshift3.m4: Correct bstride (it needs to be multiplied
797 by size since it's a char pointer).
798 * m4/eoshift3_4.c: Regenerated.
799 * m4/eoshift3_8.c: Regenerated.
801 2005-06-28 Francois-Xavier Coudert <coudert@clipper.ens.fr>
804 * io/transfer.c (formatted_transfer): Do not iterate on the
805 repeat count of a FMT_SLASH, since this is already done in
808 2005-06-25 Thomas Koenig <Thomas.Koenig@online.de>
811 * m4/cshift1.m4: Remove const from argument ret.
812 Populate return array descriptor if ret->data is NULL.
813 * m4/eoshift1.m4: Likewise.
814 * m4/eoshift3.m4: Likewise.
815 * generated/cshift1_4.c: Regenerated.
816 * generated/cshift1_8.c: Regenerated.
817 * generated/eoshift1_4.c: Regenerated.
818 * generated/eoshift1_8.c: Regenerated.
819 * generated/eoshift3_4.c: Regenerated.
820 * generated/eoshift3_8.c: Regenerated.
822 2005-06-24 Jerry DeLisle <jvdelisle@verizon.net>
825 * Makefile.am: Include intrinsics/hyper.c.
826 * c99_protos.h: Add prototypes for single precision versions of
827 acosh, asinh, and atanh for platforms that do not have these.
828 * config.h.in: Add #undef for wrappers.
829 * configure.ac: Add checks for single precision versions.
830 * aclocal.m4: Regenerated.
831 * Makefile.in: Regenerated.
832 * configure: Regenerated.
833 * intrinsics/hyper.c: New file, adds new wrapper functions.
835 2005-06-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
837 * intrinsics/c99_functions.c (log10l): New log10l function for
838 systems where this is not available.
839 * c99_protos.h: Prototype for log10l function.
840 * libgfortran.h: Use generated kinds.h to define GFC_INTEGER_*,
841 GFC_UINTEGER_*, GFC_LOGICAL_*, GFC_REAL_*, GFC_COMPLEX_*. Update
842 prototypes for gfc_itoa and xtoa.
843 * io/io.h: Update prototypes for set_integer and max_value.
844 * io/list_read.c (convert_integer): Use new
845 GFC_(INTEGER|REAL)_LARGEST type.
846 * io/read.c (set_integer): Likewise.
847 (max_value): Likewise.
848 (convert_real): Likewise.
850 (next_char): Likewise.
851 (read_decimal): Likewise.
852 (read_radix): Likewise.
854 * io/write.c (extract_int): Use new GFC_INTEGER_LARGEST type.
855 (extract_real): Use new GFC_REAL_LARGEST type.
856 (calculate_exp): Likewise.
857 (calculate_G_format): Likewise.
858 (output_float): Likewise. Use log10l for long double values.
859 Add comment for sprintf format. Use GFC_REAL_LARGEST_FORMAT.
860 (write_l): Use new GFC_INTEGER_LARGEST type.
861 (write_float): Use new GFC_REAL_LARGEST type.
862 (write_int): Remove useless special case for (len < 8).
863 (write_decimal): Use GFC_INTEGER_LARGEST.
864 (otoa): Use GFC_UINTEGER_LARGEST as argument.
865 (btoa): Use GFC_UINTEGER_LARGEST as argument.
866 * runtime/error.c (gfc_itoa): Use GFC_INTEGER_LARGEST as
868 (xtoa): Use GFC_UINTEGER_LARGEST as argument.
869 * Makefile.am: Use mk-kinds-h.sh to generate header kinds.h
870 with all Fortran kinds available.
871 * configure.ac: Check for strtold and log10l.
872 * Makefile.in: Regenerate.
873 * aclocal.m4: Regenerate.
874 * configure: Regenerate.
875 * config.h.in: Regenerate.
876 * mk-kinds-h.sh: Configuration script for available integer
880 2005-06-18 Janne Blomqvist <jblomqvi@cc.hut.fi>
882 * unix.c (stream_at_bof): Don't assume that all non-mmapped files
884 (stream_at_eof): Likewise.
886 2005-06-18 Francois-Xavier Coudert <coudert@clipper.ens.fr>
889 * io/read.c (convert_real): strtod can set errno to EINVAL on an
890 empty string, but we shouldn't have an error in that case.
892 2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
895 * io/list_read.c (eat_separator): No need to call next_record,
896 even in non-namelist_mode.
898 2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
900 * io/transfer.c (formatted_transfer): Fix typo in error message.
902 2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
905 * io/transfer.c (read_sf): Correct updating of bytes_left field.
906 (formatted_transfer): Correct updating of bytes_left field and
907 reformatting code (comments and whitespace).
908 * io/unix.c (move_pos_offset): "active" field should not be
909 changed here. Whitespace corrections.
911 2005-06-15 Francois-Xavier Coudert <coudert@clipper.ens.fr>
914 * intrinsics/c99_functions.c (scalbn): Provide fallback
915 implementation for scalbn.
916 * c99_protos.h: Prototype for scalbn.
917 * configure.ac: Add check for scalbn.
918 * configure: Regenerate.
919 * config.h.in: Regenerate.
921 2005-06-14 Thomas Koenig <Thomas.Koenig@online.de>
923 * intrinsics/eoshift0.c: Removed prototype for eoshift0.
924 * intrinsics/eoshift2.c: Removed prototype for eoshift2.
926 2005-06-14 Tom Tromey <tromey@redhat.com>
929 * configure, aclocal.m4, Makefile.in: Rebuilt.
931 2005-06-12 Thomas Koenig <Thomas.Koenig@online.de>
934 * intrinsics/eoshift0.c: Add prototype for eoshift0.
935 * intrinsics/eoshift2.c: Add prototype for eoshift2.
937 2005-06-12 Steven G. Kargl <kargls@comcast.net>
938 Thomas Koenig <Thomas.Koenig@online.de>
940 PR libfortran/PR21797
941 * m4/cexp.m4 (csqrt`'q): Add type qualifyer to
943 * generated/exp_c4.c: Regenerated.
945 2005-06-12 Francois-Xavier Coudert <coudert@clipper.ens.fr>
948 * io/read.c (read_f): Take care of spaces after initial sign.
950 2005-06-11 Thomas Koenig <Thomas.Koenig@onlinde.de>
953 * Makefile.am: Add in_pack_c4.c, in_pack_c8.c, in_unpack_c4.c
955 * Makefile.in: Regenerate.
956 * libgfortran.h: Declare internal_pack_c4, internal_pack_c8,
957 internal_unpack_c4 and internal_unpack_c8.
958 * m4/in_pack.m4: Use rtype_ccode insteald of rtype_kind
960 Use sizeof (rtype_name) as size for memory allocation.
961 * m4/in_unpack.m4: Use rtype_ccode insteald of rtype_kind
963 Use sizeof (rtype_name) for calculation of sizes for memcpy.
964 * runtime/in_pack_generic.c: For real, integer and logical
965 call internal_pack_4 if size==4 and internal_pack_8 if
967 For complex, call internal_pack_c4 if size==8 and
968 internal_pack_c8 if size==16.
969 * runtime/in_unpack_generic.c: For real, integer and logical
970 call internal_unpack_4 if size==4 and internal_unpack_8 if
972 For complex, call internal_unpack_c4 if size==8 and
973 internal_unpack_c8 if size==16.
974 * generated/in_pack_i4.c: Regenerated.
975 * generated/in_pack_i8.c: Regenerated.
976 * generated/in_unpack_i4.c: Regenerated.
977 * generated/in_unpack_i8.c: Regenerated.
978 * generated/in_pack_c4.c: New file.
979 * generated/in_pack_c8.c: New file.
980 * generated/in_unpack_c4.c: New file.
981 * generated/in_unpack_c8.c: New file.
983 2005-06-09 Thomas Koenig <Thomas.Koenig@online.de>
986 * m4/reshape.m4: Use sizeof (rtype_name) for sizes to be passed
988 * generated/reshape_c4.c: Regenerated.
989 * generated/reshape_c8.c: Regenerated.
990 * generated/reshape_i4.c: Regenerated.
991 * generated/reshape_i8.c: Regenerated.
993 2005-06-07 Thomas Koenig <Thomas.Koenig@online.de>
996 * m4/matmul.m4: Correct zeroing of result for non-packed
997 arrays with lowest stride is one.
998 * generated/matmul_c4.c: Regenerated.
999 * generated/matmul_c8.c: Regenerated.
1000 * generated/matmul_i4.c: Regenerated.
1001 * generated/matmul_i8.c: Regenerated.
1002 * generated/matmul_r4.c: Regenerated.
1003 * generated/matmul_r8.c: Regenerated.
1005 2005-05-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1008 * io/unix.c (fd_close): Add test so that we don't close()
1011 2005-05-29 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1014 * io/format.c (parse_format_list): Set repeat count of $ format
1016 * io/transfer.c (read_sf): Add g.seen_dollar to the test
1017 concerning advancing I/O.
1018 (data_transfer_init): Likewise.
1019 (finalize_transfer): Likewise.
1021 2005-05-27 Thomas Koenig <Thomas.Koenig@online.de>
1023 * runtime/in_pack_generic.c: Adjust copyright years.
1024 (in_pack_generic): Change dimension of auxiliary arrays from
1025 GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
1026 * runtime/in_unpack_generic.c: Adjust copyright years.
1027 (in_unpack_generic): Change dimension of auxiliary arrays from
1028 GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
1030 2005-05-26 Thomas Koenig <Thomas.Koenig@online.de>
1033 * intrinsics/unpack_generic.c: Fix name of routine
1034 on top. Update copyright years.
1035 (unpack1): Remove const from return array descriptor.
1036 rs: New variable, for calculating return sizes.
1037 Populate return array descriptor if ret->data is NULL.
1039 2005-05-22 Peter Wainwright <prw@ceiriog1.demon.co.uk>
1042 * io/write.c (output_float): Rework logic to avoid call to log10
1043 with argument equal to zero.
1045 2005-05-21 Eric Botcazou <ebotcazou@libertysurf.fr>
1047 * configure.ac: Check for trunc and truncf in libm.
1048 * configure: Regenerate.
1049 * config.h.in: Likewise.
1050 * intrinsics/c99_functions.c (trunc, truncf): New functions.
1051 * c99_protos.h (trunc, truncf): Declare them.
1053 2005-05-18 Thomas Koenig <Thomas.Koenig@online.de>
1056 * Makefile.am: Really commit.
1057 * Makefile.in: Really commit.
1059 2005-05-18 Thomas Koenig <Thomas.Koenig@online.de>
1062 * Makefile.am: Add generated/reshape_c4.c and
1063 generated/reshape_c8.c.
1064 * Makefile.in: Regenerated.
1065 * m4/iparm.m4: Define rtype_ccode to be c4 or c8 for
1066 complex types, 4 or 8 otherwise.
1067 * m4/reshape.m4: Use rtype_ccode instead of rtype_kind
1069 * generated/reshape_c4.c: New file.
1070 * generated/reshape_c8.c: New file.
1072 2005-05-16 Andreas Jaeger <aj@suse.de>
1074 * configure.ac: Add additional warning flags.
1075 * configure: Regenerate.
1077 * io/write.c (calculate_G_format): Remove unused parameter.
1078 (output_float): Remove unused parameter.
1079 (write_float): Change callers.
1080 (nml_write_obj): Avoid signed warning.
1081 Make variable const to support -Wwrite-strings.
1083 * io/unix.c (fd_alloc, mmap_open, mmap_sfree, mem_sfree,
1084 mem_truncate): Mark argument as unused.
1086 * io/unit.c (get_unit): Mark argument as unused.
1087 (init_units): Avoid warning about signed comparision.
1089 * io/transfer.c (next_record_r): Remove unused parameter.
1090 (next_record_w): Remove unused parameter.
1091 (next_record): Change callers.
1092 (iolength_transfer): Mark arguments as unused.
1094 * io/open.c: Add initializer.
1096 * io/list_read.c (read_character): Mark argument as unused.
1097 (nml_match_name): Add const to make compile with -Wwrite-strings.
1099 * io/format.c: Add initializer.
1101 2005-05-15 Andreas Jaeger <aj@suse.de>
1103 * m4/eoshift1.m4: Initialize variables to avoid warnings.
1104 * m4/eoshift3.m4: Initialize variables to avoid warnings.
1105 * generated/eoshift1_4.c, generated/eoshift1_8.c,
1106 generated/eoshift3_4.c, generated/eoshift3_8.c: Regenerated.
1108 * intrinsics/spread_generic.c (spread): Initialize variables to
1111 * intrinsics/eoshift0.c (eoshift0): Initialize variables to avoid
1113 * intrinsics/eoshift2.c (eoshift2): Initialize variables to avoid
1116 * io/list_read.c (nml_get_obj_data): Initialize variables to avoid
1119 * intrinsics/pack_generic.c (pack): Remove unneeded calculation.
1121 * m4/matmull.m4 (matmul_): Remove unneeded calculations, fix
1122 pointer cast to avoid warning.
1123 * generated/matmul_l4.c: Regenerated.
1124 * generated/matmul_l8.c: Regenerated.
1126 * Makefile.am: Remove AM_CFLAGS here.
1127 * configure.ac: Define AM_CFLAGS and AM_FCFLAGS so that warnings
1128 are set. Set additionally -Wstrict-prototypes for CFLAGS.
1129 * Makefile.in: Regenerated.
1130 * aclocal.m4: Regenerated.
1131 * configure: Regenerated.
1133 * intrinsics/system_clock.c (system_clock_4, system_clock_8): Add
1134 missing returns, reformat a bit.
1136 * io/write.c (nml_write_obj): Use %d again - and cast to int,
1137 st_sprintf does not handle %ld.
1139 * io/unit.c (is_internal_unit): Add void as parameter list.
1141 * io/transfer.c: Move prototype declarations before the functions.
1143 * runtime/normalize.c (almostone_r4, almostone_r8): Fix parameter
1146 * intrinsics/random.c (KISS_DEFAULT_SEED): Remove extra semicolon.
1148 * io/transfer.c: Do not use empty initializers for global objects.
1149 Add missing initializers.
1151 * io/lock.c: Do not use empty initializers for global objects.
1153 * io/close.c: Add missing initializers.
1155 * runtime/environ.c: Add missing initializers. Do not use empty
1156 initializers for global object.
1157 (init_string): Mark argument as unused.
1159 * runtime/main.c (cleanup): Fix parameter list.
1161 * io/io.h: Fix parameter lists.
1163 * m4/transpose.m4, m4/matmul.m4: Fix pointer cast to avoid
1166 * generated/transpose_c4.c, generated/transpose_c8.c,
1167 generated/transpose_i4.c, generated/transpose_i8.c,
1168 generated/matmul_c4.c, generated/matmul_c8.c,
1169 generated/matmul_i4.c, generated/matmul_i8.c,
1170 generated/matmul_r4.c, generated/matmul_r8.c: Regenerated.
1172 * io/write.c (nml_write_obj): Fix 64-bit problem.
1174 * io/list_read.c (nml_get_obj_data): Add missing braces around
1175 initializer to avoid warnings.
1177 * intrinsics/etime.c (etime_sub): Remove unused variable.
1179 * intrinsics/chdir.c, intrinsics/getlog.c, intrinsics/link.c,
1180 intrinsics/symlnk.c, intrinsics/perror.c: Include <string.h> for
1183 * runtime/string.c (compare0): Remove unused variable.
1184 * io/unit.c (init_units): Remove unused variables.
1185 * intrinsics/getcwd.c (getcwd_i4_sub): Remove unused variable.
1186 * intrinsics/unlink.c (unlink_i4_sub): Remove unused variable.
1187 * intrinsics/stat.c (stat_i4_sub, fstat_i8_sub, fstat_i4_sub,
1188 stat_i8_sub): Remove unused variable.
1190 2005-05-12 Thomas Koenig <Thomas.Koenig@online.de>
1193 * runtime/memory.c: Don't define GFC_CLEAR_MEMORY (it's a
1195 * io/open.c (new_unit): Zero freshly allocated memory for
1197 * io/unit.c (init_units): Zero freshly allocated memory for
1198 STDIN, STDOUT and STDERR.
1199 * io/unix.c (open_internal): Zero freshly allocated memory
1201 (fd_to_stream): Likewise.
1203 2005-05-11 Bud Davis <bdavis@gfortran.org>
1206 * io/unix.c (fd_truncate): update positions when ftruncate
1207 fails (like writing to /dev/null).
1209 2005-05-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1212 * open.c (new_unit): Take care of the case where POSITION_APPEND
1213 is specified (sseek to the end, and set u>-endfile).
1215 2005-05-10 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1218 * Makefile.am (gfor_specific_src): Add 'intrinsics/f2c_intrinsics.F90'
1220 * Makefile.in: Regenerate.
1221 * intrinsics/f2c_specific.F90: New file.
1223 2005-05-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1226 * io/unix.c (fd_to_stream): Add an avoid_mmap argument indicating
1227 we don't we to mmap this stream. Use fd_open instead of mmap_open
1229 (open_external): Call fd_to_stream with avoid_mmap = 0.
1230 (input_stream): Call fd_to_stream with avoid_mmap = 1.
1231 (output_stream): Likewise.
1232 (error_stream): Likewise.
1234 2005-05-09 Mike Stump <mrs@apple.com>
1236 * configure: Regenerate.
1238 2005-05-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1241 * io/read.c (read_f): Accept 'e', 'E', 'd' and 'D' as first
1242 non-blank characters of a real number.
1244 2005-05-04 Thomas Koenig <Thomas.Koenig@online.de>
1247 * m4/cshift1.m4: Change dimension of auxiliary arrays from
1248 GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
1249 * m4/eoshift1.m4: Likewise.
1250 * m4/eoshift3.m4: Likewise.
1251 * m4/ifunction.m4: Likewise.
1252 * m4/in_pack.m4: Likewise.
1253 * m4/in_unpack.m4: Likewise.
1254 * intrinsics/cshift0.c: Likewise.
1255 * intrinsics/eoshift0.c: Likewise.
1256 * intrinsics/eoshift2.c: Likewise.
1257 * intrinsics/random.c: Likewise.
1258 * intrinsics/spread_generic.c: Likewise.
1259 * intrinsics/stat.c: Likewise.
1260 * generated/all_l4.c: Regenerated.
1261 * generated/all_l8.c: Regenerated.
1262 * generated/any_l4.c: Regenerated.
1263 * generated/any_l8.c: Regenerated.
1264 * generated/count_4_l4.c: Regenerated.
1265 * generated/count_4_l8.c: Regenerated.
1266 * generated/count_8_l4.c: Regenerated.
1267 * generated/count_8_l8.c: Regenerated.
1268 * generated/cshift1_4.c: Regenerated.
1269 * generated/cshift1_8.c: Regenerated.
1270 * generated/eoshift1_4.c: Regenerated.
1271 * generated/eoshift1_8.c: Regenerated.
1272 * generated/eoshift3_4.c: Regenerated.
1273 * generated/eoshift3_8.c: Regenerated.
1274 * generated/in_pack_i4.c: Regenerated.
1275 * generated/in_pack_i8.c: Regenerated.
1276 * generated/in_unpack_i4.c: Regenerated.
1277 * generated/in_unpack_i8.c: Regenerated.
1278 * generated/maxloc0_4_i4.c: Regenerated.
1279 * generated/maxloc0_4_i8.c: Regenerated.
1280 * generated/maxloc0_4_r4.c: Regenerated.
1281 * generated/maxloc0_4_r8.c: Regenerated.
1282 * generated/maxloc0_8_i4.c: Regenerated.
1283 * generated/maxloc0_8_i8.c: Regenerated.
1284 * generated/maxloc0_8_r4.c: Regenerated.
1285 * generated/maxloc0_8_r8.c: Regenerated.
1286 * generated/maxloc1_4_i4.c: Regenerated.
1287 * generated/maxloc1_4_i8.c: Regenerated.
1288 * generated/maxloc1_4_r4.c: Regenerated.
1289 * generated/maxloc1_4_r8.c: Regenerated.
1290 * generated/maxloc1_8_i4.c: Regenerated.
1291 * generated/maxloc1_8_i8.c: Regenerated.
1292 * generated/maxloc1_8_r4.c: Regenerated.
1293 * generated/maxloc1_8_r8.c: Regenerated.
1294 * generated/maxval_i4.c: Regenerated.
1295 * generated/maxval_i8.c: Regenerated.
1296 * generated/maxval_r4.c: Regenerated.
1297 * generated/maxval_r8.c: Regenerated.
1298 * generated/minloc0_4_i4.c: Regenerated.
1299 * generated/minloc0_4_i8.c: Regenerated.
1300 * generated/minloc0_4_r4.c: Regenerated.
1301 * generated/minloc0_4_r8.c: Regenerated.
1302 * generated/minloc0_8_i4.c: Regenerated.
1303 * generated/minloc0_8_i8.c: Regenerated.
1304 * generated/minloc0_8_r4.c: Regenerated.
1305 * generated/minloc0_8_r8.c: Regenerated.
1306 * generated/minloc1_4_i4.c: Regenerated.
1307 * generated/minloc1_4_i8.c: Regenerated.
1308 * generated/minloc1_4_r4.c: Regenerated.
1309 * generated/minloc1_4_r8.c: Regenerated.
1310 * generated/minloc1_8_i4.c: Regenerated.
1311 * generated/minloc1_8_i8.c: Regenerated.
1312 * generated/minloc1_8_r4.c: Regenerated.
1313 * generated/minloc1_8_r8.c: Regenerated.
1314 * generated/minval_i4.c: Regenerated.
1315 * generated/minval_i8.c: Regenerated.
1316 * generated/minval_r4.c: Regenerated.
1317 * generated/minval_r8.c: Regenerated.
1318 * generated/product_c4.c: Regenerated.
1319 * generated/product_c8.c: Regenerated.
1320 * generated/product_i4.c: Regenerated.
1321 * generated/product_i8.c: Regenerated.
1322 * generated/product_r4.c: Regenerated.
1323 * generated/product_r8.c: Regenerated.
1324 * generated/sum_c4.c: Regenerated.
1325 * generated/sum_c8.c: Regenerated.
1326 * generated/sum_i4.c: Regenerated.
1327 * generated/sum_i8.c: Regenerated.
1328 * generated/sum_r4.c: Regenerated.
1329 * generated/sum_r8.c: Regenerated.
1331 2005-04-30 Thomas Koenig <Thomas.Koenig@online.de>
1334 libgfortran.h: Change typedef of index_type from size_t
1337 2005-04-30 Paul Thomas <pault@gcc.gnu.org>
1340 * generated/matmul_r8.c: Remove incorrect assertions.
1341 * generated/matmul_c4.c: Regenerate
1342 * generated/matmul_c8.c: Regenerate
1343 * generated/matmul_i4.c: Regenerate
1344 * generated/matmul_i8.c: Regenerate
1345 * generated/matmul_r4.c: Regenerate
1346 * generated/matmul_r8.c: Regenerate
1348 2005-04-29 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1350 * configure.ac: Check for ftruncate and chsize.
1351 * io/unix.c (fd_truncate): Provide chsize as alternative to
1353 * config.h.in: Regenerate.
1354 * configure: Regenerate.
1356 2004-04-29 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1358 * intrinsics/rename.c: Add missing #includes.
1360 2004-04-28 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1362 * AUTHORS, COPYING, INSTALL, NEWS, README: Remove.
1364 2005-04-26 David Edelsohn <edelsohn@gnu.org>
1367 * io/rewind.c (st_rewind): Flush the stream when resetting the mode
1368 from WRITING to READING.
1370 2005-04-22 Paul Thomas <pault@gcc.gnu.org>
1371 Jerry DeLisle <jvdelisle@verizon.net>
1373 * io/write.c (nml_write_obj): Provide 1 more byte for ext_name.
1374 * io/list_read.c (nml_get_obj_data): Put extra brackets in get_mem
1375 call for ext_name. These fix the bug reported by Jerry DeLisle to
1376 the fortran list and are based on his suggested fix.
1378 2005-04-22 Thomas Koenig <Thomas.Koenig@online.de>
1383 * m4/reshape.m4 (reshape_`'rtype_kind): rs, rex: New
1384 variables, to be used in calculation of return array sizes.
1385 Populate return array descriptor if ret->data is NULL.
1386 Fix condition for early return (it used to test something
1387 undefined if order was used).
1388 Remove duplicate check wether pad is used.
1389 * intrinsics/reshape_generic.c (reshape_generic): Likewise.
1390 Fix a few places where the wrong variables were set.
1391 * generated/reshape_i4.c: Regenerated.
1392 * generated/reshape_i8.c: Regenerated.
1394 2005-04-18 Paul Thomas <pault@gcc.gnu.org>
1396 * io/list_read.c (nml_touch_nodes, nml_read_obj,
1397 nml_get_obj_data): Fix memory leaks in code for derived types.
1399 2005-04-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1402 * io/inquire.c (inquire_via_unit): Check for the gfc_unit being
1403 NULL when setting ioparm.sequential.
1405 2005-04-17 Thomas Koenig <Thomas.Koenig@online.de>
1408 * m4/reshape.m4 (reshape_`'rtype_kind): Change dimension
1409 of auxiliary arrays from GFC_MAX_DIMENSIONS - 1 to
1411 * intrinsics/reshape_generic.c (reshape_generic): Likewise.
1412 * generated/reshape_i4.c: Regenerated.
1413 * generated/reshape_i8.c: Regenerated.
1415 2005-04-17 Paul Thomas <pault@gcc.gnu.org>
1417 * io/list_read.c (eat_separator): at_eol = 1 replaced
1418 (zapped at some time?).
1420 2005-04-17 Paul Thomas <pault@gcc.gnu.org>
1422 PR libgfortran/12884
1423 PR libgfortran/17285
1424 PR libgfortran/18122
1425 PR libgfortran/18210
1426 PR libgfortran/18392
1427 PR libgfortran/18591
1428 PR libgfortran/18879
1429 * io/io.h (nml_ls): Declare.
1430 (namelist_info): Modify for arrays.
1431 * io/list_read.c (namelist_read): Reduced to call to new functions.
1432 (match_namelist_name): Simplified.
1433 (nml_query): Handles stdin queries ? and =?. New function.
1434 (nml_get_obj_data): Parses object name. New function.
1435 (touch_nml_nodes): Marks objects for read. New function.
1436 (untouch_nml_nodes): Resets objects. New function.
1437 (parse_qualifier): Parses and checks qualifiers. New function
1438 (nml_read_object): Reads and stores object data. New function.
1439 (eat_separator): No new_record on '/' in namelist.
1440 (finish_separator): No new_record on '/' in namelist.
1441 (read_logical): Error return for namelist.
1442 (read_integer): Error return for namelist.
1443 (read_complex): Error return for namelist.
1444 (read_real): Error return for namelist.
1445 * io/lock.c (library_end): Free extended namelist_info types.
1446 * io/transfer.c (st_set_nml_var): Modified for arrays.
1447 (st_set_nml_var_dim): Dimension descriptors. New function.
1448 * io/write.c (namelist_write): Reduced to call to new functions.
1449 (nml_write_obj): Writes output for object. New function.
1450 (write_integer): Suppress leading blanks for repeat counts.
1451 (write_int): Suppress leading blanks for repeat counts.
1452 (write_float): Suppress leading blanks for repeat counts.
1453 (output_float): Suppress leading blanks for repeat counts.
1455 2005-04-15 Thomas Koenig <Thomas.Koenig@online.de>
1458 * intrinsics/spread_generic.c (spread): Remove const from
1459 return array descriptor.
1460 New variables: rrank (rank of return array), rs (for
1461 calculating the size of the return array), srank (rank
1462 of the source array).
1463 Generate runtime error if the dim= argument is larger than
1464 the rank of the return array.
1465 Generate runtime error if the needed rank of the return
1466 array is larger than 7.
1467 If ret->data is null, populate the return array descriptor
1468 and initialize the variables for the actual operation.
1469 Otherwise, set ret->dim[0].stride to one if it is zero.
1470 Change second, independent use of variable dim to srank.
1472 2005-04-12 Mike Stump <mrs@apple.com>
1474 * configure: Regenerate.
1476 2005-04-13 Thomas Koenig <Thomas.Koenig@online.de>
1479 * m4/iforeach.c (name`'rtype_qual`_'atype_code): Add TODO
1480 that setting correct strides is a front end job.
1481 (`m'name`'rtype_qual`_'atype_code): Likewise. If mask has
1482 a lowest stride of 0, adjust to 1.
1483 * m4/ifunction.c (name`'rtype_qual`_'atype_code): Add TODO
1484 that setting correct strides is a front end job.
1485 (`m'name`'rtype_qual`_'atype_code): Likewise. If mask has
1486 a lowest stride of 0, adjust to 1.
1487 * maxloc0_4_i4.c: Regenerated
1488 * maxloc0_4_i8.c: Regenerated
1489 * maxloc0_4_r4.c: Regenerated
1490 * maxloc0_4_r8.c: Regenerated
1491 * maxloc0_8_i4.c: Regenerated
1492 * maxloc0_8_i8.c: Regenerated
1493 * maxloc0_8_r4.c: Regenerated
1494 * maxloc0_8_r8.c: Regenerated
1495 * maxloc1_4_i4.c: Regenerated
1496 * maxloc1_4_i8.c: Regenerated
1497 * maxloc1_4_r4.c: Regenerated
1498 * maxloc1_4_r8.c: Regenerated
1499 * maxloc1_8_i4.c: Regenerated
1500 * maxloc1_8_i8.c: Regenerated
1501 * maxloc1_8_r4.c: Regenerated
1502 * maxloc1_8_r8.c: Regenerated
1503 * maxval_i4.c: Regenerated
1504 * maxval_i8.c: Regenerated
1505 * maxval_r4.c: Regenerated
1506 * maxval_r8.c: Regenerated
1507 * minloc0_4_i4.c: Regenerated
1508 * minloc0_4_i8.c: Regenerated
1509 * minloc0_4_r4.c: Regenerated
1510 * minloc0_4_r8.c: Regenerated
1511 * minloc0_8_i4.c: Regenerated
1512 * minloc0_8_i8.c: Regenerated
1513 * minloc0_8_r4.c: Regenerated
1514 * minloc0_8_r8.c: Regenerated
1515 * minloc1_4_i4.c: Regenerated
1516 * minloc1_4_i8.c: Regenerated
1517 * minloc1_4_r4.c: Regenerated
1518 * minloc1_4_r8.c: Regenerated
1519 * minloc1_8_i4.c: Regenerated
1520 * minloc1_8_i8.c: Regenerated
1521 * minloc1_8_r4.c: Regenerated
1522 * minloc1_8_r8.c: Regenerated
1523 * minval_i4.c: Regenerated
1524 * minval_i8.c: Regenerated
1525 * minval_r4.c: Regenerated
1526 * minval_r8.c: Regenerated
1527 * product_c4.c: Regenerated
1528 * product_c8.c: Regenerated
1529 * product_i4.c: Regenerated
1530 * product_i8.c: Regenerated
1531 * product_r4.c: Regenerated
1532 * product_r8.c: Regenerated
1533 * sum_c4.c: Regenerated
1534 * sum_c8.c: Regenerated
1535 * sum_i4.c: Regenerated
1536 * sum_i8.c: Regenerated
1537 * sum_r4.c: Regenerated
1538 * sum_r8.c: Regenerated
1540 2005-04-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1543 * runtime/environ.c (init_unsigned_integer): Function for
1544 environment variables we want to be positive.
1545 (init_integer): Function to allow negative environment
1546 variables (e.g. for GFORTRAN_STDIN_UNIT).
1548 2005-04-10 Thomas Koenig <Thomas.Koenig@online.de>
1558 * io/transfer.c (top level): eor_condition: New static variable.
1559 (read_sf): Remove unnecessary zeroing of buffer (there is enough
1560 information in its length).
1561 Return a string of length 0 (to be padded by caller) if EOR was
1563 Remove erroneous special casing of EOR for standard input.
1564 Set eor_condition for non-advancing I/O if an end of line was
1566 Increment ioparm.size if necessary.
1567 (formatted_transfer): Skip the function if there is an EOR condition.
1568 (data_transfer_init): Initialize eor_condition to zero (false).
1569 (next_record_r): Clear sf_seen_eor if a \n has been seen already.
1570 (finalize_transfer): If there is an EOR condition, raise the error.
1572 2005-04-09 Bud Davis <bdavis@gfortran.org>
1573 Steven G. Kargl <kargls@comcast.net>
1576 * io/transfer.c (data_transfer_init): truncate an existing
1577 file on the first write.
1579 2005-04-09 Thomas Koenig <Thomas.Koenig@online.de>
1583 * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): ditto.
1584 If retarray->data is NULL (i.e. the front end does not
1585 know the rank and dimenson of the array), fill in its
1586 properties and allocate memory.
1587 Change the assertions about rank and dimension of retarray into
1588 runtime errors and only check them for retarray->data != NULL.
1589 Do the same for correcting the stride from 0 to 1 in retarray.
1590 (`m'name`'rtype_qual`_'atype_code): Likewise.
1591 * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Likewise.
1592 Change assertion about rank of array to runtime error.
1593 (`m'name`'rtype_qual`_'atype_code): Likewise.
1594 * generated/all_l4.c: Regenerated.
1595 * generated/all_l8.c: Regenerated.
1596 * generated/any_l4.c: Regenerated.
1597 * generated/any_l8.c: Regenerated.
1598 * generated/count_4_l4.c: Regenerated.
1599 * generated/count_4_l8.c: Regenerated.
1600 * generated/count_8_l4.c: Regenerated.
1601 * generated/count_8_l8.c: Regenerated.
1602 * generated/maxloc0_4_i4.c: Regenerated.
1603 * generated/maxloc0_4_i8.c: Regenerated.
1604 * generated/maxloc0_4_r4.c: Regenerated.
1605 * generated/maxloc0_4_r8.c: Regenerated.
1606 * generated/maxloc0_8_i4.c: Regenerated.
1607 * generated/maxloc0_8_i8.c: Regenerated.
1608 * generated/maxloc0_8_r4.c: Regenerated.
1609 * generated/maxloc0_8_r8.c: Regenerated.
1610 * generated/maxloc1_4_i4.c: Regenerated.
1611 * generated/maxloc1_4_i8.c: Regenerated.
1612 * generated/maxloc1_4_r4.c: Regenerated.
1613 * generated/maxloc1_4_r8.c: Regenerated.
1614 * generated/maxloc1_8_i4.c: Regenerated.
1615 * generated/maxloc1_8_i8.c: Regenerated.
1616 * generated/maxloc1_8_r4.c: Regenerated.
1617 * generated/maxloc1_8_r8.c: Regenerated.
1618 * generated/maxval_i4.c: Regenerated.
1619 * generated/maxval_i8.c: Regenerated.
1620 * generated/maxval_r4.c: Regenerated.
1621 * generated/maxval_r8.c: Regenerated.
1622 * generated/minloc0_4_i4.c: Regenerated.
1623 * generated/minloc0_4_i8.c: Regenerated.
1624 * generated/minloc0_4_r4.c: Regenerated.
1625 * generated/minloc0_4_r8.c: Regenerated.
1626 * generated/minloc0_8_i4.c: Regenerated.
1627 * generated/minloc0_8_i8.c: Regenerated.
1628 * generated/minloc0_8_r4.c: Regenerated.
1629 * generated/minloc0_8_r8.c: Regenerated.
1630 * generated/minloc1_4_i4.c: Regenerated.
1631 * generated/minloc1_4_i8.c: Regenerated.
1632 * generated/minloc1_4_r4.c: Regenerated.
1633 * generated/minloc1_4_r8.c: Regenerated.
1634 * generated/minloc1_8_i4.c: Regenerated.
1635 * generated/minloc1_8_i8.c: Regenerated.
1636 * generated/minloc1_8_r4.c: Regenerated.
1637 * generated/minloc1_8_r8.c: Regenerated.
1638 * generated/minval_i4.c: Regenerated.
1639 * generated/minval_i8.c: Regenerated.
1640 * generated/minval_r4.c: Regenerated.
1641 * generated/minval_r8.c: Regenerated.
1642 * generated/product_c4.c: Regenerated.
1643 * generated/product_c8.c: Regenerated.
1644 * generated/product_i4.c: Regenerated.
1645 * generated/product_i8.c: Regenerated.
1646 * generated/product_r4.c: Regenerated.
1647 * generated/product_r8.c: Regenerated.
1648 * generated/sum_c4.c: Regenerated.
1649 * generated/sum_c8.c: Regenerated.
1650 * generated/sum_i4.c: Regenerated.
1651 * generated/sum_i8.c: Regenerated.
1652 * generated/sum_r4.c: Regenerated.
1653 * generated/sum_r8.c: Regenerated.
1655 2005-04-09 Thomas Koenig <Thomas.Koenig@online.de>
1658 * runtime/string.c (compare0): Use fstrlen() to
1659 strip trailing blanks from option string.
1661 2005-04-09 Andrew Pinski <pinskia@physics.uc.edu>
1664 * format.c (parse_format_list): Allow an optional comma
1665 between descriptors.
1667 2005-04-08 Eric Botcazou <ebotcazou@libertysurf.fr>
1669 * io/backspace.c (unformatted_backspace): Do not dereference
1670 the pointer to the stream.
1672 2005-04-07 Andrew Pinski <pinskia@physics.uc.edu>
1675 * configure.ac (extra_ldflags_libgfortran): Set for *-darwin* to
1676 "-Wl,-single_module".
1677 * configure: Regenerate.
1678 * Makefile.am (libgfortran_la_LDFLAGS): Add extra_ldflags_libgfortran.
1679 * Makefile.in: Regenerate.
1681 2005-04-05 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1684 * write.c (write_float): A G edit descriptor may locally change
1685 the scale factor, but it needs to be restored afterwards.
1687 2005-04-03 Dale Ranta <dir@lanl.gov>
1688 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1694 * io/backspace.c (unformatted_backspace): Fix error in arithmetic.
1695 (st_backspace): When in WRITING mode, we flush and falling back
1696 into READING mode. In all cases, correctly position the stream.
1698 2005-03-31 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1701 * io/inquire.c (inquire_via_unit): Non-opened units should still be
1702 reported by an INQUIRE statement as existing.
1703 * io/transfer.c (data_transfer_init): Never accept negative units.
1705 2005-03-29 Dale Ranta <dir@lanl.gov>
1706 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1709 * io/open.c (st_open): call library_end() before returning even if
1712 2005-03-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1715 * list_read.c (next_char, eat_separator, finish_separator, read_real)
1716 (namelist_read): Add support for '\r' as well as '\n' as EOL
1720 * list_read.c (read_sf): Add a '\r' in a test to support DOS
1721 line-endings when line length is exceeded.
1723 2005-03-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1726 * io/format.c (parse_format_list): format node for colon edit
1727 descriptor needs a repeat counter set to 1.
1729 2005-02-24 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1731 * config.h.in: Regenerate.
1733 2005-02-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1736 * write.c (output_float): Handling the "F0.d" format similarly as
1737 commercial compilers.
1739 2005-03-22 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1741 * Makefile.am: Added new files.
1742 * Makefile.in: Regenerate.
1743 * aclocal.m4: Regenerate.
1744 * configure.ac: add checks for signal.h headers file, as well as
1745 following functions: chdir, strerror, getlogin, gethostname, kill,
1746 link, symlink, perror, sleep, time.
1747 * configure: Regenerate.
1748 * intrinsics/chdir.c, intrinsics/gerror.c, intrinsics/getlog.c,
1749 intrinsics/hostnm.c, intrinsics/ierrno.c, intrinsics/kill.c,
1750 intrinsics/link.c, intrinsics/perror.c, intrinsics/rename.c,
1751 intrinsics/sleep.c, intrinsics/symlnk.c, intrinsics/time.c: Newly
1752 implementend g77 intrinsics.
1754 2005-03-21 Zack Weinberg <zack@codesourcery.com>
1756 * configure.ac: Do not invoke TL_AC_GCC_VERSION.
1757 In all substitutions, leave gcc_version to be expanded by the Makefile.
1758 * aclocal.m4, configure: Regenerate.
1759 * Makefile.am: Set gcc_version.
1760 * Makefile.in: Regenerate.
1762 2005-03-16 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1765 * open.c (new_unit): set record length to max_offset rather than
1766 using a hard-coded limit (which was too low).
1768 2005-03-16 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1771 * write.c (output_float): special check when writing 0.0 with
1774 2005-03-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1777 * write.c (output_float): Adds a nzero_real variable to store
1778 the number of leading zeros whatever the format width is. Corrects
1779 the rounding of numbers less than 10^(-width). Fixes typo in an
1780 error message. Updates copyright years
1782 2005-02-27 Toon Moene <toon@moene.indiv.nluug.nl>
1784 * runtime/environ.c: Update copyright years.
1786 2005-02-27 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1788 * io/write.c: Update copyright years.
1790 2005-02-27 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1793 * io/write.c (output_float): Added special check for value 0.0 in
1796 2004-02-27 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1798 * io/write.c (output_float): Fix typo in condition.
1800 2005-02-25 Peter O'Gorman <peter@pogma.com>
1801 Toon Moene <toon@moene.indiv.nluug.nl>
1803 PR libgfortran/17748
1804 * runtime/environ.c: Remove references to environ.
1805 (show_variables): remove GFORTRAN_UNBUFFERED_* and
1806 GFORTRAN_NAME_* because they require environ.
1807 (pattern_scan): Remove function.
1809 2004-02-22 Paul Thomas <paulthomas2@wannado.fr>
1810 Bud Davis <bdavis@gfortran.org>
1812 * io/list_read.c (read_real): Handle separators properly
1813 in list directed read.
1815 2004-02-21 Bud Davis <bdavis@gfortran.org>
1818 * io/transfer.c (write_constant_string): accept an 'h' as
1819 the start of a hollerith format string.
1821 2005-02-21 Eric Botcazou <ebotcazou@libertysurf.fr>
1824 * intrinsics/c99_functions.c (nextafterf): Special-case infinite
1827 2005-02-21 Steven G. Kargl <kargls@comcast.net>
1829 * io/write.c (output_float): Typo in error meesage.
1831 2005-02-20 Steven G. Kargl <kargls@comcast.net>
1834 * intrinsic/args.c (iargc): Off by 1.
1836 2005-02-19 Steven G. Kargl <kargls@comcast.net>
1838 * intrinsic/date_and_time.c: Fix conformance problems.
1840 2005-02-01 Paul Thomas <paulthomas2@wanadoo.fr>
1842 PR libgfortran/19363
1843 PR libgfortran/19691
1844 * libgfortran.h (isfinite): Work around broken isfinite(x) in Cygwin.
1846 2005-01-30 Bud Davis <bdavis@gfortran.org>
1849 * io/inquire.c (inquire_via_unit): Use correct variable for
1852 2005-01-29 Thomas Koenig <Thomas.Koenig@online.de>
1855 * io/transfer.c (data_transfer_init): eor requires advance="NO".
1857 2005-01-25 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1860 * io/read.c (read_f): Don't free uninitialized pointer.
1862 2005-01-23 James A. Morrison <phython@gcc.gnu.org>
1863 Paul Brook <paul@codesourcery.com>
1866 * Makefile.am: Add transpose_c4.c and transpose_c8.c.
1867 * intrinsics/cshift0.c: Use separate optimized loops for complex types.
1868 * m4/transpose.m4: Include type letter in function name.
1869 * Makefile.in: Regenerate.
1870 * generated/transpose_*.c: Regenerate.
1872 2005-01-22 Thomas Koenig <Thomas.Koenig@online.de>
1875 * io/transfer.c (finalize_transfer): Don't do anything if
1876 there is an error condition.
1878 2005-01-22 David Edelsohn <edelsohn@gnu.org>
1880 PR libgfortran/19052
1881 * libgfortran.h (options_t): Add stderr_unit.
1882 * io/io.h (error_stream): Declare.
1883 * io/open.c (new_unit): Do not terminate abnormally if opening
1884 file preconnected to stdin, stdout, or stderr.
1885 * io/unit.c (init_units): Initialize stderr_unit.
1886 * io/unix.c (error_stream): New function.
1887 * runtime/environ.c (GFORTRAN_STDERR_UNIT): New environment variable.
1889 2005-01-22 Thomas Koenig <Thomas.Koenig@online.de>
1892 * io/unix.c (regular_file): No need to change flags->action
1893 if an error occurs. Document this.
1894 No need to call stat() for STATUS_OLD, open() will
1896 For ACTION_UNSPECIFIED, try open for read-write, then for
1897 read-only if open fails with EACCES, then for write-only
1898 if that fails with EACCES again.
1899 * io/unix.c (open_external): Document changed behavior of
1902 2005-01-22 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1905 * io/io.h (st_parameter): Use 'GFC_INTEGER_4' instead of 'int',
1906 use CHARACTER macro for definition of string valued paramters.
1908 2005-01-22 Bud Davis <bdavis9659@comcast.net>
1911 * io/inquire.c(inquire_via_unit): implement POSITION=.
1912 * io/transfer.c(next_record): update position for
1914 * io/rewind.c(st_rewind): update position for
1917 2005-01-16 Bud Davis <bdavis9659@comcast.net>
1920 * io/transfer.c (us_read): no bytes available is not a
1923 2005-01-15 Bud Davis <bdavis9659@comcast.net>
1926 * io/transfer.c (st_write_done): only truncate when it
1929 2005-01-12 Toon Moene <toon@moene.indiv.nluug.nl>
1932 c99_protos.h: License changed to GPL+exception.
1933 libgfortran.h: Ditto.
1934 intrinsics/abort.c: Ditto.
1935 intrinsics/args.c: Ditto.
1936 intrinsics/associated.c: Ditto.
1937 intrinsics/bessel.c: Ditto.
1938 intrinsics/c99_functions.c: Ditto.
1939 intrinsics/cpu_time.c: Ditto.
1940 intrinsics/cshift0.c: Ditto.
1941 intrinsics/date_and_time.c: Ditto.
1942 intrinsics/env.c: Ditto.
1943 intrinsics/eoshift0.c: Ditto.
1944 intrinsics/eoshift2.c: Ditto.
1945 intrinsics/erf.c: Ditto.
1946 intrinsics/etime.c: Ditto.
1947 intrinsics/exit.c: Ditto.
1948 intrinsics/flush.c: Ditto.
1949 intrinsics/fnum.c: Ditto.
1950 intrinsics/getXid.c: Ditto.
1951 intrinsics/getcwd.c: Ditto.
1952 intrinsics/ishftc.c: Ditto.
1953 intrinsics/mvbits.c: Ditto.
1954 intrinsics/pack_generic.c: Ditto.
1955 intrinsics/rand.c: Ditto.
1956 intrinsics/random.c: Ditto.
1957 intrinsics/reshape_generic.c: Ditto.
1958 intrinsics/reshape_packed.c: Ditto.
1959 intrinsics/size.c: Ditto.
1960 intrinsics/spread_generic.c: Ditto.
1961 intrinsics/stat.c: Ditto.
1962 intrinsics/string_intrinsics.c: Ditto.
1963 intrinsics/system.c: Ditto.
1964 intrinsics/system_clock.c: Ditto.
1965 intrinsics/transpose_generic.c: Ditto.
1966 intrinsics/umask.c: Ditto.
1967 intrinsics/unlink.c: Ditto.
1968 intrinsics/unpack_generic.c: Ditto.
1969 io/backspace.c: Ditto.
1971 io/endfile.c: Ditto.
1973 io/inquire.c: Ditto.
1975 io/list_read.c: Ditto.
1980 io/transfer.c: Ditto.
1989 m4/cshift1.m4: Ditto.
1991 m4/dotprod.m4: Ditto.
1992 m4/dotprodc.m4: Ditto.
1993 m4/dotprodl.m4: Ditto.
1994 m4/eoshift1.m4: Ditto.
1995 m4/eoshift3.m4: Ditto.
1996 m4/exponent.m4: Ditto.
1997 m4/fraction.m4: Ditto.
1999 m4/iforeach.m4: Ditto.
2000 m4/ifunction.m4: Ditto.
2001 m4/in_pack.m4: Ditto.
2002 m4/in_unpack.m4: Ditto.
2004 m4/matmul.m4: Ditto.
2005 m4/matmull.m4: Ditto.
2006 m4/maxloc0.m4: Ditto.
2007 m4/maxloc1.m4: Ditto.
2008 m4/maxval.m4: Ditto.
2009 m4/minloc0.m4: Ditto.
2010 m4/minloc1.m4: Ditto.
2011 m4/minval.m4: Ditto.
2013 m4/nearest.m4: Ditto.
2015 m4/product.m4: Ditto.
2016 m4/reshape.m4: Ditto.
2017 m4/set_exponent.m4: Ditto.
2019 m4/specific.m4: Ditto.
2020 m4/specific2.m4: Ditto.
2022 m4/transpose.m4: Ditto.
2024 runtime/environ.c: Ditto.
2025 runtime/error.c: Ditto.
2026 runtime/in_pack_generic.c: Ditto.
2027 runtime/in_unpack_generic.c: Ditto.
2028 runtime/main.c: Ditto.
2029 runtime/memory.c: Ditto.
2030 runtime/normalize.c: Ditto.
2031 runtime/pause.c: Ditto.
2032 runtime/select.c: Ditto.
2033 runtime/stop.c: Ditto.
2034 runtime/string.c: Ditto.
2035 generated/_abs_c4.f90: Regenerated.
2036 generated/_abs_c8.f90: Regenerated.
2037 generated/_abs_i4.f90: Regenerated.
2038 generated/_abs_i8.f90: Regenerated.
2039 generated/_abs_r4.f90: Regenerated.
2040 generated/_abs_r8.f90: Regenerated.
2041 generated/_acos_r4.f90: Regenerated.
2042 generated/_acos_r8.f90: Regenerated.
2043 generated/_aint_r4.f90: Regenerated.
2044 generated/_aint_r8.f90: Regenerated.
2045 generated/_anint_r4.f90: Regenerated.
2046 generated/_anint_r8.f90: Regenerated.
2047 generated/_asin_r4.f90: Regenerated.
2048 generated/_asin_r8.f90: Regenerated.
2049 generated/_atan2_r4.f90: Regenerated.
2050 generated/_atan2_r8.f90: Regenerated.
2051 generated/_atan_r4.f90: Regenerated.
2052 generated/_atan_r8.f90: Regenerated.
2053 generated/_conjg_c4.f90: Regenerated.
2054 generated/_conjg_c8.f90: Regenerated.
2055 generated/_cos_c4.f90: Regenerated.
2056 generated/_cos_c8.f90: Regenerated.
2057 generated/_cos_r4.f90: Regenerated.
2058 generated/_cos_r8.f90: Regenerated.
2059 generated/_cosh_r4.f90: Regenerated.
2060 generated/_cosh_r8.f90: Regenerated.
2061 generated/_dim_i4.f90: Regenerated.
2062 generated/_dim_i8.f90: Regenerated.
2063 generated/_dim_r4.f90: Regenerated.
2064 generated/_dim_r8.f90: Regenerated.
2065 generated/_exp_c4.f90: Regenerated.
2066 generated/_exp_c8.f90: Regenerated.
2067 generated/_exp_r4.f90: Regenerated.
2068 generated/_exp_r8.f90: Regenerated.
2069 generated/_log10_r4.f90: Regenerated.
2070 generated/_log10_r8.f90: Regenerated.
2071 generated/_log_c4.f90: Regenerated.
2072 generated/_log_c8.f90: Regenerated.
2073 generated/_log_r4.f90: Regenerated.
2074 generated/_log_r8.f90: Regenerated.
2075 generated/_mod_i4.f90: Regenerated.
2076 generated/_mod_i8.f90: Regenerated.
2077 generated/_mod_r4.f90: Regenerated.
2078 generated/_mod_r8.f90: Regenerated.
2079 generated/_sign_i4.f90: Regenerated.
2080 generated/_sign_i8.f90: Regenerated.
2081 generated/_sign_r4.f90: Regenerated.
2082 generated/_sign_r8.f90: Regenerated.
2083 generated/_sin_c4.f90: Regenerated.
2084 generated/_sin_c8.f90: Regenerated.
2085 generated/_sin_r4.f90: Regenerated.
2086 generated/_sin_r8.f90: Regenerated.
2087 generated/_sinh_r4.f90: Regenerated.
2088 generated/_sinh_r8.f90: Regenerated.
2089 generated/_sqrt_c4.f90: Regenerated.
2090 generated/_sqrt_c8.f90: Regenerated.
2091 generated/_sqrt_r4.f90: Regenerated.
2092 generated/_sqrt_r8.f90: Regenerated.
2093 generated/_tan_r4.f90: Regenerated.
2094 generated/_tan_r8.f90: Regenerated.
2095 generated/_tanh_r4.f90: Regenerated.
2096 generated/_tanh_r8.f90: Regenerated.
2097 generated/all_l4.c: Regenerated.
2098 generated/all_l8.c: Regenerated.
2099 generated/any_l4.c: Regenerated.
2100 generated/any_l8.c: Regenerated.
2101 generated/count_4_l4.c: Regenerated.
2102 generated/count_4_l8.c: Regenerated.
2103 generated/count_8_l4.c: Regenerated.
2104 generated/count_8_l8.c: Regenerated.
2105 generated/cshift1_4.c: Regenerated.
2106 generated/cshift1_8.c: Regenerated.
2107 generated/dotprod_c4.c: Regenerated.
2108 generated/dotprod_c8.c: Regenerated.
2109 generated/dotprod_i4.c: Regenerated.
2110 generated/dotprod_i8.c: Regenerated.
2111 generated/dotprod_l4.c: Regenerated.
2112 generated/dotprod_l8.c: Regenerated.
2113 generated/dotprod_r4.c: Regenerated.
2114 generated/dotprod_r8.c: Regenerated.
2115 generated/eoshift1_4.c: Regenerated.
2116 generated/eoshift1_8.c: Regenerated.
2117 generated/eoshift3_4.c: Regenerated.
2118 generated/eoshift3_8.c: Regenerated.
2119 generated/exp_c4.c: Regenerated.
2120 generated/exp_c8.c: Regenerated.
2121 generated/exponent_r4.c: Regenerated.
2122 generated/exponent_r8.c: Regenerated.
2123 generated/fraction_r4.c: Regenerated.
2124 generated/fraction_r8.c: Regenerated.
2125 generated/hyp_c4.c: Regenerated.
2126 generated/hyp_c8.c: Regenerated.
2127 generated/in_pack_i4.c: Regenerated.
2128 generated/in_pack_i8.c: Regenerated.
2129 generated/in_unpack_i4.c: Regenerated.
2130 generated/in_unpack_i8.c: Regenerated.
2131 generated/matmul_c4.c: Regenerated.
2132 generated/matmul_c8.c: Regenerated.
2133 generated/matmul_i4.c: Regenerated.
2134 generated/matmul_i8.c: Regenerated.
2135 generated/matmul_l4.c: Regenerated.
2136 generated/matmul_l8.c: Regenerated.
2137 generated/matmul_r4.c: Regenerated.
2138 generated/matmul_r8.c: Regenerated.
2139 generated/maxloc0_4_i4.c: Regenerated.
2140 generated/maxloc0_4_i8.c: Regenerated.
2141 generated/maxloc0_4_r4.c: Regenerated.
2142 generated/maxloc0_4_r8.c: Regenerated.
2143 generated/maxloc0_8_i4.c: Regenerated.
2144 generated/maxloc0_8_i8.c: Regenerated.
2145 generated/maxloc0_8_r4.c: Regenerated.
2146 generated/maxloc0_8_r8.c: Regenerated.
2147 generated/maxloc1_4_i4.c: Regenerated.
2148 generated/maxloc1_4_i8.c: Regenerated.
2149 generated/maxloc1_4_r4.c: Regenerated.
2150 generated/maxloc1_4_r8.c: Regenerated.
2151 generated/maxloc1_8_i4.c: Regenerated.
2152 generated/maxloc1_8_i8.c: Regenerated.
2153 generated/maxloc1_8_r4.c: Regenerated.
2154 generated/maxloc1_8_r8.c: Regenerated.
2155 generated/maxval_i4.c: Regenerated.
2156 generated/maxval_i8.c: Regenerated.
2157 generated/maxval_r4.c: Regenerated.
2158 generated/maxval_r8.c: Regenerated.
2159 generated/minloc0_4_i4.c: Regenerated.
2160 generated/minloc0_4_i8.c: Regenerated.
2161 generated/minloc0_4_r4.c: Regenerated.
2162 generated/minloc0_4_r8.c: Regenerated.
2163 generated/minloc0_8_i4.c: Regenerated.
2164 generated/minloc0_8_i8.c: Regenerated.
2165 generated/minloc0_8_r4.c: Regenerated.
2166 generated/minloc0_8_r8.c: Regenerated.
2167 generated/minloc1_4_i4.c: Regenerated.
2168 generated/minloc1_4_i8.c: Regenerated.
2169 generated/minloc1_4_r4.c: Regenerated.
2170 generated/minloc1_4_r8.c: Regenerated.
2171 generated/minloc1_8_i4.c: Regenerated.
2172 generated/minloc1_8_i8.c: Regenerated.
2173 generated/minloc1_8_r4.c: Regenerated.
2174 generated/minloc1_8_r8.c: Regenerated.
2175 generated/minval_i4.c: Regenerated.
2176 generated/minval_i8.c: Regenerated.
2177 generated/minval_r4.c: Regenerated.
2178 generated/minval_r8.c: Regenerated.
2179 generated/nearest_r4.c: Regenerated.
2180 generated/nearest_r8.c: Regenerated.
2181 generated/pow_c4_i4.c: Regenerated.
2182 generated/pow_c4_i8.c: Regenerated.
2183 generated/pow_c8_i4.c: Regenerated.
2184 generated/pow_c8_i8.c: Regenerated.
2185 generated/pow_i4_i4.c: Regenerated.
2186 generated/pow_i4_i8.c: Regenerated.
2187 generated/pow_i8_i4.c: Regenerated.
2188 generated/pow_i8_i8.c: Regenerated.
2189 generated/pow_r4_i4.c: Regenerated.
2190 generated/pow_r4_i8.c: Regenerated.
2191 generated/pow_r8_i4.c: Regenerated.
2192 generated/pow_r8_i8.c: Regenerated.
2193 generated/product_c4.c: Regenerated.
2194 generated/product_c8.c: Regenerated.
2195 generated/product_i4.c: Regenerated.
2196 generated/product_i8.c: Regenerated.
2197 generated/product_r4.c: Regenerated.
2198 generated/product_r8.c: Regenerated.
2199 generated/reshape_i4.c: Regenerated.
2200 generated/reshape_i8.c: Regenerated.
2201 generated/set_exponent_r4.c: Regenerated.
2202 generated/set_exponent_r8.c: Regenerated.
2203 generated/shape_i4.c: Regenerated.
2204 generated/shape_i8.c: Regenerated.
2205 generated/sum_c4.c: Regenerated.
2206 generated/sum_c8.c: Regenerated.
2207 generated/sum_i4.c: Regenerated.
2208 generated/sum_i8.c: Regenerated.
2209 generated/sum_r4.c: Regenerated.
2210 generated/sum_r8.c: Regenerated.
2211 generated/transpose_i4.c: Regenerated.
2212 generated/transpose_i8.c: Regenerated.
2213 generated/trig_c4.c: Regenerated.
2214 generated/trig_c8.c: Regenerated.
2216 2005-01-07 Bud Davis <bdavis9659@comcast.net>
2219 * transfer.c (next_record_r): always skip the
2220 eol search if it was found during sf_read.
2222 2004-12-27 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2224 * libgfortran/libgfortran.h (GFC_UINTEGER_1, GFC_UINTEGER_2):
2226 * intrinsics/ishftc.c: Update copyright years.
2227 (ishftc8): Change 'shift' and 'size' to GFC_INTEGER_4.
2228 * intrinsics/mvbits.c: Correct non-ASCII character in my name.
2229 Add implementations for GFC_INTEGER_1 and GFC_INTEGER_2.
2231 2004-12-23 Bud Davis <bdavis9659@comcast.net>
2234 * io/tranfer.c (formatted_transfer): moved check for
2235 format reversion inside the processing loop.
2237 2004-12-19 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2240 * libgfortran.h (itoa): Rename to gfc_itoa.
2241 * io/write.c (itoa): Same.
2242 * runtime/environ.c (itoa): Same.
2243 * runtime/error.c (itoa): Same.
2245 2004-12-15 Bud Davis <bdavis9659@comcast.net>
2246 Steven G. Kargl <kargls@comcast.net>
2249 * io/list_read.c (read_real): do not push back a comma when
2250 it delimits a real value without a decimal point
2252 2004-12-14 Steve Ellcey <sje@cup.hp.com>
2254 * libgfortran/io/transfer.c (us_read): Use memcpy/memset
2255 instead of assignment to fill unaligned buffer.
2257 (next_record_w): Ditto.
2259 2004-12-14 Steven G. Kargl <kargls@comcast.net>
2262 * gfortran.h: typedef GFC_INTEGER_1 and GFC_INTEGER_2
2263 * intrinsics/cshift0.c (cshift0_1,cshift0_2): New functions.
2264 * intrinsics/eoshift0.c (eoshift0_1,eoshift0_2): New functions.
2265 * intrinsics/eoshift2.c (eoshift2_1,eoshift2_2): New functions.
2267 2004-12-13 David Edelsohn <edelsohn@gnu.org>
2269 * io/transfer.c (read_sf): Change bitwise "and" to logical "and".
2271 2004-12-12 Richard Henderson <rth@redhat.com>
2273 * intrinsics/cshift0.c, intrinsics/eoshift0.c, intrinsics/eoshift2.c,
2274 intrinsics/pack_generic.c, intrinsics/reshape_generic.c,
2275 intrinsics/spread_generic.c, intrinsics/transpose_generic.c,
2276 intrinsics/unpack_generic.c, m4/cshift1.m4, m4/dotprod.m4,
2277 m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4, m4/eoshift3.m4,
2278 m4/iforeach.m4, m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4,
2279 m4/reshape.m4, m4/shape.m4, m4/transpose.m4: Use standard prefix
2281 * generated/*: Rebuild.
2283 2004-12-12 Richard Henderson <rth@redhat.com>
2285 * acinclude.m4 (LIBGFOR_CHECK_ATTRIBUTE_VISIBILITY): New.
2286 (LIBGFOR_CHECK_ATTRIBUTE_DLLEXPORT): New.
2287 (LIBGFOR_CHECK_ATTRIBUTE_ALIAS): New.
2288 * configure.ac: Use them.
2289 * configure, config.h.in, aclocal.m4: Rebuild.
2290 * libgfortran.h (prefix): Remove.
2291 (PREFIX, IPREFIX): New.
2292 (sym_rename, sym_rename1, sym_rename2): New.
2293 (internal_proto, export_proto, export_proto_np): New.
2294 (iexport_proto, iexport): New.
2295 (iexport_data_proto, iexport_data): New.
2296 * intrinsics/abort.c, intrinsics/args.c, intrinsics/associated.c,
2297 intrinsics/cpu_time.c, intrinsics/cshift0.c,
2298 intrinsics/date_and_time.c, intrinsics/env.c, intrinsics/eoshift0.c,
2299 intrinsics/eoshift2.c, intrinsics/etime.c, intrinsics/exit.c,
2300 intrinsics/flush.c, intrinsics/fnum.c, intrinsics/getXid.c,
2301 intrinsics/getcwd.c, intrinsics/ishftc.c, intrinsics/mvbits.c,
2302 intrinsics/pack_generic.c, intrinsics/rand.c, intrinsics/random.c,
2303 intrinsics/reshape_generic.c, intrinsics/size.c,
2304 intrinsics/spread_generic.c, intrinsics/stat.c,
2305 intrinsics/string_intrinsics.c, intrinsics/system.c,
2306 intrinsics/system_clock.c, intrinsics/transpose_generic.c,
2307 intrinsics/umask.c, intrinsics/unlink.c, intrinsics/unpack_generic.c,
2308 io/backspace.c, io/close.c, io/endfile.c, io/inquire.c, io/io.h,
2309 io/open.c, io/rewind.c, io/transfer.c, libgfortran.h, m4/cshift1.m4,
2310 m4/dotprod.m4, m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4,
2311 m4/eoshift3.m4, m4/exponent.m4, m4/fraction.m4, m4/iforeach.m4,
2312 m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4, m4/nearest.m4,
2313 m4/pow.m4, m4/reshape.m4, m4/set_exponent.m4, m4/shape.m4,
2314 m4/transpose.m4, runtime/environ.c, runtime/error.c,
2315 runtime/in_pack_generic.c, runtime/in_unpack_generic.c,
2316 runtime/main.c, runtime/memory.c, runtime/pause.c, runtime/select.c,
2317 runtime/stop.c: Use them to mark symbols internal or external.
2318 * generated/*: Rebuild.
2320 2004-12-09 David Edelsohn <edelsohn@gnu.org>
2323 Revert 2004-12-07 change.
2324 * Makefile.am (AM_MAKEFLAGS): Delete.
2325 * Makefile.in: Regenerate.
2327 2004-12-07 Steve Ellcey <sje@cup.hp.com>
2329 * libgfortran/Makefile.am (AM_MAKEFLAGS): New.
2330 * libgfortran/Makefile.in: Regenerate
2332 2004-12-07 Steve Ellcey <sje@cup.hp.com>
2334 * io/io.h (open_external): Change prototype.
2335 * io/unix.c (regular_file): Change prototype and set flags->action if
2337 (open_external): Ditto.
2338 * io/open.c (new_unit): Let open_external set flags->action.
2340 2004-12-07 Eric Botcazou <ebotcazou@libertysurf.fr>
2342 * configure.ac: Check for ieeefp.h. Check for fabsf in libm.
2343 * configure: Regenerate.
2344 * config.h.in: Likewise.
2345 * c99_protos.h: New file.
2346 * libgfortran.h: Include c99_protos.h and conditionally ieeefp.h.
2347 * intrinsics/c99_functions.c (fabsf): New function.
2349 2004-12-06 Richard Henderson <rth@redhat.com>
2351 * intrinsics/cshift0.c, intrinsics/eoshift0.c, intrinsics/eoshift2.c,
2352 intrinsics/pack_generic.c, intrinsics/string_intrinsics.c,
2353 intrinsics/transpose_generic.c, m4/ifunction.m4, m4/matmul.m4,
2354 m4/matmull.m4, m4/transpose.m4: Use internal_malloc_size instead
2356 * generated/*: Rebuild.
2358 2004-12-06 Richard Henderson <rth@redhat.com>
2360 * intrinsics/c99_functions.c, intrinsics/eoshift0.c,
2361 intrinsics/eoshift2.c, intrinsics/exit.c, intrinsics/flush.c,
2362 intrinsics/ishftc.c, intrinsics/mvbits.c, intrinsics/pack_generic.c,
2363 intrinsics/random.c, intrinsics/reshape_generic.c, intrinsics/size.c,
2364 intrinsics/spread_generic.c, intrinsics/stat.c,
2365 intrinsics/string_intrinsics.c, intrinsics/system_clock.c,
2366 intrinsics/transpose_generic.c, intrinsics/unlink.c,
2367 intrinsics/unpack_generic.c, io/backspace.c, io/format.c,
2368 io/list_read.c, io/lock.c, io/open.c, io/transfer.c, io/unix.c,
2369 io/write.c, runtime/environ.c, runtime/error.c,
2370 runtime/in_pack_generic.c, runtime/in_unpack_generic.c, runtime/main.c,
2371 runtime/memory.c, runtime/pause.c, runtime/stop.c,
2372 runtime/string.c: Whitespace fixes.
2374 2004-12-06 Richard Henderson <rth@redhat.com>
2376 * Makefile.am: Generate all m4 output under $(srcdir).
2377 * Makefile.in: Regenerate.
2379 2004-12-02 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2382 * io/transfer.c (unformatted_read, unformatted_write): width of
2383 a COMPLEX is twice its kind.
2385 2004-12-02 Richard Sandiford <rsandifo@redhat.com>
2387 * configure.ac: Use TL_AC_GCC_VERSION to set gcc_version.
2388 * configure, aclocal.m4, Makefile.in: Regenerate.
2390 2004-12-02 Bud Davis <bdavis9659@comcast.net>
2393 * io/unix.c (fd_alloc_w_at): Update file_length when extending.
2394 * io/backspace.c (formatted_backspace): Reset endfile after backspace.
2396 2004-12-02 Bud Davis <bdavis9659@comcast.net>
2398 * io/inquire.c (inquire_via_unit): do not allow a direct access
2399 file to be opened for sequential I/O.
2401 2004-12-02 Steven G. Kargl <kargls@comcast.net>
2402 Paul Brook <paul@codesourcery.com>
2404 * intrinsics/flush.c: New file.
2405 * intrinsics/fnum.c: ditto
2406 * intrinsics/stat.c: ditto
2407 * io/io.h (unit_to_fd): Add prototype.
2408 * io/unix.c (unit_to_fd): New function.
2409 * configure.ac: Add test for members of struct stat. Check for
2410 sys/types.h and sys/stat.h
2411 * Makefile.am: Add intrinsics/{flush.c,fnum.c,stat.c}
2412 * configure.in: Regenerate.
2413 * config.h.in: Regenerate.
2414 * Makefile.in: Regenerate.
2416 2004-12-01 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2418 * Makefile.am (AM_CPPFLAGS): Use -iquote instead of -I.
2420 2004-11-28 Bud Davis <bdavis9659@comcast.net>
2422 * io/unix.c (mmap_alloc_w_a): check for a write to a location
2423 less than the mapped area.
2425 2004-11-27 Bud Davis <bdavis9659@comcast.net>
2428 * io/endfile.c (st_endfile): flush the stream before truncating.
2430 2004-11-24 Kelley Cook <kcook@gcc.gnu.org>
2432 * configure: Regenerate for libtool change.
2434 2004-11-22 Steven Bosscher <stevenb@suse.de>
2437 * configure.ac: Check for finite in libm.
2438 * libgfortran.h: Define isfinite macro if not defined.
2439 * intrinsics/c99_functions.c: Use defined(fpclassify) instead of
2441 * io/write.c (write_float): Use isfinite instead of finite.
2442 * configure, config.h.in: Rebuilt.
2444 2004-11-20 Roger Sayle <roger@eyesopen.com>
2446 * io/write.c (write_float, list_formatted_write): Fix indentation.
2448 2004-11-20 Eric Botcazou <ebotcazou@libertysurf.fr>
2451 * acinclude.m4 (LIBGFOR_TARGET_ILP32): New check.
2452 * configure.ac: Include LIBGFOR_TARGET_ILP32.
2453 * configure: Regenerate.
2454 * config.h.in: Likewise.
2455 * libgfortran.h: Provide default definitions for C99 types
2456 on ILP32 targets that don't have them.
2459 * configure.ac: Check for snprintf.
2460 * configure: Regenerate.
2461 * config.h.in: Likewise.
2462 * intrinsics/date_and_time.c (date_and_time): Do not
2463 use snprinf if it is not available.
2464 * io/write.c (output_float): Likewise.
2466 2004-11-20 Steven G. Kargl <kargls@comcast.net>
2468 * Makefile.am: Add intrinsics/{umask.c,unlink.c,exit.c}
2469 * Makefile.in: Regenerated
2470 * intrinsics/umask.c: New file
2471 * intrinsics/unlink.c: ditto
2472 * intrinsics/exit.c: ditto
2474 2004-11-18 Victor Leikehman <lei@il.ibm.com>
2476 * m4/matmul.m4: Loops reordered to improve cache behavior.
2477 * generated/matmul_??.c: Regenerated.
2479 2004-11-10 Paul Brook <paul@codesourcery.com>
2482 * configure.ac: Check for strtof.
2483 * configure: Regenerate.
2484 * config.h.in: Regenerate.
2485 * io/read.c (convert_real): Use strtof if available.
2486 (convert_precision_real): Remove.
2487 (read_f): Avoid poor exponentiation algorithm.
2489 2004-11-05 Andreas Schwab <schwab@suse.de>
2491 * configure.ac: Use AC_PROG_FC, FC and FCFLAGS instead of
2492 AC_PROG_F77, F77 and FFLAGS.
2493 * Makefile.am (selected_int_kind.inc, selected_real_kind.inc): Use
2494 FCCOMPILE instead of F77COMPILE.
2495 * configure, Makefile.in: Regenerate.
2497 2004-11-05 Kelley Cook <kcook@gcc.gnu.org>
2499 * acinclude.m4: Properly quote AC_CACHE_CHECK.
2500 * Makefile.am: Add in ACLOCAL_AMFLAGS.
2501 * aclocal.m4, configure, Makefile.in: Regenerate.
2503 2004-10-30 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2505 * config.h.in: Regenerate.
2506 * configure: Regenerate.
2507 * configure.ac (AC_CHECK_FUNCS): Add mkstemp.
2508 * io/unix.c (S_IRGRP): Define if undefined.
2512 (tempfile): Use mktemp if mkstemp missing, fix typos.
2514 2004-10-30 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2516 * intrinsics/system.c ("libgfortran.h"): Move after system headers.
2518 2004-10-30 Canqun Yang <canqun@nudt.edu.cn>
2520 * intrinsics/rand.c (irand): Handle NULL argument.
2522 2004-10-07 Paul Brook <paul@codesourcery.com>
2524 * io/transfer.c (finalize_transfer): Free internal streams.
2525 * io/unix.c (mem_close): Free stream object.
2527 2004-10-07 Paul Brook <paul@codesourcery.com>
2529 * intrinsics/string_intrinsics.c (string_verify): Fix off by one
2532 2004-10-06 Paul Brook <paul@codesourcery.com>
2535 * io/transfer.c (data_transfer_init): Reset sf_seen_eor.
2537 2004-10-04 Andrew Pinski <pinskia@physics.uc.edu>
2539 * intrinsics/mvbits.c: Commit the file.
2541 2004-10-04 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2544 * intrinsics/pack_generic.c (__pack): Allocate memory for return array
2545 if not done by caller.
2546 (__pack_s): New function.
2547 * runtime/memory.c (internal_malloc, internal_malloc64): Allow
2548 allocating zero memory.
2551 * Makefile.am (gfor_helper_src): Add intrinsics/mvbits.h.
2552 * Makefile.in: Regenerate.
2553 * intrinsics/mvbits.h: New file.
2556 * intrinsics/system.c: New file.
2557 * Makefile.am: Add dependency for the new file.
2558 * Makefile.in: Regenerate.
2560 2004-10-04 Paul Brook <paul@codesourcery.com>
2561 Bud Davis <bdavis9659@comcast.net>
2565 * io/format.c (parse_format_list): Set repeat count for S, SP, SS,
2567 * io/write.c (output_float): Don't output minus zero.
2569 2004-10-03 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2571 * intrinsics/abort.c ("libgfortran.h"): Move.
2572 * intrinsics/date_and_time.c ("libgfortran.h"): Same.
2573 * intrinsics/write.c ("libgfortran.h"): Same.
2575 2004-09-26 Tobias Schlueter <tobis.schlueter@physik.uni-muenchen.de>
2578 * config.h.in (HAVE_POWF): Undefine.
2579 * configure.ac: Check for 'powf' in library.
2580 * configure: Regenerate.
2581 * intrinsics/c99_functions.c (powf): New function.
2583 2004-09-24 Tobias Schlueter <tobis.schlueter@physik.uni-muenchen.de>
2585 * intrinsics/etime.c (etime_): New function.
2587 2004-09-21 Steven G. Kargl <kargls@comcast.net>
2589 * libgfortran.h: define gfc_alloca()
2590 * intrinsics/env.c (getenv, get_environment_variable_i4): Use it.
2592 2004-09-21 Bud Davis <bdavis9659@comcast.net>
2595 * io/list_read.c (namelist_read): ignore spaces after
2596 the '=' for namelist reads.
2598 2004-09-15 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2600 * config.h.in: Regenerate.
2601 * configure: Regenerate.
2602 * configure.ac (AC_CHECK_HEADERS): Check for sys/mman.h.
2603 * unix.c: Include stdio.h.
2604 (HAVE_SYS_MMAN_H): Check.
2605 (PROT_READ, PROT_WRITE): Provide default definitions.
2607 2004-09-15 Steven G. Kargl <kargls@comcast.net>
2609 * intrincics/getcwd.c: New file.
2610 * Makefile.am: Add getcwd.c.
2611 * Makefile.in: Regenerated.
2613 2004-09-15 Steven G. Kargl <kargls@comcast.net>
2614 Paul Brook <paul@codesourcery.com>
2616 * intrinsics/env.c (getenv, get_environmental_variable): Remove
2617 trailing white space. Use alloca. Honour trim_name.
2619 2004-09-13 Bud Davis <bdavis9659@comcast.net>
2623 * io/list_read.c (list_formatted_read): Handle trailing spaces
2626 2004-09-06 Steven G. Kargl <kargls@comcast.net>
2628 * io/write.c (output_float): Typo in comment. Remove debugging
2629 printf. Fix format for FP of form 1e10.
2631 2004-09-03 Richard Henderson <rth@redhat.com>
2633 * intrinsics/cshift0.c (DEF_COPY_LOOP, copy_loop_int, copy_loop_long,
2634 copy_loop_double, copy_loop_ldouble): New.
2635 (__cshift0): Make shift type ssize_t. Use % operator instead of
2636 div. Use specialized versions of copy loop depending on the shape.
2638 2004-09-02 Paul Brook <paul@codesourcery.com>
2640 * io/format.c (parse_format_list): Set repeat count for P descriptors.
2641 * write.c (output_float): Fix condition. Correctly handle nonzero
2644 2004-09-01 Eric Botcazou <ebotcazou@libertysurf.fr>
2646 * mk-sik-inc.sh: Use a temporary string instead of 'echo -n'.
2647 * mk-srk-inc.sh: Likewise.
2649 2004-09-01 Paul Brook <paul@codesourcery.com>
2651 * runtime/error.c (generate_error): Set both iostat and
2654 2004-08-31 Paul Brook <paul@codesourcery.com>
2657 * io/list_read.c (next_char): Don't signal EOF for internal files.
2658 * io/unix.c (mem_alloc_r_at): Don't return NULL for incomplete reads.
2660 2004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2662 * io/unit.c: Separate copyright years by ','.
2663 (compare, insert_unit, delete_unit, is_internal_unit, close_units):
2664 Remove blank line in beginning of function.
2665 (get_unit): Simplify code.
2667 2004-08-31 Paul Brook <paul@codesourcery.com>
2669 * io/unit.c (get_unit): Remove superfluous if.
2671 2004-08-31 Paul Brook <paul@codesourcery.com>
2673 * io/transfer.c (read_sf): Rename uinty to readlen. Detect EOF.
2674 (finalize_transfer): Move setjmp after namlist IO.
2675 * io/unix.c (mem_alloc_r_at): Calculate remaining length correctly.
2677 2004-08-31 Paul Brook <paul@codesourcery.com>
2679 * list_read.c (eat_separator): Set at_eo when a '/' is seen.
2681 2004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2683 * libgfortran.h: Replace 'gfc_strlen_type' by
2684 'gfc_charlen_type'. Update comment accordingly.
2685 * intrinsics/args.c, intrinsics/env.c, io/io.h, io/transfer.c:
2686 Replace all occurences of 'gfc_strlen_type' by 'gfc_charlen_type'.
2688 2004-08-31 Paul Brook <paul@codesourcery.com>
2690 * libgfortran.h: Add comments.
2692 2004-08-30 Richard Henderson <rth@redhat.com>
2694 * Makefile.am (gfor_helper_src): Split selected_kind.f90.
2695 (gfor_built_src): Add selected_int_kind.inc selected_real_kind.inc.
2696 (selected_int_kind.inc selected_real_kind.inc): New rules.
2697 * Makefile.in: Regenerate.
2698 * mk-sik-inc.sh, mk-srk-inc.sh: New files.
2699 * intrinsics/selected_int_kind.f90: Split from selected_kind.f90,
2700 include table of detected kinds.
2701 * intrinsics/selected_real_kind.f90: Similarly.
2703 2004-08-29 Steven G. Kargl <kargls@comcast.net>
2704 Paul Brook <paul@codesourcery.com>
2706 * intrinsics/bessel.c: New file.
2707 * intrinsics/erf.c: New file.
2708 * Makefie.am: Add intrinsics/bessel.c and intrinsics/erf.c.
2709 * configure.ac: Test for C99 Bessel and Error functions.
2710 * Makefile.in: Regenerate.
2711 * config.h.in: Regenerate.
2712 * configure: Regenerate.
2714 2004-08-29 Steven G. Kargl <kargls@comcast.net>
2715 Paul Brook <paul@codesourcery.com>
2717 * Makefile.am: Add intrinsics/getXid.c.
2718 * configure.ac: Add tests for get{g,p,u}id.
2719 * config.h.in: Regenerate.
2720 * Makefile.in: Regenerate.
2721 * configure: Regenerate.
2723 2004-08-28 Paul Brook <paul@codesourcery.com>
2726 * libgfortran.h (rtoa): Remove prototype.
2727 * runtime/error.c (rtoa): Remove.
2728 * io/write.c (calculate_G_format): Don't add blanks if E format is
2729 used. Add correct number of blanks when exponent width is specified.
2730 (output_float): Rewrite.
2732 2004-08-27 Paul Brook <paul@codesourcery.com>
2734 * io/rewind.c (st_rewind): Reset unit to read mode.
2736 2004-08-27 Bud Davis <bdavis9659@comcast.net>
2739 * io/io.h: created typedef for unit_mode.
2740 * io/io.h (gfc_unit): added mode to unit structure.
2741 * io/transfer.c (data_transfer_init): flush if a write then
2742 read is done on a unit (direct access files).
2743 * io/rewind.c (st_rewind): Used unit mode instead of global.
2745 2004-08-24 Bud Davis <bdavis9659@comcast.net>
2748 * runtime/error.c (itoa): keep from overflowing during
2749 mod operation by using unsigned variable.
2751 2004-08-24 Bud Davis <bdavis9659@comcast.net>
2754 * runtime/string_intrinsics.c (string_index):check for
2755 substring longer than string.
2757 2004-08-24 David Edelsohn <edelsohn@gnu.org>
2759 * Makefile.am (libgfortran_la_LDFLAGS): Add -lm.
2760 * Makefile.in: Rebuilt.
2762 2004-08-23 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2764 * io/io.h, io/list_read.c, io/open.c, io/transfer.c, io/write.c:
2765 Fix formatting issues, update copyright years.
2767 2004-08-21 Bud Davis <bdavis9659@comcast.net>
2770 * io/transfer.c (next_record_w): Do not blank pad.
2771 * io/transfer.c (next_record): Take into account partial records.
2773 2004-08-18 Victor Leikehman <lei@il.ibm.com>
2776 * io/transfer.c (st_set_nml_var)
2777 * io/write.c (namelist_write): Allow var_name and var_name_len to be
2778 null. For strings, use string_length field instead of len.
2779 * io/io.h (struct namelist_type): New field string_length.
2780 (st_set_nml_var_char): New argument string_length.
2782 2004-08-13 Bud Davis <bdavis9659@comcast.net>
2785 * io/open.c (st_open): use flags instead of the unit structure.
2787 2004-08-10 Victor Leikehman <lei@il.ibm.com>
2789 * io/list_read.c (namelist_read): Convert variable names
2790 to lower case, so that mixed-case names are recognized.
2791 Don't read beyond terminating slash.
2793 2004-08-09 Richard Henderson <rth@redhat.com>
2794 Roger Sayle <roger@eyesopen.com>
2796 * intrinsics/c99_functions.c (nextafterf): New implementation that
2797 works correctly with denormalized numbers.
2799 2004-08-09 Victor Leikehman <lei@il.ibm.com>
2801 * m4/matmul.m4, m4/matmull.m4, intrinsics/eoshift0.c,
2802 intrinsics/eoshift2.c, intrinsics/transpose_generic.c:
2803 Allocate space if return value has NULL in its data field.
2804 * generated/*.c: Regenerate.
2806 2004-08-06 Janne Blomqvist <jblomqvi@cc.hut.fi>
2808 * intrinsics/env.c: New file.
2809 * Makefile.am: Add env.c to build.
2810 * Makefile.in: Regenerate.
2812 2004-08-05 Victor Leikehman <lei@il.ibm.com>
2814 PR libgfortran/16704
2815 * io/read.c (read_radix): Understand letters f and F as hex digits.
2817 2004-08-04 Victor Leikehman <lei@il.ibm.com>
2819 * libgfortran.h (array_t, size0) New declarations.
2820 * m4/ifunction.m4, m4/transpose.m4, intrinsics/cshift0.c: Allocate
2821 space if return value descriptor has NULL in its data field,
2822 and initialize bounds and stride.
2823 * intrinsics/size.c (array_t, size0): Declarations moved to
2825 * generated/*.c: Regenerate.
2827 2004-08-03 Roger Sayle <roger@eyesopen.com>
2829 PR libgfortran/16137
2830 * configure.ac: Add tests for acosf, asinf, atan2f, atanf, ceilf,
2831 copysignf, cosf, coshf, expf, floorf, frexpf, hypotf, logf, log10f,
2832 scalbnf, sinf, sinhf, sqrtf, tanf and tanhf in libm.
2833 * config.h.in: Regenerate.
2834 * configure: Regenerate.
2836 * instrinsics/c99_functions.c (acosf, asinf, atan2f, atanf, ceilf,
2837 copysignf, cosf, coshf, expf, floorf, frexpf, hypotf, logf, log10f,
2838 nextafterf, scalbnf, sinf, sinhf, sqrtf, tanf, tanhf): New stub
2839 implementations for targets that don't support C99 float functions.
2841 2004-08-01 Roger Sayle <roger@eyesopen.com>
2843 * io/write.c (write_float): Use the slightly more portable isnan
2844 in preference to isinf.
2846 2004-07-18 Bud Davis <bdavis9659@comcast.net>
2848 * configure.ac: Add check for LFS support.
2849 * configure: Regenerate
2851 2004-07-11 Paul Brook <paul@codesourcery.com>
2854 * m4/cexp.m4 (carg): Return -pi to pi.
2855 * generated/exp_c?.c: Regenerate.
2857 2004-07-08 Andreas Krebbel <krebbel1@de.ibm.com>
2860 * libgfortran/io/write.c: (write_float): Added length check.
2861 Remove pointless memset calls.
2863 2004-07-04 Bud Davis <bdavis9659@comcast.net>
2864 Paul Brook <paul@codesourcery.com>
2867 * io/transfer.c(us_write): set recl for seq unform writes to max size.
2868 * io/transfer.c(data_transfer_init): handle un-opened seq unform unit.
2869 * io/unix.c(fd_alloc_w_at): handle requests at start, fd_flush at
2871 * io/unix.c(is_seekable): set based upon the file/device, not the
2872 method being used to access it (fd or mmap).
2873 * io/unix.c(fd_flush): don't set file_size if !seekable.
2874 * io/unix.c(fd_truncate: ditto.
2876 2004-07-04 Janne Blomqvist <jblomqvi@cc.hut.fi>
2877 Paul Brook <paul@codesourcery.com>
2881 * libgfortran.h (gfc_strlen_type): Define.
2882 * intrinsics/args.c (getarg): Rename ...
2883 (getarg_i4): ... to this.
2884 (getarg_i8, get_command_argument_i4, get_command_argument_i8,
2885 get_command_i4, get_command_i8): New functions.
2887 2004-07-04 Matthias Klose <doko@debian.org>
2889 * libtool-version: New.
2890 * Makefile.am (libgfortran_la_LDFLAGS): Use -version-info for soname.
2891 * Makefile.in: Regenerate.
2892 * configure.ac: Remove libtool_VERSION macro
2893 * configure: Regenerate
2895 2004-06-30 Steve Kargl <sgk@troutmask.apl.washington.edu>
2896 Steven Bosscher <stevenb@suse.de>
2898 * intrinsics/rand.c (rand): Wrap the irand() call from the previous
2901 2004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2902 Paul Brook <paul@codesourcery.com>
2904 * runtime/normalize.c (normalize_r4_i4, normalize_r8_i8): Fix
2906 * intrinsics/rand.c (rand): Call irand() in call to normalize_r4_i4.
2908 2004-06-27 Bud Davis <bdavis9659@comcast.net>
2911 * io/write.c (write_float): check signbit for Infinity.
2913 2004-06-26 Bud Davis <bdavis9659@comcast.net>
2916 * unix.c(regular_file): create file if it does not exist.
2918 2004-06-24 Andrew Pinski <apinski@apple.com>
2920 * configure.ac: Remove check for libmx.
2921 * configure: Regenerate.
2923 2004-06-22 Janne Blomqvist <jblomqvi@cc.hut.fi>
2926 * inquire.c (st_inquire): Add comment
2927 * io.h (st_parameter): Add iolength.
2928 (st_iolength, st_iolength_done): Declare.
2929 * transfer.c (iolength_transfer, iolength_transfer_init,
2930 st_iolength, st_iolength_done): New functions.
2932 2004-06-21 Steven G. Kargl <kargls@comcast.net>
2934 * etime.c (etime_sub): Remove array rank check;
2935 Add check for sufficient space.
2937 2004-06-19 Bud Davis <bdavis9659@comcast.net>
2940 * io/list_read.c(set_value): fixed spelling.
2942 2004-06-19 Bud Davis <bdavis9659@comcast.net>
2945 * io/list_read.c(set_value): don't copy if the string is null.
2947 2004-06-14 Bud Davis <bdavis9659@comcast.net>
2950 * intrinsics/c99_functions.c: Use fpclassify if it exists.
2952 2004-06-13 Paul Brook <paul@codesourcery.com>
2954 * Makefile.am (gfor_helper_src): Add runtime/normalize.f90.
2955 * configure.ac: Add checks for nextafter and nextafterf.
2956 * Makefile.in, config.h.in, configure: Regenerate.
2957 * libgfortran.h (normalize_r4_i4, normalize_r8_i8): Declare.
2958 * intrinsics/rand.c (rand): Use normalize_r4_i4.
2959 * intrinsics/random.c (random_r4): Use normalize_r4_i4.
2960 (random_r8): Use normalize_r8_i8.
2961 * runtime/normalize.c: New file.
2963 2004-06-13 Steven G. Kargl <kargls@comcast.net>
2964 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2966 * random.c: Fix several spelling and formatting mistakes in
2968 (random_r8): Fix loop to make random numbers range in [0,1(.
2971 2004-06-13 Steven G. Kargl <kargls@comcast.net>
2973 * random.c (random_r4): Burn a random number.
2974 (random_r8): fix infinite loop.
2976 2004-06-12 Bud Davis <bdavis9659@comcast.net>
2977 Steve Kargl <sgk@troutmask.apl.washington.edu>
2980 * intrinsics/c99_functions.c: New file.
2981 * Makefile.am: Add new file.
2982 * configure.ac: Added test for round/roundf.
2983 * Makefile.in: Regenerate.
2984 * configure: Regenerate.
2985 * configure.h.in: Regenerate.
2987 2004-06-12 Steven G. Kargl <kargls@comcast.net>
2989 * Makefile.am: Add rand.c and etime.c
2990 * Makefile.in: Regenerated.
2991 * aclocal.in: Regenerated.
2992 * cpu_time.c (second_sub, second): New functions.
2993 * rand.c (irand, rand, srand): New file.
2994 * etime.c (etime_sub, etime): New file.
2996 2004-06-12 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2997 Steven Bosscher <stevenb@suse.de>
3000 * intrinsics/date_and_time.c: New file.
3001 * Makefile.am (gfor_helper_src): Add intrinsics/date_and_time.c.
3002 * Makefile.in, aclocal.m4: Regenerate.
3003 * libgfortran.h: Prototype date_and_time().
3005 2004-06-12 Bud Davis <bdavis9659@comcast.net>
3008 * intrinsics/args.c: Implement GETARG and IARGC.
3009 * Makefile.am: Add it.
3010 * Makefile.in: Regenerate.
3012 2004-06-12 Bud Davis <bdavis9659@comcast.net>
3015 * io/write.c(write_float): Format inf and nan IAW F2003.
3017 2004-06-09 Bud Davis <bdavis9659@comcaste.net>
3020 * io/transfer.c (formatted_transfer): position is unique
3021 for T and TL edit descriptors.
3022 (data_transfer_init): set record length to size of internal
3025 2004-06-09 Bud Davis <bdavis9659@comcast.net>
3028 * io/backspace.c(st_backspace): call correct routine for
3029 formatted and un-formatted units.
3031 2004-05-30 Andreas Jaeger <aj@suse.de>, Steven Bosscher <stevenb@suse.de>
3034 * Makefile.am (AM_CPPFLAGS): Renamed from INCLUDES.
3035 (lib_LTLIBRARIES): Rename to ...
3036 (toolexeclib_LTLIBRARIES): this for multilib support.
3037 * configure.in: Rename to ...
3038 * configure.ac: this. Update to modern autoconf style, enable
3039 multilibs, support --enable-version-specific-runtime-libs.
3040 * Makefile.in: Regenerated.
3041 * configure: Regenerated.
3042 * aclocal.m4: Regenerated.
3044 2004-05-30 Steven G. Kargl <kargls@comcast.net>
3046 * libgfortran.h (random_seed): Update prototype.
3047 * intrinsics/random.c: Disable old implementation and add new one.
3049 2004-05-30 Andreas Jaeger <aj@suse.de>
3051 * intrinsics/random.c: Include unistd.h for close and read
3052 prototypes, remove unneeded inclusion of assert.h.
3054 * intrinsics/abort.c: Include stdlib.h for abort prototype, remove
3055 unneeded inclusion of assert.h.
3057 2004-05-27 Tobias Schlueter <tobias.shclueter@physik.uni-muenchen.de>
3060 * intrinsics/associated.c: Remove enum.
3061 (associated): Replace TRUE/FALSE by 1/0.
3063 2004-05-23 Steven G. Kargl <kargls@comcast.net>
3065 * random.c (random_seed): Use correct variable.
3067 2004-05-22 Steven G. Kargl <kargls@comcast.net>
3069 * intrinsics/system_clock: New file.
3070 * Makefile.am: Add intrinsics/system_clock.c.
3071 * Makefile.in: Regenerate.
3073 2004-05-21 Roger Sayle <roger@eyesopen.com>
3075 * io/format.c (parse_format_list): Allow the comma after a string
3076 literal to be optional.
3078 2004-05-18 Paul Brook <paul@codesourcery.com>
3079 Feng Wang <fengwang@nudt.edu.cn>
3081 * Makefile.am (i_pow_c): Set it. Add build rule.
3082 (gfor_built_src): Use it.
3083 (m4_files): add m4/pow.m4.
3084 * Makefile.in: Regenerate.
3085 * m4/pow.m4: New file.
3086 * generated/pow_*.c: Regenerate.
3088 2004-05-18 Paul Brook <paul@codesourcery.com>
3090 * Makefile.am: Remove references to types.m4.
3091 * m4/iparm.m4: Merge with types.m4.
3092 * m4/types.m4: Remove.
3093 * m4/cshift1.m4, m4/dotprod.m4, m4/dotprodc.m4, m4/dotprodl.m4,
3094 m4/eoshift1.m4, m4/eoshift3.m4, m4/iforeach.m4, m4/ifunction.m4,
3095 m4/in_pack.m4, m4/in_unpack.m4, m4/iparm.m4, m4/matmul.m4,
3096 m4/matmull.m4, m4/maxloc0.m4, m4/maxloc1.m4, m4/maxval.m4,
3097 m4/minloc0.m4, m4/minloc1.m4, m4/minval.m4, m4/reshape.m4,
3098 m4/shape.m4, m4/specific.m4, m4/specific2.m4, m4/transpose.m4):
3099 Update to use new iparm.m4.
3100 * generated/*.c: Regenerate.
3102 2004-05-18 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3105 * gfortran.h (offset_t): Rename to ...
3106 (gfc_offset): ... this.
3107 * io/backspace.c (formatted_backspace, unformatted_backspace),
3108 io/io.h (stream, gfc_unit, global_t, file_length, file_position),
3109 transfer.c (us_read, us_write, next_record_r, next_record_w),
3110 io/unit.c (init_units), unix.c (unix_stream, fd_alloc,
3111 fd_alloc_r_at, fd_alloc_w_at, fd_seek, mmap_alloc,
3112 mmap_alloc_r_at, mmap_alloc_w_at, mmap_seek, mem_alloc_r_at,
3113 mem_alloc_w_at, mem_seek, file_length, file_position): Replace all
3114 occurences of offset_t by gfc_offset.
3116 2004-05-16 Paul Brook <paul@codesourcery.com>
3118 * io/format.c (write_real): Don't include padding in format.
3120 2004-05-16 Paul Brook <paul@codesourcery.com>
3122 * io/format.c (format_lex): Make c an int.
3124 2004-05-16 Janne Blomqvist <jblomqvi@cc.hut.fi>
3125 Paul Brook <paul@codesourcery.com>
3127 * io/write.c (write_logical): Don't print extra blank.
3128 (write_integer): Base field width on kind.
3129 (list_formatted_write): Output initial blank.
3131 2004-05-16 Janne Blomqvist <jblomqvi@cc.hut.fi>
3133 * io/io.h (flush): Add prototype.
3134 * io/transfer.c (finalize_transfer): Flush partial records.
3135 * io/unix.c (flush): New function.
3137 2004-05-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3140 * io/io.h (unit_t): Rename to ...
3141 (gfc_unit) ... this.
3142 (unit_root, current_unit, find_file, find_unit, get_unit): Now
3144 (delete_file, insert_unit, close_unit): Argument now of type
3146 * backspace.c (st_backspace), close.c (st_close), endfile.c
3147 (st_endfile), inquire.c (inquire_via_unit, st_inquire), open.c
3148 (test_endfile, edit_modes, new_unit, already_open, st_open),
3149 rewind.c (st_rewind), transfer.c (current_unit), unit.c
3150 (internal_unit, unit_cache, rotate_left, rotate_right, insert,
3151 insert_unit, delete_root, delete_treap, delete_unit, find_unit,
3152 get_unit, init_units, close_unit), unix.c (find_file0,
3153 find_file, delete_file): Replace all occurences of unit_t by
3156 2004-05-15 Bud Davis <bdavis9659@comcast.net>
3159 * io/write.c (write_a): right justify A edit output.
3161 2004-05-14 Bud Davis <bdavis9659@comcast.net>
3164 * libgfortan.h,intrinsics/random.c: Made random_seed visible.
3165 * runtime/main.c(init): Call random_seed as part of MAIN init.
3167 2004-05-13 Tobias Schlter <tobias.schlueter@physik.uni-muenchen.de>
3169 * io/format.c: (parse_format_list): No comma is required after
3172 2004-05-13 Bud Davis <bdavis9659@comcast.net>
3175 * io/intrinsic/string_intrinsics.c (adjustr): rework logic.
3177 2004-05-06 Rainer Orth <ro@TechFak.Uni-Bielefeld.DE>
3178 Steven Bosscher <stevenb@suse.de>
3181 * libgfortran.h: Include <inttypes.h> if available.
3183 2004-05-03 Rainer Orth <ro@TechFak.Uni-Bielefeld.DE>
3185 * io/unix.c (MAP_FAILED): Define if missing.
3186 (mmap_alloc): Cast MAP_FAILED to char *.
3187 (mmap_open): Likewise.
3189 2004-04-26 Bud Davis <bdavis9659@comcast.net>
3191 * generated/_abs_i8.f90: New file.
3192 * generated/_abs_c4.f90: New file.
3193 * generated/_abs_c8.f90: New file.
3194 * Makefile.am: Add them.
3195 * Makefile.in: Regenerate.
3197 2004-04-26 Bud Davis <bdavis9659@comcast.net>
3200 * generated/_abs_i4.f90: New file.
3201 * Makefile.am: Add it.
3202 * Makefile.in: Regenerate.
3204 2004-04-25 Bud Davis <bdavis9659@comcast.net>
3207 * io/list_read.c(list_formatted_read): finish consuming the
3208 spaces and seperators at eoln to get ready for next item.
3210 2004-04-23 Bud Davis <bdavis9659@comcast.net>
3213 * io/read.c(read_a): Handle field width > destination and no field width.
3215 2004-04-22 Bud Davis <bdavis9659@comcast.net>
3218 * io/format.c (format_item): gracefully handle a ')'
3219 when it is the first character encountered in the string.
3221 2004-04-11 Bud Davis <bdavis9659@comcast.net>
3224 * io/transfer.c (next_record): Update last_record when
3225 more than one record is written to a direct access file
3226 with one write statement.
3228 2004-04-11 Bud Davis <bdavis9659@comcast.net>
3231 * io/transfer.c (next_record_w) : No '\n' if internal.
3232 * io/unix.c (empty_internal_buffer) : Init to spaces, not '\n'.
3234 2004-04-11 Bud Davis <bdavis9659@comcast.net>
3236 * io.h (ioparm): Interface from FE is 32 bit, irregardless of offset_t.
3237 Will need to change this later to support direct access files > 2gb.
3239 2004-04-03 Bud Davis <bdavis9659@comcast.net>
3242 * io/transfer.c (next_record_r) : Skip to next record.
3244 2004-04-03 Bud Davis <bdavis9659@comcast.net>
3247 * io/transfer.c (next_record): Update last_record for DIRECT
3249 2004-04-03 Bud Davis <bdavis9659@comcast.net>
3252 * io/unix.c (find_file0): Use fd field of struct
3254 2004-04-03 Bud Davis <bdavis9659@comcast.net>
3257 * io/inquire.c (inquire_via_unit): Changed return string for
3258 BLANK=NULL. Use correct variable for ACTION.
3260 2004-04-01 Bud Davis <bdavis9659@comcast.net>
3263 * io/read.c (read_f): Allow a decimal without a leading digit.
3264 * io/write.c (output_float): remove a leading '0' to keep from
3265 overflowing the field (F edit descriptor).
3267 2004-04-01 Bud Davis <bdavis9659@comcast.net>
3270 * io/open.c (new_unit),
3271 * io/io.h : new_unit is now visible
3272 * io/transfer.c (data_transfer_init): open unit if no OPEN statement.
3273 * io/transfer.c (data_transfer_init): remove compile warnings.
3274 * io/rewind.c (st_rewind): ftruncate if writing.
3276 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3278 * write.c (write_l): Use extract_int for 'L' edit descriptor.
3280 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3283 * io/io.h (global_t):
3284 * io/list_read.c (next_char,list_formatted_read,ist_formatted_read):
3285 Move eof_jmp to a global structure.
3286 * io/transfer.c(finalize_transfer) : Set up eof_jump for callers.
3288 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3290 * m4/cexp.m4 (csqrt): Actually use the passed value.
3291 * generated/exp_c?.c: Regenerate.
3293 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3296 * io.h, transfer.c, open.c : recl_in changed from ptr to variable.
3297 * open.c (new_unit): Moved test for positioned direct access error.
3298 (init_units): Corrected calculation of max records.
3300 2004-02-06 Feng Wang <fengwang@nudt.edu.cn>
3302 * Makefile.am: Add m4/dotprodc.m4. And fix spelling.
3303 * Makefile.in: Regenerate.
3304 * m4/dotprodc.m4: New file. Implement complex dot_product.
3305 * m4/dotprod.m4: Delete the complex implementation.
3306 * generated/dotprod_*: Update.
3308 2004-02-07 Bud Davis <bdavis9659@comcast.net>
3310 * transfer.c (write_constant_string): Do not delete H's in hollerith
3313 2004-01-05 Andrew Pinski <apinski@apple.com>
3315 * configure.in: Check for csin in -lmx also.
3316 * configure: Regenerate.
3318 2004-01-01 Paul Brook <paul@codesourcery.com>
3320 * io/list_read.c (find_nml_node): Make static.
3321 (match_namelist_name): Ditto.
3322 * io/read.c (convert_precision_real): Make static, fix spelling.
3323 * io/transfer.c (extract_real): Remove unused prototype.
3324 (st_set_nml_var): Make static.
3325 * io/write.c (extract_real): Make static.
3327 2003-12-12 Huang Chun <chunhuang73@hotmal.com>
3329 * intrinsics/string_intrinsics.c (string_index): Fix logics thinko.
3331 2003-12-05 Melvin Hadasht <melvin.hadasht@free.fr>
3333 * io/transfer.c (data_transfer_init): Give a runtime error for list
3334 formatted reads and writes from/to files opened for unformatted IO.
3336 2003-11-30 Paul Brook <paul@nowt.org>
3338 * runtime/memory.c (push_context): Remove.
3339 (pop_context): Remove.
3340 * libgfortran.h: Remove prototypes.
3342 2003-11-27 Paul Brook <paul@nowt.org>
3344 * runtime/memory.c (deallocate): Nullify pointer after freeing.
3346 2003-11-27 Paul Brook <paul@nowt.org>
3348 * intrinsics/string_intrinsics.c: Use new memory allocation interface.
3349 * libgfortran.h: Ditto.
3350 * m4/in_pack.m4: Ditto.
3351 * runtime/in_pack_generic.c: Ditto.
3352 * runtime/memory.c: Ditto.
3354 2003-11-26 Richard Henderson <rth@redhat.com>
3356 * m4/exponent.m4, m4/fraction.m4: New.
3357 * m4/nearest.m4, m4/set_exponent.m4: New.
3358 * generated/*: Update.
3359 * Makefile.am: Add them.
3360 (AM_CFLAGS): New. Use -std=gnu99.
3361 * Makefile.in: Regenerate.
3363 2003-11-08 Paul Brook <paul@nowt.org>
3366 * m4/maxloc0.m4: Use default value of 1. Handle zero sized arrays.
3367 * m4/maxloc1.m4: Ditto.
3368 * m4/minloc0.m4: Ditto.
3369 * m4/minloc1.m4: Ditto.
3370 * m4/ifunction.m4: Set return value for zero sized arrays.
3371 * m4/iforeach.m4: Ditto.
3372 * m4/all.m4, m4/any.m4, m4/count.m4, m4/maxloc1.m4, m4/minloc1.m4,
3373 m4/mxaval.m4, m4/minval.m4, m4/product.m4, m4/sum.m4: Ditto.
3374 * generated/*: Update.
3376 2003-10-30 Toon Moene <toon@moene.indiv.nluug.nl>
3379 * io/list_read.c (eat_spaces): Treat tab as space.
3381 2003-10-30 Lars Segerlund <Lars.Segerlund@comsys.se>
3383 * intrinsics/random.c: Add reference to paper containing algorithm.
3384 (random_seed): Extra error checking and proper handling of arrays.
3385 (arandom_r4, arandom_r8): Implement.
3387 2003-10-29 Toon Moene <toon@moene.indiv.nluug.nl>
3390 * runtime/memory.c (allocate_size): Allow allocation
3391 of zero-sized objects.
3393 2003-10-29 Toon Moene <toon@moene.indiv.nluug.nl>
3396 * open.c (new_unit): Open without a file name opens
3397 a file with name fort.<unit>.
3399 2003-10-12 Feng Wang <wf_cs@yahoo.com>
3401 * intrinsics/cshift0.c: New file.
3402 * m4/cshift1.m4: New file
3403 * generated/cshift*.c: New files.
3404 * Makefile.am: Add them.
3405 * Makefile.in: Regenerate.
3407 2003-10-12 XiaoQiang Zhang <zhangapache@yahoo.com>
3409 * io/list_read.c (read_character): Remove unwanted call to free_saved.
3411 2003-10-11 Huang Chun <jiwang@mail.edu.cn>
3413 * intrinsics/string_intrinsics.c (string_trim): New function.
3414 (string_repeat): New function.
3416 2003-10-11 Paul Brook <paul@nowt.org>
3418 * intrinsics/dprod_r8.f90: New file.
3419 * Makefile.am (gfor_specific_src): Add it.
3420 (gfor_built_specific_src): Rename from gfor_build_specific_c.
3422 (gfor_specific2_src): Rename from gfor_built_specific2_c.
3424 * Makefile.in: Regenerate.
3425 * generated/_aint_*.f90: New files.
3426 * generated/_anint*.f90: New files.
3427 * generated/_atan2*.f90: New files.
3428 * generated/_mod*.f90: New files.
3430 2003-09-20 Kejia Zhao <kejia_zh@yahoo.com.cn>
3432 * intrinsics/selected_kind.f90: New file.
3433 * Makefile.am: Add it.
3434 * Makefile.in: regenerate.
3436 2003-09-19 Lars Segerlund <Lars.Segerlund@comsys.se>
3437 Paul Brook <paul@nowt.org>
3439 * intrinsics/random.c: New file.
3440 * Makefile.am (gfor_hemper_src): Add it.
3441 (gfor_specific_c): Fix typo.
3443 2003-09-19 Paul Brook <paul@nowt.org>
3445 * All: rename g95->gfc.
3447 2003-09-18 XiaoQiang Zhang <zhangapache@yahoo.com>
3449 * io/write.c (output_float): Fix bug of FMT_E, Add comments.
3451 2003-09-09 XiaoQiang Zhang <zhangapache@yahoo.com>
3453 * io/write.c (write_float): Dectection of positive infinite number,
3454 Not a Number(NaN) and negative infinite number.
3455 (ioutput_float): Bug fix for FMT_E and FMT_D processing to
3456 output a very_very small number ( < 0.1e-100 ).
3458 2003-09-07 XiaoQiang Zhang <zhangapache@yahoo.com>
3460 * libgfortran.h (xtoa, itoa): Parameter modified.
3461 * io/io.h (namelist_info): Declaration to support namelist I/O
3462 (st_parameter): Add namelist related component
3463 (ionml, empty_internal_buffer, st_set_nml_var_int,
3464 st_set_nml_var_float, st_set_nml_var_char, st_set_nml_var_complex,
3465 st_set_nml_var_log): Declaration
3466 (set_integer, set_integer): Parameter changed
3467 * io/format.c (free_nodes): Fix annoying bug of lefting "deallocated"
3469 (parse_format_list): Fix bug about FMT_SLASH
3470 * io/list_read.c (push_char): Totally clear old saved_string, zeroize
3471 newly allocated saved_string
3472 (next_char): Add detection of End_Of_Line support
3473 (convert_integer): Now can process 64 bits interger
3474 (read_real): Bug fixed
3475 (init_at_eol, find_nml_node, match_namelist_name): Add new functions
3476 (match_namelist_name): New implemention
3477 * io/lock.c (ionml): New global variable
3478 (library_end): Free memory in ionml
3479 * io/open.c (st_open): Variable initializtion
3480 * io/read.c (max_value): 64 bits interger support
3481 (convert_precsion_real): New procedure to replace "strtod" with more
3483 (read_f, read_radix): Input bug fix
3484 * io/transfer.c: (sf_seen_eor): New static variable
3485 (read_sf): Zeroize base buffer; fix bugs: single read statement can
3486 not get input in mutli line when read from stdin
3487 (formatted_transfer): Fix bug of FMT_O, FMT_B, FMT_Z for INTEGER type
3489 (data_transfer_init): Clear internal buffer for Internel File I/O.
3490 Internal File now worked. Detect some error condition for namelist.
3492 (next_record_w): Internal file and Namelist I/O support.
3493 (st_set_nml_var, st_set_nml_var_float, st_set_nml_var_char,
3494 st_set_nml_var_complex, st_set_nml_var_log): Implemention.
3495 * io/unit.c (implicit_unit): Deletion
3496 (get_unit): Now cannot open a unit implicitly.
3497 * io/unix.c (mmap_alloc): Fix fatal error in calculating the length of
3499 (mem_alloc_r_at): Internal file I/O support added
3500 (empty_internal_buffer): New function
3501 * io/write.c (extract_int): Support 64 bits interger processing
3502 (output_float): Varibale initialization
3503 (write_float): Infinite real number detection.
3504 (write_int): 64 bits integer I/O support
3505 (write_decimal): New function to output decimal number
3506 (otoa, btoa): Better implemention and 64 bits interger support
3507 (namelist_write): New function
3508 * runtime/error.c (itoa, xtoa): Better implemention and 64 bits
3511 2003-08-15 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
3513 * libgfortran.h (os_error, runtime_error,internal_error, sys_exit,
3514 get_mem ): Add attribute.
3515 * intrinsics/spread_generic.c (__spread): Fix spelling.
3516 * io/inquire.c (inquire_via_filename): Add const.
3517 * io/io.h (sys_exit): Add attribute.
3518 * io/io.h (move_pos_offset): Add move_pos_offset.
3519 * io/io.h (compare_file_filename, inquire_sequential, inquire_direct,
3520 inquire_formatted, inquire_unformatted, inquire_read, inquire_write,
3521 inquire_readwrite, convert_real, write_a, write_b, write_d, write_e,
3522 write_en, write_es, write_f, write_i, write_l, write_o, write_x,
3523 write_z): Add const.
3524 * io/read.c (convert_real): Add const.
3525 * io/transfer.c (type_name): Add const.
3526 * io/unix.c (unpack_filename, compare_file_filename,inquire_sequential,
3527 inquire_direct, inquire_formatted, inquire_unformatted, inquire_access,
3528 inquire_read, inquire_write, inquire_readwrite): Add const.
3529 * io/write.c (output_float): Remove unused variable.
3530 * io/write.c (write_a, extract_int, extract_real, output_float,
3531 write_float, write_int, write_i, write_b, write_o, write_z, write_d,
3532 write_e, write_f, write_en, write_es, write_logical, write_integer,
3533 write_character, write_real, write_complex): Add const.
3534 * runtime/error.c (rtoa): Remove unused variable.
3535 * runtime/select.c (select_string): Add const.
3536 * runtime/stop.c (stop_string): Add const.
3538 2003-08-10 Paul Brook <paul@nowt.org>
3540 * Makefile.am (gfor_helper_src): Add intrinsics/abort.c.
3541 (FFLAGS): Add -fno-underscoring.
3542 * Makefile.in: Regenerate.
3543 * intrinsics/abort.c: New file.
3545 2003-08-10 Erik Schnetter <schnetter@uni-tuebingen.de>
3547 * fmain.c (main): Do not call init and cleanup; call set_args instead.
3548 * libgfortran.h (init, cleanup): Remove declarations.
3549 (set_args): Add declaration.
3550 * runtime/main.c (init, cleanup): Make them static, and give them
3551 the constructor and destructor attributes.
3552 (set_args): New function.
3554 2003-08-10 Paul Brook <paul@nowt.org>
3556 * intrinsics/strinf_intrinsics.c (compare_string): Return value based
3557 on which string is longest.
3559 2003-08-10 Paul Brook <paul@nowt.org>
3561 * Makefile.am (EXTRA_DIST): Remove old files.
3562 * Makefile.in: Regenerate.
3564 2003-07-26 Paul Brook <paul@nowt.org>
3566 Rename library to libgfortran.
3567 * libgfortran.h: Change prefix to _libgfortran_.
3569 2003-07-24 Paul Brook <paul@nowt.org>
3571 * configure.in: Don't pull in system libtool. Use toplevel
3574 2003-07-22 Paul Brook <paul@nowt.org>
3576 Regenerate all configury files.
3578 2003-07-09 Chun Huang <compiler@sohu.com>
3580 * intrinsics/string_intrinsic.c (string_scan): New function.
3581 (string_verify): New function.
3583 2003-06-25 Paul Brook <paul@nowt.org>
3585 * io/unix.c (mem_alloc_r_at, mem_alloc_w_at): Advance logical_offset.
3586 (mem_seek): Don't bother setting physical_offset.
3588 2003-06-20 Paul Brook <paul@nowt.org>
3590 * libgfor.h (stop_numeric): Declare.
3591 * runtime/pause.c: New file.
3592 * Makefile.am: Add it.
3594 2003-06-08 Paul Brook <paul@nowt.org>
3596 * m4/cexp.m4 (cabs): Use correct typed version.
3597 (csqrt): New function.
3599 2003-06-07 Canqun Yang <canqun@yahoo.com.cn>
3601 Spotted by Benjamin and Tobias:
3602 * io/list_read.c: Add Separator '\t'.
3603 (parse_real, read_real): Accept real values starting with an optional
3604 sign follows a decimal point.
3606 2003-06-06 Steven Bosscher <steven@gcc.gnu.org>
3608 * Makefile.am: Don't put cmath objects in subdir.
3609 * configure.in: Rename MATHOBJ to MATH_OBJ.
3611 2003-06-02 Kejia Zhao <Kejia_zh@yahoo.com.cn>
3613 * intrinsics/associated.c: New file.
3614 * Makefile.am: Add it. Regenerate Makefile.in.
3615 * libgfor.h: Define g95_array_void, G95_DESCRIPTOR_DATA, and
3616 G95_DESCRIPTOR_DTYPE.
3618 2003-06-01 Canqun Yang <canqun@yahoo.com.cn>
3620 * io/write.c (calcuate_exp): Rewrite it to avoid overflow.
3621 (calculate_G_format): Rewrite it to eliminate an infinte loop and set
3622 the scale_factor to 0 for F editing.
3624 2003-05-11 Tobias Schlter <innenminister@gmx.de>
3626 * libgfor.h: Only include stdint.h if it exists.
3628 2003-05-07 Paul Brook <paul@nowt.org>
3630 * libgfor.h: Use stdint.h types.
3631 * intrinsics/ishift.c: Ditto.
3632 * runtime/memory.c (malloc_t): Reorder fields for better alignment.
3634 2003-05-05 Steven Bosscher <steven@gcc.gnu.org>
3636 * libgfor.h (offsetof): Define if nobody else does.
3637 * runtime/memory.c (HEADER_SIZE): Use it.
3639 2003-05-01 Tobias Schlter <innenminister@gmx.de>
3641 * configure.in: Require autoconf 2.54.
3643 2003-04-28 Tobias Schlter <innenminister@gmx.de>
3644 Paul Brook <paul@nowt.org>
3646 * intrinsics/reshape_generic.c: Copy the whole element, not just the
3648 * m4/transpose.m4: New file.
3649 * Makefile.am: Add them.
3650 Regenerate generated files.
3652 2003-04-18 Steven Bosscher <steven@gcc.gnu.org>
3654 * io/format.c (parse_format_list): Allow 'X' without integer
3655 prefix. This is an extension. Interpretation is '1X'.
3657 2003-04-18 Tobias Schlter <Tobias.Schlueter@physik.uni-muenchen.de>
3659 * io/format.c (parse_format_list): Allow '0P'.
3661 2003-04-18 Steven Bosscher <steven@gcc.gnu.org>
3663 * Makefile.in: Re-regenerate for automake 1.7.3.
3665 2003-04-18 Canqun Yang <canqun@yahoo.com.cn>
3667 Port implementation for CHARACTER SELECT from Andy's tree.
3668 * runtime/select.c: New file
3669 * Makefile.am: Add it.
3670 * Makefile.in: Regenerate.
3672 2003-04-17 Xiaoqiang Zhang <zhangapache@yahoo.com>
3674 * io/transfer.c (formatted_transfer): Modified
3675 * io/unix.c (move_pos_offset): New Function.
3676 * io/format.c (parse_format_list): Modified.
3678 2003-04-15 Xiaoqiang Zhang <zhangapache@yahoo.com>
3680 * io/write.c (write_float,write_real): New implemention of
3681 FMT_G and default float editing.
3682 (calculate_exp,calculate_G_format,output_float): New Function.
3683 (write_float,write_real,write_logical): Modified
3684 * libgfor.h (default_rtoa): Remove Declaration.
3685 * runtime/error.c (default_rtoa): Remove Function.
3687 2003-04-15 Steven Bosscher <steven@gcc.gnu.org>
3690 * io/write.c (extract_real): Add missing break statement.
3692 2003-04-13 Steven Bosscher <steven@gcc.gnu.org>
3694 * cpu_time.c: Make sure we have a definition of HZ. Don't
3695 rely on CLOCKS_PER_SEC, it is always 1000000, on any system.
3697 2003-04-13 Steven Bosscher <steven@gcc.gnu.org>
3698 Paul Brook <paul@nowt.org>
3700 * configure.in: Check for process time headers and GETTIMEOFDAY.
3701 * makefile.am: Add intrinsics/cpu_time.c.
3702 * acinclude.m4: New file.
3703 * intrinsics/cpu_time.c: New file.
3704 * m4/dotprodl.m4: Fix typo.
3705 Regenerate generated files.
3707 2003-04-11 Xiaoqiang Zhang <zhangapache@yahoo.com>
3709 * io/write.c (extract_real): Ouput floating point value.
3710 (write_float): New Function.
3711 (write_e, write_f, write_en, write_es): Modified
3712 * io/transfer.c (formatted_transfer): Modified.
3713 * libgfor.h (default_rtoa): Declaration.
3714 (rtoa): Declaration.
3715 * runtime/error.c (default_rtoa): New Function.
3716 (rtoa): New Function.
3718 2003-04-05 Paul Brook <paul@nowt.org>
3720 * intrinsics/spread_generic.c: New file.
3721 * Makefile.am: Add it. Regenerate Makefile.in.
3723 2003-03-29 Paul Brook <paul@nowt.org>
3725 * intrinsics/pack_generic.c: New file.
3726 * intrinsics/unpack_generic.c: New file.
3727 * Makefile.am: Add them. Regenerate Makefile.in.
3729 2003-03-25 Paul Brook <paul@nowt.org>
3731 * intrinsics/eoshift0.c: New file.
3732 * intrinsics/eoshift2.c: New file.
3733 * m4/eoshift1.m4: New file.
3734 * m4/eoshift3.m4: New file.
3735 * Makefile.am: Add them.
3736 * in_unpack_generic.c: Initialize src.
3737 Regenerate generated files.
3739 2003-03-14 Paul Brook <paul@nowt.org>
3741 * m4/shape.m4: Work properly with array temporaries.
3742 * m4/in_pack.m4: Skip redundant checks for array temporaries.
3743 * runtime/in_pack_generic.c: Ditto.
3745 2003-03-12 Paul Brook <paul@nowt.org>
3747 * m4/shape.m4: Work properly with noncontiguous arrays.
3749 2003-03-08 Paul Brook <paul@nowt.org>
3751 * m4/in_pack.m4: Correctly handle zero sized and assumed size arrays.
3752 * runtime/in_pack_generic.c: Ditto.
3754 2003-02-08 Paul Brook <paul@nowt.org>
3756 * intrinsics/reshape_generic.c: Use runtime_error to report errors.
3757 * io/close.c (st_close): Return void.
3758 * io/open.c (st_open): Return void.
3759 * libgfor.h (g95_array_char): Declare.
3760 (internal_malloc_size): Ditto.
3761 (internal_pack*, internal_unpack*): Ditto.
3762 * m4/in_pack.m4: Allocate storage if neccessary. Fix logic for packed
3764 * m4/in_unpack.m4: Include file fixes.
3765 * m4/reshape.m4: Increment the correct source pointer.
3766 * Makefile.am (maxloc): Fix typo.
3767 * runtime/in_pack_generic.c: Call optimized functions. Allocate
3768 storage if neccessary. Fix logic for packed arrays.
3769 * runtime/in_unpack_generic.c: Call optimized functions.
3770 * runtime/main.c: Use runtime_error to report errors.
3771 * memory.c (internal_malloc_size): Make non-static.
3773 2003-02-02 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
3775 * reshape_packed.c, lock.c: Add #include <string.h>.
3776 * libgfor.h, format.c, inquire.c, io.h, transfer.c, unix.c,
3777 environ.c, error.c, memory.c, string.c: Add const.
3778 * error.c (show_locus): Add void.
3780 2003-02-21 Paul Brook <paul@nowt.org>
3782 * m4/in_pack.m4: Avoid returning const * parameter.
3783 * Makefile.am: Only regenerate files in maintainer mode.
3785 2003-02-20 Paul Brook <paul@nowt.org>
3787 Add array repacking support functions.
3788 * m4/in_pack.m4, m4/in_unpack.m4: New files.
3789 * runtime/in_pack_generic.c, runtime/in_unpack_generic.c: New files.
3790 * Makefile.am: Build them. Regenerate configury files.
3791 * generated/: New directory for generated files (need to move
3792 everything else there).
3794 2003-02-07 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3796 * m4/cexp.m4: Fix typo.
3798 2003-01-26 Paul Brook <paul@nowt.org>
3800 * intrinsics/: Add missing generated files.
3802 2003-01-26 Paul Brook <paul@nowt.org>
3804 * Makefile.am: Put -I before the filename.
3806 2003-01-24 Paul Brook <paul@nowt.org>
3808 * configure.in: Add AM_MAINTAINER_MODE.
3810 2003-01-23 Paul Brook <paul@nowt.org>
3812 * configure.in, Makefile.am: Modify to work with unmodified autoconf
3814 Also regenerate other configury files.
3816 2003-01-21 Paul Brook <paul@nowt.org>
3818 * io/read.c: Don't use stdint.h, it doesn't exist on cygwin.
3820 2003-01-20 Steven Bosscher <s.bosscher@student.tudelft.nl>
3822 * io/read.c (read_f): Don't use alloca, but safe get_mem instead.
3823 Don't include "alloca.h".
3825 2003-01-20 Steven Bosscher <s.bosscher@student.tudelft.nl>
3827 * intrinsics/string.c: Rename to intrinsics/string_intrinsics.c.
3828 * Makefile.am: Adjust file name.
3829 * Makefile.in: Regenerate.
3830 * gfortypes.h: Kill, include everything in...
3831 * libgfor.h: ...here. Include config.h
3832 * fmain.c, intrinsics/ishftc.c, intrinsic/reshape_generic.c,
3833 intrinsics/reshape_i4.c, intrinsics/reshape_i8.c,
3834 intrinsics/reshape_packed.c, intrinsics/size.c,
3835 m4/reshape.m4, runtime/main.c, runtime/memory.c: Use macro
3836 for prefix for all functions instead of hardcoded.
3838 2003-01-19 Steven Bosscher <s.bosscher@student.tudelft.nl>
3840 * io/lock.c (library_end): Propagate library return
3843 2003-01-19 Steven Bosscher <s.bosscher@student.tudelft.nl>
3845 Port fixes from Andy's tree:
3846 * io/read.c (read_decimal): Reverse sense of overflow
3847 comparison during integer reads.
3848 * io/format.c (revert): Fix comment.
3849 (next_format): Fix format revision.
3850 * io/unix.c: Fix and simplify mmap version of stream
3853 2003-01-11 Paul Brook <paul@nowt.org>
3855 * configure, Makefile.in: Regenerate.
3857 2003-01-11 Paul Brook <paul@nowt.org>
3859 * runtime/stop.c: Rewrite.
3861 2003-01-08 Paul Brook <paul@nowt.org>
3863 * configure, Makefile.in: Regenerate.
3865 2003-01-05 Paul Brook <paul@nowt.org>
3867 * (*.m4) Move to m4/.
3868 * intrinsics/string.c (_gfor_string_index): New Function.
3870 2002-12-29 Paul Brook <paul@nowt.org>
3872 * intrinsics/reshape.*: New files.
3873 * gcc_config.patch: Update to new GCC configure system.
3875 2002-10-10 Paul Brook <paul@nowt.org>
3877 * intrinsics/size.c: New file.
3878 * intrinsics/shape.m4: New file.
3879 * Makefile.am: Add above files.
3881 2002-10-02 Paul Brook <paul@nowt.org>
3883 * fmain.c (main): Move here.
3884 * libgfor.c: From here.
3885 * libgfor.h (gfor_init, gfor_runtime_cleanup): Declare.
3886 * Makefile.am: Build libgforbegin.
3887 * gcc_config.patch: Remove stray -march=athlon.
3888 * dotprodl.m4: Fix use of L8_TO_L4 macro.
3889 * ifunction.m4: Move variable declarations to allow compilation with
3891 * specific.m4, specific4.m4: Fix typo typecode->type_code.
3892 * README: Document use of patch -p1.
3894 2002-09-12 Paul Brook <paul@nowt.org>
3896 * math/*: Add complex math library functions.
3897 * intrinsics/specific(2).m4: Generate Specific intrinsic functions.
3898 * Makefile.am: Add details for above.
3899 * configure.in: Use AC_PROG_F95. Test for the presence of csin.
3901 2002-09-09 Paul Brook <paul@nowt.org>
3903 * libgfor.c (determine_endianness): Use an array rather than a struct.
3904 * intrinsics/dotprod*, matmul*: Implement DOT_PRODUCT and MATMUL.
3906 2002-09-09 Steven Bosscher <s.bosscher@student.tudelft.nl>
3908 * libgfor.c: Add fatal signal handler.
3909 Romove superfluous abort() calls.
3911 2002-09-07 Paul Brook <paul@nowt.org>
3913 * Makefile.am, intrinsics: Major rewrite.
3915 2002-09-02 Paul Brook <paul@nowt.org>
3917 * Makefile.am: Added -I$(srcdir) to m4 rule.
3919 2002-08-30 Paul Brook <paul@nowt.org>
3921 * io/*: Integrated libgforio.
3922 * Makefile.am, configure.in: Make compatable with GCC. Build code for
3923 intrinsics in the intrisics directory.
3924 * intrinsics/intrinsics.m4: Move here. Strip directories from the
3925 filename. Add 'and' and 'all' intrinsics.
3927 2002-08-17 Paul Brook <paul@nowt.org>
3929 * ALL: First release as more than just a single file