1 2005-08-16 Thomas Koenig <Thomas.Koenig@online.de>
4 * io/transfer.c (iolength_transfer): Remove __attribute__ ((unused))
5 from type. Return correct length for inquire(iolength=)
8 2005-08-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
9 Steven Bosscher <stevenb@suse.de>
12 * Makefile.am: Add file runtime/compile_options.c.
13 * Makefile.in: Regenerate.
14 * libgfortran.h: Create structure compile_options_t. Define the
15 compile_options variable and GFC_STD_ macros.
16 * runtime/compile_options.c: New file.
17 * runtime/error.c (notify_std): New function.
18 * runtime/main.c (init): Call init_compile_options during
20 * io/format.c: Use the new notify_std function for the $
23 2005-08-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
24 * Makefile.am: Add file intrinsics/tty.c to Makefile process.
25 * Makefile.in: Regenerate.
26 * io/io.h: Prototypes for new functions stream_isatty and
28 * io/unix (stream_isatty, stream_ttyname): New functions to call
29 isatty() and ttyname() on a given unit.
30 * intrinsics/tty.c: New file to implement g77 intrinsics TTYNAM
33 2005-08-08 Jerry DeLisle <jvdelisle@verizon.net>
36 * io/transfer.c (data_transfer_init): Initialize
37 current_unit->bytes_left for a read.
39 2005-08-07 Janne Blomqvist <jblomqvi@cc.hut.fi>
42 * io/backspace.c: File removed, contents moved to ...
43 * io/endfile.c: Ditto.
45 * io/file_pos.c: New file, ... here.
46 * Makefile.am: Add file_pos.c to list, remove obsolete files.
47 * Makefile.in: Regenerated.
49 2005-08-07 Francois-Xavier Coudert <coudert@clipper.ens.fr>
51 * io/io.h: Change DEFAULT_TEMPDIR to /tmp instead of /var/tmp.
52 * io/unix.c (tempfile): Look at the TEMP environment variable
53 to find the temporary files directory. Whitespace correction.
55 2005-08-06 Francois-Xavier Coudert <coudert@clipper.ens.fr>
57 * io/unix.c: Add O_RDWR to open() call.
59 2005-08-04 Paul Thomas <pault@gcc.gnu.org>
61 * transfer.c (data_transfer_init): Truncate file in
62 sequential WRITE when last_record == 0, rather than
63 current_record. Cures problem on RH9.
65 2005-08-03 Francois-Xavier Coudert <coudert@clipper.ens.fr>
67 * libgfortran.h: When isfinite is not provided by the system,
68 define it as a macro, so that it can accept any floating point
71 2005-08-01 Francois-Xavier Coudert <coudert@clipper.ens.fr>
74 * intrinsics/flush.c (flush_i8): Add function flush_i8. Update
77 2005-07-31 Francois-Xavier Coudert <coudert@clipper.ens.fr>
80 * intrinsics/abort.c (abort): Close units before aborting.
81 Updated copyright years.
83 2005-07-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
86 * io/write.c (write_real): Add default formats for real(10) and
89 2005-07-30 Paul Thomas <pault@gcc.gnu.org>
91 PR fortran/22570 and related issues.
92 * transfer.c (formatted_transfer): Make sure that there
93 really is data present before X- or T- editing. Move all
94 treatment of tabbing during writes to start of next data
95 producing format. Suppress incorrect zeroing of bytes_left
96 in slash formating. Insert int cast for assignment of a
97 difference of two gfc_offsets.
99 2005-07-23 Jerry DeLisle <jvdelisle@verizon.net>
101 * io/write.c (write_float): Revise output of IEEE exceptional
102 values to comply with F95 and F2003 standards.
104 2005-07-22 Jerry DeLisle <jvdelisle@verizon.net>
107 * io/unit.c (init_units): Replace BLANK_ZERO with
110 2005-07-22 Jerry DeLisle <jvdelisle@verizon.net>
112 PR libfortran/21875 (FM111.f)
113 * io/read.c (next_char): Return a ' ' character when BLANK_ZERO
114 or BLANK_NULL are active.
115 (read_decimal): Interpret ' ' character correctly for BZ or BN.
116 (read_radix): Interpret ' ' character correctly for BZ or BN.
117 (read_f): Interpret ' ' character correctly for BZ or BN.
119 2005-07-22 Paul Thomas <pault@gcc.gnu.org>
122 * read.c (read_x): Correct the condition for doing the
123 x-editing during formatted input.
124 * transfer.c (formatted_transfer): Cast offset difference
125 as int, clean-up arithmetic with new variable, bytes_used,
126 zero counters for FMT_SLASH,
127 (data_transfer_init) Zero X- and T-editing counters
129 (next_record_w) Zero X- and T-editing counters.
132 2005-07-17 Jerry DeLisle <jvdelisle@verizon.net>
134 * io/write.c (write_float): Fix field width checks for
135 printing 'Infinity' or 'Inf'.
136 (output_float): Fix typo in comment.
138 2005-07-12 Paul Thomas <pault@gcc.gnu.org>
141 * transfer.c (formatted_transfer): Correct the problems
142 with X- and T-editting that caused TLs followed by TRs
143 to overwrite data, which caused NIST FM908.FOR to fail
145 (data_transfer_init): Zero X- and T-editting counters at
146 the start of formatted IO.
147 * write.c (write_x): Write specified number of skips with
148 specified number of spaces at the end.
150 2005-07-13 Paul Thomas <pault@gcc.gnu.org>
152 * io/read.c (read_complex): Prevent X formatting during reads
153 from going beyond EOR to fix NIST fm908.FOR failure.
154 * io/list_read.c (read_complex): Allow complex data in list-
155 directed reads to have eols either side of the comma to
156 fix NIST FM906.FOR failure.
158 2005-07-12 Thomas Koenig <Thomas.Koenig@online.de>
161 * io/unix.c: Add member special_file to type unix_stream.
162 (fd_truncate): Don't call ftruncate or chsize if
163 s refers to a special file.
164 (fd_to_stream): initialize s->special_file.
166 2005-07-11 David Edelsohn <edelsohn@gnu.org>
169 * io/write.c (otoa): Bias p by SCRATCH_SIZE, not
170 sizeof (SCRATCH_SIZE).
173 2005-07-09 Jerry DeLisle <jvdelisle@verizon.net>
175 PR libfortran/21875 (FM111.f)
176 * io/read.c (next_char): Return a ' ' character when BLANK_ZERO or
177 BLANK_NULL are active.
178 (read_decimal): Interpret ' ' character correctly for BZ or BN.
179 (read_radix): Interpret ' ' character correctly for BZ or BN.
180 (read_f): Interpret ' ' character correctly for BZ or BN.
181 * gfortran.dg/test (fmt_read_bz_bn.f90): New test case.
183 2005-07-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
184 Thomas Koenig <Thomas.Koenig@online.de>
187 * io/write.c (extract_unit): New function; extract
188 ints as unsigned signed int of the correct size.
190 * runtime/error.c: Adjust copyright years.
191 Adjust size of buffer to maximum that can occur.
193 2005-07-07 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
195 * libgfortran.h (GFC_ARRAY_DESCRIPTOR): Replace 'type *base' by
197 * intrinsics/cshift0.c, intrinsics/eoshift0.c,
198 intrinsics/eoshift2.c,intrinsics/pack_generic.c,
199 intrinsics/reshape_generic.c, intrinsics/spread_generic.c,
200 intrinsics/transpose_generic.c, intrinsics/unpack_generic,
201 m4/cshift1.m4, m4/eoshift1.m4, m4/eoshift3.m4, m4/iforeach.m4,
202 m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4, m4/reshape.m4,
203 m4,transpose.m4: Set renamed field 'offset' to zero instead of
205 * generated/all_l4.c, generated/all_l8.c,
206 generated/any_l4.c, generated/any_l8.c, generated/count_4_l4.c,
207 generated/count_4_l8.c, generated/count_8_l4.c,
208 generated/count_8_l8.c, generated/chift1_4.c,
209 generated/cshift1_8.c, generated/eoshift1_4.c,
210 generated/eoshift1_8.c, generated/eoshift3_4.c,
211 generated/eoshift3_8.c, generated/matmul_c4.c,
212 generated/matmul_c8.c, generated/matmul_i4.c, matmul_i8.c,
213 generated/matmul_l4.c, generated/matmul_l8.c,
214 generated/matmul_r4.c, generated/matmul_r8.c,
215 generated/maxloc0_4_i4.c, generated/maxloc0_4_i8.c,
216 generated/maxloc0_4_r4.c, generated/maxloc0_4_r8.c,
217 generated/maxloc0_8_i4.c, generated/maxloc0_8_i8.c,
218 generated/maxloc0_8_r4.c, generated/maxloc0_8_r8.c,
219 generated/maxloc1_4_i4.c, generated/maxloc1_4_i8.c,
220 generated/maxloc1_4_r4.c, generated/maxloc1_4_r8.c,
221 generated/maxloc1_8_i4.c, generated/maxloc1_8_i8.c,
222 generated/maxloc1_8_r4.c, generated/maxloc1_8_r8.c,
223 generated/maxval_i4.c, generated/maxval_i8.c,
224 generated/maxval_r4.c, generated/maxval_r8.c,
225 generated/minloc0_4_i4.c, generated/minloc0_4_i8.c,
226 generated/minloc0_4_r4.c, generated/minloc0_4_r8.c,
227 generated/minloc0_8_i4.c, generated/minloc0_8_i8.c,
228 generated/minloc0_8_r4.c, generated/minloc0_8_r8.c,
229 generated/minloc1_4_i4.c, generated/minloc1_4_i8.c,
230 generated/minloc1_4_r4.c, generated/minloc1_4_r8.c,
231 generated/minloc1_8_i4.c, generated/minloc1_8_i8.c,
232 generated/minloc1_8_r4.c, generated/minloc1_8_r8.c,
233 generated/minval_i4.c, generated/minval_i8.c,
234 generated/minval_r4.c, generated/minval_r8.c,
235 generated/product_c4.c, generated/product_c8.c,
236 generated/product_i4.c, generated/product_i8.c,
237 generated/product_r4.c, generated/product_r8.c,
238 generated/reshape_c4.c, generated/reshape_c8.c,
239 generated/reshape_i4.c, generated/reshape_i8.c,
240 generated/sum_c4.c, generated/sum_c8.c, generated/sum_i4.c,
241 generated/sum_i8.c, generated/sum_r4.c, generated/sum_r8.c,
242 generated/transpose_c4.c, generated/transpose_c8.c,
243 generated/transpose_i4.c, generated/transpose_i8.c: Regenerate:
245 2005-07-07 Thomas Koenig <Thomas.Koenig@online.de>
248 * intrinsics/eoshift0.c: If abs(shift) > len, fill the
249 the whole array with the boundary value, but don't overrun it.
250 * intrinsics/eoshift2.c: Likewise.
251 * m4/eoshift1.m4: Likewise.
252 * m4/eoshift3.m4: Likewise.
253 * generated/eoshift1_4.c: Regenerated.
254 * generated/eoshift1_8.c: Regenerated.
255 * generated/eoshift3_4.c: Regenerated.
256 * generated/eoshift3_8.c: Regenerated.
258 2005-07-07 Feng Wang <fengwang@nudt.edu.cn>
261 * io/transfer.c (formatted_transfer): Enable FMT_A on other types to
262 support Hollerith constants.
264 2005-07-01 Andreas Jaeger <aj@suse.de>
266 * intrinsics/unpack_generic.c: Remove const from parameter.
268 * io/transfer.c (formatted_transfer): Remove unused variable.
270 2005-06-28 Thomas Koenig <Thomas.Koenig@online.de>
273 * m4/eoshift1.m4: Correct bstride (it needs to be multiplied
274 by size since it's a char pointer).
275 * m4/eoshift1_4.c: Regenerated.
276 * m4/eoshift1_8.c: Regenerated.
278 2005-06-28 Thomas Koenig <Thomas.Koenig@online.de>
281 * m4/eoshift3.m4: Correct bstride (it needs to be multiplied
282 by size since it's a char pointer).
283 * m4/eoshift3_4.c: Regenerated.
284 * m4/eoshift3_8.c: Regenerated.
286 2005-06-28 Francois-Xavier Coudert <coudert@clipper.ens.fr>
289 * io/transfer.c (formatted_transfer): Do not iterate on the
290 repeat count of a FMT_SLASH, since this is already done in
293 2005-06-25 Thomas Koenig <Thomas.Koenig@online.de>
296 * m4/cshift1.m4: Remove const from argument ret.
297 Populate return array descriptor if ret->data is NULL.
298 * m4/eoshift1.m4: Likewise.
299 * m4/eoshift3.m4: Likewise.
300 * generated/cshift1_4.c: Regenerated.
301 * generated/cshift1_8.c: Regenerated.
302 * generated/eoshift1_4.c: Regenerated.
303 * generated/eoshift1_8.c: Regenerated.
304 * generated/eoshift3_4.c: Regenerated.
305 * generated/eoshift3_8.c: Regenerated.
307 2005-06-24 Jerry DeLisle <jvdelisle@verizon.net>
310 * Makefile.am: Include intrinsics/hyper.c.
311 * c99_protos.h: Add prototypes for single precision versions of
312 acosh, asinh, and atanh for platforms that do not have these.
313 * config.h.in: Add #undef for wrappers.
314 * configure.ac: Add checks for single precision versions.
315 * aclocal.m4: Regenerated.
316 * Makefile.in: Regenerated.
317 * configure: Regenerated.
318 * intrinsics/hyper.c: New file, adds new wrapper functions.
320 2005-06-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
322 * intrinsics/c99_functions.c (log10l): New log10l function for
323 systems where this is not available.
324 * c99_protos.h: Prototype for log10l function.
325 * libgfortran.h: Use generated kinds.h to define GFC_INTEGER_*,
326 GFC_UINTEGER_*, GFC_LOGICAL_*, GFC_REAL_*, GFC_COMPLEX_*. Update
327 prototypes for gfc_itoa and xtoa.
328 * io/io.h: Update prototypes for set_integer and max_value.
329 * io/list_read.c (convert_integer): Use new
330 GFC_(INTEGER|REAL)_LARGEST type.
331 * io/read.c (set_integer): Likewise.
332 (max_value): Likewise.
333 (convert_real): Likewise.
335 (next_char): Likewise.
336 (read_decimal): Likewise.
337 (read_radix): Likewise.
339 * io/write.c (extract_int): Use new GFC_INTEGER_LARGEST type.
340 (extract_real): Use new GFC_REAL_LARGEST type.
341 (calculate_exp): Likewise.
342 (calculate_G_format): Likewise.
343 (output_float): Likewise. Use log10l for long double values.
344 Add comment for sprintf format. Use GFC_REAL_LARGEST_FORMAT.
345 (write_l): Use new GFC_INTEGER_LARGEST type.
346 (write_float): Use new GFC_REAL_LARGEST type.
347 (write_int): Remove useless special case for (len < 8).
348 (write_decimal): Use GFC_INTEGER_LARGEST.
349 (otoa): Use GFC_UINTEGER_LARGEST as argument.
350 (btoa): Use GFC_UINTEGER_LARGEST as argument.
351 * runtime/error.c (gfc_itoa): Use GFC_INTEGER_LARGEST as
353 (xtoa): Use GFC_UINTEGER_LARGEST as argument.
354 * Makefile.am: Use mk-kinds-h.sh to generate header kinds.h
355 with all Fortran kinds available.
356 * configure.ac: Check for strtold and log10l.
357 * Makefile.in: Regenerate.
358 * aclocal.m4: Regenerate.
359 * configure: Regenerate.
360 * config.h.in: Regenerate.
361 * mk-kinds-h.sh: Configuration script for available integer
365 2005-06-18 Janne Blomqvist <jblomqvi@cc.hut.fi>
367 * unix.c (stream_at_bof): Don't assume that all non-mmapped files
369 (stream_at_eof): Likewise.
371 2005-06-18 Francois-Xavier Coudert <coudert@clipper.ens.fr>
374 * io/read.c (convert_real): strtod can set errno to EINVAL on an
375 empty string, but we shouldn't have an error in that case.
377 2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
380 * io/list_read.c (eat_separator): No need to call next_record,
381 even in non-namelist_mode.
383 2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
385 * io/transfer.c (formatted_transfer): Fix typo in error message.
387 2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
390 * io/transfer.c (read_sf): Correct updating of bytes_left field.
391 (formatted_transfer): Correct updating of bytes_left field and
392 reformatting code (comments and whitespace).
393 * io/unix.c (move_pos_offset): "active" field should not be
394 changed here. Whitespace corrections.
396 2005-06-15 Francois-Xavier Coudert <coudert@clipper.ens.fr>
399 * intrinsics/c99_functions.c (scalbn): Provide fallback
400 implementation for scalbn.
401 * c99_protos.h: Prototype for scalbn.
402 * configure.ac: Add check for scalbn.
403 * configure: Regenerate.
404 * config.h.in: Regenerate.
406 2005-06-14 Thomas Koenig <Thomas.Koenig@online.de>
408 * intrinsics/eoshift0.c: Removed prototype for eoshift0.
409 * intrinsics/eoshift2.c: Removed prototype for eoshift2.
411 2005-06-14 Tom Tromey <tromey@redhat.com>
414 * configure, aclocal.m4, Makefile.in: Rebuilt.
416 2005-06-12 Thomas Koenig <Thomas.Koenig@online.de>
419 * intrinsics/eoshift0.c: Add prototype for eoshift0.
420 * intrinsics/eoshift2.c: Add prototype for eoshift2.
422 2005-06-12 Steven G. Kargl <kargls@comcast.net>
423 Thomas Koenig <Thomas.Koenig@online.de>
425 PR libfortran/PR21797
426 * m4/cexp.m4 (csqrt`'q): Add type qualifyer to
428 * generated/exp_c4.c: Regenerated.
430 2005-06-12 Francois-Xavier Coudert <coudert@clipper.ens.fr>
433 * io/read.c (read_f): Take care of spaces after initial sign.
435 2005-06-11 Thomas Koenig <Thomas.Koenig@onlinde.de>
438 * Makefile.am: Add in_pack_c4.c, in_pack_c8.c, in_unpack_c4.c
440 * Makefile.in: Regenerate.
441 * libgfortran.h: Declare internal_pack_c4, internal_pack_c8,
442 internal_unpack_c4 and internal_unpack_c8.
443 * m4/in_pack.m4: Use rtype_ccode insteald of rtype_kind
445 Use sizeof (rtype_name) as size for memory allocation.
446 * m4/in_unpack.m4: Use rtype_ccode insteald of rtype_kind
448 Use sizeof (rtype_name) for calculation of sizes for memcpy.
449 * runtime/in_pack_generic.c: For real, integer and logical
450 call internal_pack_4 if size==4 and internal_pack_8 if
452 For complex, call internal_pack_c4 if size==8 and
453 internal_pack_c8 if size==16.
454 * runtime/in_unpack_generic.c: For real, integer and logical
455 call internal_unpack_4 if size==4 and internal_unpack_8 if
457 For complex, call internal_unpack_c4 if size==8 and
458 internal_unpack_c8 if size==16.
459 * generated/in_pack_i4.c: Regenerated.
460 * generated/in_pack_i8.c: Regenerated.
461 * generated/in_unpack_i4.c: Regenerated.
462 * generated/in_unpack_i8.c: Regenerated.
463 * generated/in_pack_c4.c: New file.
464 * generated/in_pack_c8.c: New file.
465 * generated/in_unpack_c4.c: New file.
466 * generated/in_unpack_c8.c: New file.
468 2005-06-09 Thomas Koenig <Thomas.Koenig@online.de>
471 * m4/reshape.m4: Use sizeof (rtype_name) for sizes to be passed
473 * generated/reshape_c4.c: Regenerated.
474 * generated/reshape_c8.c: Regenerated.
475 * generated/reshape_i4.c: Regenerated.
476 * generated/reshape_i8.c: Regenerated.
478 2005-06-07 Thomas Koenig <Thomas.Koenig@online.de>
481 * m4/matmul.m4: Correct zeroing of result for non-packed
482 arrays with lowest stride is one.
483 * generated/matmul_c4.c: Regenerated.
484 * generated/matmul_c8.c: Regenerated.
485 * generated/matmul_i4.c: Regenerated.
486 * generated/matmul_i8.c: Regenerated.
487 * generated/matmul_r4.c: Regenerated.
488 * generated/matmul_r8.c: Regenerated.
490 2005-05-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
493 * io/unix.c (fd_close): Add test so that we don't close()
496 2005-05-29 Francois-Xavier Coudert <coudert@clipper.ens.fr>
499 * io/format.c (parse_format_list): Set repeat count of $ format
501 * io/transfer.c (read_sf): Add g.seen_dollar to the test
502 concerning advancing I/O.
503 (data_transfer_init): Likewise.
504 (finalize_transfer): Likewise.
506 2005-05-27 Thomas Koenig <Thomas.Koenig@online.de>
508 * runtime/in_pack_generic.c: Adjust copyright years.
509 (in_pack_generic): Change dimension of auxiliary arrays from
510 GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
511 * runtime/in_unpack_generic.c: Adjust copyright years.
512 (in_unpack_generic): Change dimension of auxiliary arrays from
513 GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
515 2005-05-26 Thomas Koenig <Thomas.Koenig@online.de>
518 * intrinsics/unpack_generic.c: Fix name of routine
519 on top. Update copyright years.
520 (unpack1): Remove const from return array descriptor.
521 rs: New variable, for calculating return sizes.
522 Populate return array descriptor if ret->data is NULL.
524 2005-05-22 Peter Wainwright <prw@ceiriog1.demon.co.uk>
527 * io/write.c (output_float): Rework logic to avoid call to log10
528 with argument equal to zero.
530 2005-05-21 Eric Botcazou <ebotcazou@libertysurf.fr>
532 * configure.ac: Check for trunc and truncf in libm.
533 * configure: Regenerate.
534 * config.h.in: Likewise.
535 * intrinsics/c99_functions.c (trunc, truncf): New functions.
536 * c99_protos.h (trunc, truncf): Declare them.
538 2005-05-18 Thomas Koenig <Thomas.Koenig@online.de>
541 * Makefile.am: Really commit.
542 * Makefile.in: Really commit.
544 2005-05-18 Thomas Koenig <Thomas.Koenig@online.de>
547 * Makefile.am: Add generated/reshape_c4.c and
548 generated/reshape_c8.c.
549 * Makefile.in: Regenerated.
550 * m4/iparm.m4: Define rtype_ccode to be c4 or c8 for
551 complex types, 4 or 8 otherwise.
552 * m4/reshape.m4: Use rtype_ccode instead of rtype_kind
554 * generated/reshape_c4.c: New file.
555 * generated/reshape_c8.c: New file.
557 2005-05-16 Andreas Jaeger <aj@suse.de>
559 * configure.ac: Add additional warning flags.
560 * configure: Regenerate.
562 * io/write.c (calculate_G_format): Remove unused parameter.
563 (output_float): Remove unused parameter.
564 (write_float): Change callers.
565 (nml_write_obj): Avoid signed warning.
566 Make variable const to support -Wwrite-strings.
568 * io/unix.c (fd_alloc, mmap_open, mmap_sfree, mem_sfree,
569 mem_truncate): Mark argument as unused.
571 * io/unit.c (get_unit): Mark argument as unused.
572 (init_units): Avoid warning about signed comparision.
574 * io/transfer.c (next_record_r): Remove unused parameter.
575 (next_record_w): Remove unused parameter.
576 (next_record): Change callers.
577 (iolength_transfer): Mark arguments as unused.
579 * io/open.c: Add initializer.
581 * io/list_read.c (read_character): Mark argument as unused.
582 (nml_match_name): Add const to make compile with -Wwrite-strings.
584 * io/format.c: Add initializer.
586 2005-05-15 Andreas Jaeger <aj@suse.de>
588 * m4/eoshift1.m4: Initialize variables to avoid warnings.
589 * m4/eoshift3.m4: Initialize variables to avoid warnings.
590 * generated/eoshift1_4.c, generated/eoshift1_8.c,
591 generated/eoshift3_4.c, generated/eoshift3_8.c: Regenerated.
593 * intrinsics/spread_generic.c (spread): Initialize variables to
596 * intrinsics/eoshift0.c (eoshift0): Initialize variables to avoid
598 * intrinsics/eoshift2.c (eoshift2): Initialize variables to avoid
601 * io/list_read.c (nml_get_obj_data): Initialize variables to avoid
604 * intrinsics/pack_generic.c (pack): Remove unneeded calculation.
606 * m4/matmull.m4 (matmul_): Remove unneeded calculations, fix
607 pointer cast to avoid warning.
608 * generated/matmul_l4.c: Regenerated.
609 * generated/matmul_l8.c: Regenerated.
611 * Makefile.am: Remove AM_CFLAGS here.
612 * configure.ac: Define AM_CFLAGS and AM_FCFLAGS so that warnings
613 are set. Set additionally -Wstrict-prototypes for CFLAGS.
614 * Makefile.in: Regenerated.
615 * aclocal.m4: Regenerated.
616 * configure: Regenerated.
618 * intrinsics/system_clock.c (system_clock_4, system_clock_8): Add
619 missing returns, reformat a bit.
621 * io/write.c (nml_write_obj): Use %d again - and cast to int,
622 st_sprintf does not handle %ld.
624 * io/unit.c (is_internal_unit): Add void as parameter list.
626 * io/transfer.c: Move prototype declarations before the functions.
628 * runtime/normalize.c (almostone_r4, almostone_r8): Fix parameter
631 * intrinsics/random.c (KISS_DEFAULT_SEED): Remove extra semicolon.
633 * io/transfer.c: Do not use empty initializers for global objects.
634 Add missing initializers.
636 * io/lock.c: Do not use empty initializers for global objects.
638 * io/close.c: Add missing initializers.
640 * runtime/environ.c: Add missing initializers. Do not use empty
641 initializers for global object.
642 (init_string): Mark argument as unused.
644 * runtime/main.c (cleanup): Fix parameter list.
646 * io/io.h: Fix parameter lists.
648 * m4/transpose.m4, m4/matmul.m4: Fix pointer cast to avoid
651 * generated/transpose_c4.c, generated/transpose_c8.c,
652 generated/transpose_i4.c, generated/transpose_i8.c,
653 generated/matmul_c4.c, generated/matmul_c8.c,
654 generated/matmul_i4.c, generated/matmul_i8.c,
655 generated/matmul_r4.c, generated/matmul_r8.c: Regenerated.
657 * io/write.c (nml_write_obj): Fix 64-bit problem.
659 * io/list_read.c (nml_get_obj_data): Add missing braces around
660 initializer to avoid warnings.
662 * intrinsics/etime.c (etime_sub): Remove unused variable.
664 * intrinsics/chdir.c, intrinsics/getlog.c, intrinsics/link.c,
665 intrinsics/symlnk.c, intrinsics/perror.c: Include <string.h> for
668 * runtime/string.c (compare0): Remove unused variable.
669 * io/unit.c (init_units): Remove unused variables.
670 * intrinsics/getcwd.c (getcwd_i4_sub): Remove unused variable.
671 * intrinsics/unlink.c (unlink_i4_sub): Remove unused variable.
672 * intrinsics/stat.c (stat_i4_sub, fstat_i8_sub, fstat_i4_sub,
673 stat_i8_sub): Remove unused variable.
675 2005-05-12 Thomas Koenig <Thomas.Koenig@online.de>
678 * runtime/memory.c: Don't define GFC_CLEAR_MEMORY (it's a
680 * io/open.c (new_unit): Zero freshly allocated memory for
682 * io/unit.c (init_units): Zero freshly allocated memory for
683 STDIN, STDOUT and STDERR.
684 * io/unix.c (open_internal): Zero freshly allocated memory
686 (fd_to_stream): Likewise.
688 2005-05-11 Bud Davis <bdavis@gfortran.org>
691 * io/unix.c (fd_truncate): update positions when ftruncate
692 fails (like writing to /dev/null).
694 2005-05-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
697 * open.c (new_unit): Take care of the case where POSITION_APPEND
698 is specified (sseek to the end, and set u>-endfile).
700 2005-05-10 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
703 * Makefile.am (gfor_specific_src): Add 'intrinsics/f2c_intrinsics.F90'
705 * Makefile.in: Regenerate.
706 * intrinsics/f2c_specific.F90: New file.
708 2005-05-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
711 * io/unix.c (fd_to_stream): Add an avoid_mmap argument indicating
712 we don't we to mmap this stream. Use fd_open instead of mmap_open
714 (open_external): Call fd_to_stream with avoid_mmap = 0.
715 (input_stream): Call fd_to_stream with avoid_mmap = 1.
716 (output_stream): Likewise.
717 (error_stream): Likewise.
719 2005-05-09 Mike Stump <mrs@apple.com>
721 * configure: Regenerate.
723 2005-05-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
726 * io/read.c (read_f): Accept 'e', 'E', 'd' and 'D' as first
727 non-blank characters of a real number.
729 2005-05-04 Thomas Koenig <Thomas.Koenig@online.de>
732 * m4/cshift1.m4: Change dimension of auxiliary arrays from
733 GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
734 * m4/eoshift1.m4: Likewise.
735 * m4/eoshift3.m4: Likewise.
736 * m4/ifunction.m4: Likewise.
737 * m4/in_pack.m4: Likewise.
738 * m4/in_unpack.m4: Likewise.
739 * intrinsics/cshift0.c: Likewise.
740 * intrinsics/eoshift0.c: Likewise.
741 * intrinsics/eoshift2.c: Likewise.
742 * intrinsics/random.c: Likewise.
743 * intrinsics/spread_generic.c: Likewise.
744 * intrinsics/stat.c: Likewise.
745 * generated/all_l4.c: Regenerated.
746 * generated/all_l8.c: Regenerated.
747 * generated/any_l4.c: Regenerated.
748 * generated/any_l8.c: Regenerated.
749 * generated/count_4_l4.c: Regenerated.
750 * generated/count_4_l8.c: Regenerated.
751 * generated/count_8_l4.c: Regenerated.
752 * generated/count_8_l8.c: Regenerated.
753 * generated/cshift1_4.c: Regenerated.
754 * generated/cshift1_8.c: Regenerated.
755 * generated/eoshift1_4.c: Regenerated.
756 * generated/eoshift1_8.c: Regenerated.
757 * generated/eoshift3_4.c: Regenerated.
758 * generated/eoshift3_8.c: Regenerated.
759 * generated/in_pack_i4.c: Regenerated.
760 * generated/in_pack_i8.c: Regenerated.
761 * generated/in_unpack_i4.c: Regenerated.
762 * generated/in_unpack_i8.c: Regenerated.
763 * generated/maxloc0_4_i4.c: Regenerated.
764 * generated/maxloc0_4_i8.c: Regenerated.
765 * generated/maxloc0_4_r4.c: Regenerated.
766 * generated/maxloc0_4_r8.c: Regenerated.
767 * generated/maxloc0_8_i4.c: Regenerated.
768 * generated/maxloc0_8_i8.c: Regenerated.
769 * generated/maxloc0_8_r4.c: Regenerated.
770 * generated/maxloc0_8_r8.c: Regenerated.
771 * generated/maxloc1_4_i4.c: Regenerated.
772 * generated/maxloc1_4_i8.c: Regenerated.
773 * generated/maxloc1_4_r4.c: Regenerated.
774 * generated/maxloc1_4_r8.c: Regenerated.
775 * generated/maxloc1_8_i4.c: Regenerated.
776 * generated/maxloc1_8_i8.c: Regenerated.
777 * generated/maxloc1_8_r4.c: Regenerated.
778 * generated/maxloc1_8_r8.c: Regenerated.
779 * generated/maxval_i4.c: Regenerated.
780 * generated/maxval_i8.c: Regenerated.
781 * generated/maxval_r4.c: Regenerated.
782 * generated/maxval_r8.c: Regenerated.
783 * generated/minloc0_4_i4.c: Regenerated.
784 * generated/minloc0_4_i8.c: Regenerated.
785 * generated/minloc0_4_r4.c: Regenerated.
786 * generated/minloc0_4_r8.c: Regenerated.
787 * generated/minloc0_8_i4.c: Regenerated.
788 * generated/minloc0_8_i8.c: Regenerated.
789 * generated/minloc0_8_r4.c: Regenerated.
790 * generated/minloc0_8_r8.c: Regenerated.
791 * generated/minloc1_4_i4.c: Regenerated.
792 * generated/minloc1_4_i8.c: Regenerated.
793 * generated/minloc1_4_r4.c: Regenerated.
794 * generated/minloc1_4_r8.c: Regenerated.
795 * generated/minloc1_8_i4.c: Regenerated.
796 * generated/minloc1_8_i8.c: Regenerated.
797 * generated/minloc1_8_r4.c: Regenerated.
798 * generated/minloc1_8_r8.c: Regenerated.
799 * generated/minval_i4.c: Regenerated.
800 * generated/minval_i8.c: Regenerated.
801 * generated/minval_r4.c: Regenerated.
802 * generated/minval_r8.c: Regenerated.
803 * generated/product_c4.c: Regenerated.
804 * generated/product_c8.c: Regenerated.
805 * generated/product_i4.c: Regenerated.
806 * generated/product_i8.c: Regenerated.
807 * generated/product_r4.c: Regenerated.
808 * generated/product_r8.c: Regenerated.
809 * generated/sum_c4.c: Regenerated.
810 * generated/sum_c8.c: Regenerated.
811 * generated/sum_i4.c: Regenerated.
812 * generated/sum_i8.c: Regenerated.
813 * generated/sum_r4.c: Regenerated.
814 * generated/sum_r8.c: Regenerated.
816 2005-04-30 Thomas Koenig <Thomas.Koenig@online.de>
819 libgfortran.h: Change typedef of index_type from size_t
822 2005-04-30 Paul Thomas <pault@gcc.gnu.org>
825 * generated/matmul_r8.c: Remove incorrect assertions.
826 * generated/matmul_c4.c: Regenerate
827 * generated/matmul_c8.c: Regenerate
828 * generated/matmul_i4.c: Regenerate
829 * generated/matmul_i8.c: Regenerate
830 * generated/matmul_r4.c: Regenerate
831 * generated/matmul_r8.c: Regenerate
833 2005-04-29 Francois-Xavier Coudert <coudert@clipper.ens.fr>
835 * configure.ac: Check for ftruncate and chsize.
836 * io/unix.c (fd_truncate): Provide chsize as alternative to
838 * config.h.in: Regenerate.
839 * configure: Regenerate.
841 2004-04-29 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
843 * intrinsics/rename.c: Add missing #includes.
845 2004-04-28 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
847 * AUTHORS, COPYING, INSTALL, NEWS, README: Remove.
849 2005-04-26 David Edelsohn <edelsohn@gnu.org>
852 * io/rewind.c (st_rewind): Flush the stream when resetting the mode
853 from WRITING to READING.
855 2005-04-22 Paul Thomas <pault@gcc.gnu.org>
856 Jerry DeLisle <jvdelisle@verizon.net>
858 * io/write.c (nml_write_obj): Provide 1 more byte for ext_name.
859 * io/list_read.c (nml_get_obj_data): Put extra brackets in get_mem
860 call for ext_name. These fix the bug reported by Jerry DeLisle to
861 the fortran list and are based on his suggested fix.
863 2005-04-22 Thomas Koenig <Thomas.Koenig@online.de>
868 * m4/reshape.m4 (reshape_`'rtype_kind): rs, rex: New
869 variables, to be used in calculation of return array sizes.
870 Populate return array descriptor if ret->data is NULL.
871 Fix condition for early return (it used to test something
872 undefined if order was used).
873 Remove duplicate check wether pad is used.
874 * intrinsics/reshape_generic.c (reshape_generic): Likewise.
875 Fix a few places where the wrong variables were set.
876 * generated/reshape_i4.c: Regenerated.
877 * generated/reshape_i8.c: Regenerated.
879 2005-04-18 Paul Thomas <pault@gcc.gnu.org>
881 * io/list_read.c (nml_touch_nodes, nml_read_obj,
882 nml_get_obj_data): Fix memory leaks in code for derived types.
884 2005-04-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
887 * io/inquire.c (inquire_via_unit): Check for the gfc_unit being
888 NULL when setting ioparm.sequential.
890 2005-04-17 Thomas Koenig <Thomas.Koenig@online.de>
893 * m4/reshape.m4 (reshape_`'rtype_kind): Change dimension
894 of auxiliary arrays from GFC_MAX_DIMENSIONS - 1 to
896 * intrinsics/reshape_generic.c (reshape_generic): Likewise.
897 * generated/reshape_i4.c: Regenerated.
898 * generated/reshape_i8.c: Regenerated.
900 2005-04-17 Paul Thomas <pault@gcc.gnu.org>
902 * io/list_read.c (eat_separator): at_eol = 1 replaced
903 (zapped at some time?).
905 2005-04-17 Paul Thomas <pault@gcc.gnu.org>
914 * io/io.h (nml_ls): Declare.
915 (namelist_info): Modify for arrays.
916 * io/list_read.c (namelist_read): Reduced to call to new functions.
917 (match_namelist_name): Simplified.
918 (nml_query): Handles stdin queries ? and =?. New function.
919 (nml_get_obj_data): Parses object name. New function.
920 (touch_nml_nodes): Marks objects for read. New function.
921 (untouch_nml_nodes): Resets objects. New function.
922 (parse_qualifier): Parses and checks qualifiers. New function
923 (nml_read_object): Reads and stores object data. New function.
924 (eat_separator): No new_record on '/' in namelist.
925 (finish_separator): No new_record on '/' in namelist.
926 (read_logical): Error return for namelist.
927 (read_integer): Error return for namelist.
928 (read_complex): Error return for namelist.
929 (read_real): Error return for namelist.
930 * io/lock.c (library_end): Free extended namelist_info types.
931 * io/transfer.c (st_set_nml_var): Modified for arrays.
932 (st_set_nml_var_dim): Dimension descriptors. New function.
933 * io/write.c (namelist_write): Reduced to call to new functions.
934 (nml_write_obj): Writes output for object. New function.
935 (write_integer): Suppress leading blanks for repeat counts.
936 (write_int): Suppress leading blanks for repeat counts.
937 (write_float): Suppress leading blanks for repeat counts.
938 (output_float): Suppress leading blanks for repeat counts.
940 2005-04-15 Thomas Koenig <Thomas.Koenig@online.de>
943 * intrinsics/spread_generic.c (spread): Remove const from
944 return array descriptor.
945 New variables: rrank (rank of return array), rs (for
946 calculating the size of the return array), srank (rank
947 of the source array).
948 Generate runtime error if the dim= argument is larger than
949 the rank of the return array.
950 Generate runtime error if the needed rank of the return
951 array is larger than 7.
952 If ret->data is null, populate the return array descriptor
953 and initialize the variables for the actual operation.
954 Otherwise, set ret->dim[0].stride to one if it is zero.
955 Change second, independent use of variable dim to srank.
957 2005-04-12 Mike Stump <mrs@apple.com>
959 * configure: Regenerate.
961 2005-04-13 Thomas Koenig <Thomas.Koenig@online.de>
964 * m4/iforeach.c (name`'rtype_qual`_'atype_code): Add TODO
965 that setting correct strides is a front end job.
966 (`m'name`'rtype_qual`_'atype_code): Likewise. If mask has
967 a lowest stride of 0, adjust to 1.
968 * m4/ifunction.c (name`'rtype_qual`_'atype_code): Add TODO
969 that setting correct strides is a front end job.
970 (`m'name`'rtype_qual`_'atype_code): Likewise. If mask has
971 a lowest stride of 0, adjust to 1.
972 * maxloc0_4_i4.c: Regenerated
973 * maxloc0_4_i8.c: Regenerated
974 * maxloc0_4_r4.c: Regenerated
975 * maxloc0_4_r8.c: Regenerated
976 * maxloc0_8_i4.c: Regenerated
977 * maxloc0_8_i8.c: Regenerated
978 * maxloc0_8_r4.c: Regenerated
979 * maxloc0_8_r8.c: Regenerated
980 * maxloc1_4_i4.c: Regenerated
981 * maxloc1_4_i8.c: Regenerated
982 * maxloc1_4_r4.c: Regenerated
983 * maxloc1_4_r8.c: Regenerated
984 * maxloc1_8_i4.c: Regenerated
985 * maxloc1_8_i8.c: Regenerated
986 * maxloc1_8_r4.c: Regenerated
987 * maxloc1_8_r8.c: Regenerated
988 * maxval_i4.c: Regenerated
989 * maxval_i8.c: Regenerated
990 * maxval_r4.c: Regenerated
991 * maxval_r8.c: Regenerated
992 * minloc0_4_i4.c: Regenerated
993 * minloc0_4_i8.c: Regenerated
994 * minloc0_4_r4.c: Regenerated
995 * minloc0_4_r8.c: Regenerated
996 * minloc0_8_i4.c: Regenerated
997 * minloc0_8_i8.c: Regenerated
998 * minloc0_8_r4.c: Regenerated
999 * minloc0_8_r8.c: Regenerated
1000 * minloc1_4_i4.c: Regenerated
1001 * minloc1_4_i8.c: Regenerated
1002 * minloc1_4_r4.c: Regenerated
1003 * minloc1_4_r8.c: Regenerated
1004 * minloc1_8_i4.c: Regenerated
1005 * minloc1_8_i8.c: Regenerated
1006 * minloc1_8_r4.c: Regenerated
1007 * minloc1_8_r8.c: Regenerated
1008 * minval_i4.c: Regenerated
1009 * minval_i8.c: Regenerated
1010 * minval_r4.c: Regenerated
1011 * minval_r8.c: Regenerated
1012 * product_c4.c: Regenerated
1013 * product_c8.c: Regenerated
1014 * product_i4.c: Regenerated
1015 * product_i8.c: Regenerated
1016 * product_r4.c: Regenerated
1017 * product_r8.c: Regenerated
1018 * sum_c4.c: Regenerated
1019 * sum_c8.c: Regenerated
1020 * sum_i4.c: Regenerated
1021 * sum_i8.c: Regenerated
1022 * sum_r4.c: Regenerated
1023 * sum_r8.c: Regenerated
1025 2005-04-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1028 * runtime/environ.c (init_unsigned_integer): Function for
1029 environment variables we want to be positive.
1030 (init_integer): Function to allow negative environment
1031 variables (e.g. for GFORTRAN_STDIN_UNIT).
1033 2005-04-10 Thomas Koenig <Thomas.Koenig@online.de>
1043 * io/transfer.c (top level): eor_condition: New static variable.
1044 (read_sf): Remove unnecessary zeroing of buffer (there is enough
1045 information in its length).
1046 Return a string of length 0 (to be padded by caller) if EOR was
1048 Remove erroneous special casing of EOR for standard input.
1049 Set eor_condition for non-advancing I/O if an end of line was
1051 Increment ioparm.size if necessary.
1052 (formatted_transfer): Skip the function if there is an EOR condition.
1053 (data_transfer_init): Initialize eor_condition to zero (false).
1054 (next_record_r): Clear sf_seen_eor if a \n has been seen already.
1055 (finalize_transfer): If there is an EOR condition, raise the error.
1057 2005-04-09 Bud Davis <bdavis@gfortran.org>
1058 Steven G. Kargl <kargls@comcast.net>
1061 * io/transfer.c (data_transfer_init): truncate an existing
1062 file on the first write.
1064 2005-04-09 Thomas Koenig <Thomas.Koenig@online.de>
1068 * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): ditto.
1069 If retarray->data is NULL (i.e. the front end does not
1070 know the rank and dimenson of the array), fill in its
1071 properties and allocate memory.
1072 Change the assertions about rank and dimension of retarray into
1073 runtime errors and only check them for retarray->data != NULL.
1074 Do the same for correcting the stride from 0 to 1 in retarray.
1075 (`m'name`'rtype_qual`_'atype_code): Likewise.
1076 * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Likewise.
1077 Change assertion about rank of array to runtime error.
1078 (`m'name`'rtype_qual`_'atype_code): Likewise.
1079 * generated/all_l4.c: Regenerated.
1080 * generated/all_l8.c: Regenerated.
1081 * generated/any_l4.c: Regenerated.
1082 * generated/any_l8.c: Regenerated.
1083 * generated/count_4_l4.c: Regenerated.
1084 * generated/count_4_l8.c: Regenerated.
1085 * generated/count_8_l4.c: Regenerated.
1086 * generated/count_8_l8.c: Regenerated.
1087 * generated/maxloc0_4_i4.c: Regenerated.
1088 * generated/maxloc0_4_i8.c: Regenerated.
1089 * generated/maxloc0_4_r4.c: Regenerated.
1090 * generated/maxloc0_4_r8.c: Regenerated.
1091 * generated/maxloc0_8_i4.c: Regenerated.
1092 * generated/maxloc0_8_i8.c: Regenerated.
1093 * generated/maxloc0_8_r4.c: Regenerated.
1094 * generated/maxloc0_8_r8.c: Regenerated.
1095 * generated/maxloc1_4_i4.c: Regenerated.
1096 * generated/maxloc1_4_i8.c: Regenerated.
1097 * generated/maxloc1_4_r4.c: Regenerated.
1098 * generated/maxloc1_4_r8.c: Regenerated.
1099 * generated/maxloc1_8_i4.c: Regenerated.
1100 * generated/maxloc1_8_i8.c: Regenerated.
1101 * generated/maxloc1_8_r4.c: Regenerated.
1102 * generated/maxloc1_8_r8.c: Regenerated.
1103 * generated/maxval_i4.c: Regenerated.
1104 * generated/maxval_i8.c: Regenerated.
1105 * generated/maxval_r4.c: Regenerated.
1106 * generated/maxval_r8.c: Regenerated.
1107 * generated/minloc0_4_i4.c: Regenerated.
1108 * generated/minloc0_4_i8.c: Regenerated.
1109 * generated/minloc0_4_r4.c: Regenerated.
1110 * generated/minloc0_4_r8.c: Regenerated.
1111 * generated/minloc0_8_i4.c: Regenerated.
1112 * generated/minloc0_8_i8.c: Regenerated.
1113 * generated/minloc0_8_r4.c: Regenerated.
1114 * generated/minloc0_8_r8.c: Regenerated.
1115 * generated/minloc1_4_i4.c: Regenerated.
1116 * generated/minloc1_4_i8.c: Regenerated.
1117 * generated/minloc1_4_r4.c: Regenerated.
1118 * generated/minloc1_4_r8.c: Regenerated.
1119 * generated/minloc1_8_i4.c: Regenerated.
1120 * generated/minloc1_8_i8.c: Regenerated.
1121 * generated/minloc1_8_r4.c: Regenerated.
1122 * generated/minloc1_8_r8.c: Regenerated.
1123 * generated/minval_i4.c: Regenerated.
1124 * generated/minval_i8.c: Regenerated.
1125 * generated/minval_r4.c: Regenerated.
1126 * generated/minval_r8.c: Regenerated.
1127 * generated/product_c4.c: Regenerated.
1128 * generated/product_c8.c: Regenerated.
1129 * generated/product_i4.c: Regenerated.
1130 * generated/product_i8.c: Regenerated.
1131 * generated/product_r4.c: Regenerated.
1132 * generated/product_r8.c: Regenerated.
1133 * generated/sum_c4.c: Regenerated.
1134 * generated/sum_c8.c: Regenerated.
1135 * generated/sum_i4.c: Regenerated.
1136 * generated/sum_i8.c: Regenerated.
1137 * generated/sum_r4.c: Regenerated.
1138 * generated/sum_r8.c: Regenerated.
1140 2005-04-09 Thomas Koenig <Thomas.Koenig@online.de>
1143 * runtime/string.c (compare0): Use fstrlen() to
1144 strip trailing blanks from option string.
1146 2005-04-09 Andrew Pinski <pinskia@physics.uc.edu>
1149 * format.c (parse_format_list): Allow an optional comma
1150 between descriptors.
1152 2005-04-08 Eric Botcazou <ebotcazou@libertysurf.fr>
1154 * io/backspace.c (unformatted_backspace): Do not dereference
1155 the pointer to the stream.
1157 2005-04-07 Andrew Pinski <pinskia@physics.uc.edu>
1160 * configure.ac (extra_ldflags_libgfortran): Set for *-darwin* to
1161 "-Wl,-single_module".
1162 * configure: Regenerate.
1163 * Makefile.am (libgfortran_la_LDFLAGS): Add extra_ldflags_libgfortran.
1164 * Makefile.in: Regenerate.
1166 2005-04-05 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1169 * write.c (write_float): A G edit descriptor may locally change
1170 the scale factor, but it needs to be restored afterwards.
1172 2005-04-03 Dale Ranta <dir@lanl.gov>
1173 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1179 * io/backspace.c (unformatted_backspace): Fix error in arithmetic.
1180 (st_backspace): When in WRITING mode, we flush and falling back
1181 into READING mode. In all cases, correctly position the stream.
1183 2005-03-31 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1186 * io/inquire.c (inquire_via_unit): Non-opened units should still be
1187 reported by an INQUIRE statement as existing.
1188 * io/transfer.c (data_transfer_init): Never accept negative units.
1190 2005-03-29 Dale Ranta <dir@lanl.gov>
1191 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1194 * io/open.c (st_open): call library_end() before returning even if
1197 2005-03-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1200 * list_read.c (next_char, eat_separator, finish_separator, read_real)
1201 (namelist_read): Add support for '\r' as well as '\n' as EOL
1205 * list_read.c (read_sf): Add a '\r' in a test to support DOS
1206 line-endings when line length is exceeded.
1208 2005-03-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1211 * io/format.c (parse_format_list): format node for colon edit
1212 descriptor needs a repeat counter set to 1.
1214 2005-02-24 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1216 * config.h.in: Regenerate.
1218 2005-02-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1221 * write.c (output_float): Handling the "F0.d" format similarly as
1222 commercial compilers.
1224 2005-03-22 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1226 * Makefile.am: Added new files.
1227 * Makefile.in: Regenerate.
1228 * aclocal.m4: Regenerate.
1229 * configure.ac: add checks for signal.h headers file, as well as
1230 following functions: chdir, strerror, getlogin, gethostname, kill,
1231 link, symlink, perror, sleep, time.
1232 * configure: Regenerate.
1233 * intrinsics/chdir.c, intrinsics/gerror.c, intrinsics/getlog.c,
1234 intrinsics/hostnm.c, intrinsics/ierrno.c, intrinsics/kill.c,
1235 intrinsics/link.c, intrinsics/perror.c, intrinsics/rename.c,
1236 intrinsics/sleep.c, intrinsics/symlnk.c, intrinsics/time.c: Newly
1237 implementend g77 intrinsics.
1239 2005-03-21 Zack Weinberg <zack@codesourcery.com>
1241 * configure.ac: Do not invoke TL_AC_GCC_VERSION.
1242 In all substitutions, leave gcc_version to be expanded by the Makefile.
1243 * aclocal.m4, configure: Regenerate.
1244 * Makefile.am: Set gcc_version.
1245 * Makefile.in: Regenerate.
1247 2005-03-16 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1250 * open.c (new_unit): set record length to max_offset rather than
1251 using a hard-coded limit (which was too low).
1253 2005-03-16 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1256 * write.c (output_float): special check when writing 0.0 with
1259 2005-03-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1262 * write.c (output_float): Adds a nzero_real variable to store
1263 the number of leading zeros whatever the format width is. Corrects
1264 the rounding of numbers less than 10^(-width). Fixes typo in an
1265 error message. Updates copyright years
1267 2005-02-27 Toon Moene <toon@moene.indiv.nluug.nl>
1269 * runtime/environ.c: Update copyright years.
1271 2005-02-27 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1273 * io/write.c: Update copyright years.
1275 2005-02-27 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1278 * io/write.c (output_float): Added special check for value 0.0 in
1281 2004-02-27 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1283 * io/write.c (output_float): Fix typo in condition.
1285 2005-02-25 Peter O'Gorman <peter@pogma.com>
1286 Toon Moene <toon@moene.indiv.nluug.nl>
1288 PR libgfortran/17748
1289 * runtime/environ.c: Remove references to environ.
1290 (show_variables): remove GFORTRAN_UNBUFFERED_* and
1291 GFORTRAN_NAME_* because they require environ.
1292 (pattern_scan): Remove function.
1294 2004-02-22 Paul Thomas <paulthomas2@wannado.fr>
1295 Bud Davis <bdavis@gfortran.org>
1297 * io/list_read.c (read_real): Handle separators properly
1298 in list directed read.
1300 2004-02-21 Bud Davis <bdavis@gfortran.org>
1303 * io/transfer.c (write_constant_string): accept an 'h' as
1304 the start of a hollerith format string.
1306 2005-02-21 Eric Botcazou <ebotcazou@libertysurf.fr>
1309 * intrinsics/c99_functions.c (nextafterf): Special-case infinite
1312 2005-02-21 Steven G. Kargl <kargls@comcast.net>
1314 * io/write.c (output_float): Typo in error meesage.
1316 2005-02-20 Steven G. Kargl <kargls@comcast.net>
1319 * intrinsic/args.c (iargc): Off by 1.
1321 2005-02-19 Steven G. Kargl <kargls@comcast.net>
1323 * intrinsic/date_and_time.c: Fix conformance problems.
1325 2005-02-01 Paul Thomas <paulthomas2@wanadoo.fr>
1327 PR libgfortran/19363
1328 PR libgfortran/19691
1329 * libgfortran.h (isfinite): Work around broken isfinite(x) in Cygwin.
1331 2005-01-30 Bud Davis <bdavis@gfortran.org>
1334 * io/inquire.c (inquire_via_unit): Use correct variable for
1337 2005-01-29 Thomas Koenig <Thomas.Koenig@online.de>
1340 * io/transfer.c (data_transfer_init): eor requires advance="NO".
1342 2005-01-25 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1345 * io/read.c (read_f): Don't free uninitialized pointer.
1347 2005-01-23 James A. Morrison <phython@gcc.gnu.org>
1348 Paul Brook <paul@codesourcery.com>
1351 * Makefile.am: Add transpose_c4.c and transpose_c8.c.
1352 * intrinsics/cshift0.c: Use separate optimized loops for complex types.
1353 * m4/transpose.m4: Include type letter in function name.
1354 * Makefile.in: Regenerate.
1355 * generated/transpose_*.c: Regenerate.
1357 2005-01-22 Thomas Koenig <Thomas.Koenig@online.de>
1360 * io/transfer.c (finalize_transfer): Don't do anything if
1361 there is an error condition.
1363 2005-01-22 David Edelsohn <edelsohn@gnu.org>
1365 PR libgfortran/19052
1366 * libgfortran.h (options_t): Add stderr_unit.
1367 * io/io.h (error_stream): Declare.
1368 * io/open.c (new_unit): Do not terminate abnormally if opening
1369 file preconnected to stdin, stdout, or stderr.
1370 * io/unit.c (init_units): Initialize stderr_unit.
1371 * io/unix.c (error_stream): New function.
1372 * runtime/environ.c (GFORTRAN_STDERR_UNIT): New environment variable.
1374 2005-01-22 Thomas Koenig <Thomas.Koenig@online.de>
1377 * io/unix.c (regular_file): No need to change flags->action
1378 if an error occurs. Document this.
1379 No need to call stat() for STATUS_OLD, open() will
1381 For ACTION_UNSPECIFIED, try open for read-write, then for
1382 read-only if open fails with EACCES, then for write-only
1383 if that fails with EACCES again.
1384 * io/unix.c (open_external): Document changed behavior of
1387 2005-01-22 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1390 * io/io.h (st_parameter): Use 'GFC_INTEGER_4' instead of 'int',
1391 use CHARACTER macro for definition of string valued paramters.
1393 2005-01-22 Bud Davis <bdavis9659@comcast.net>
1396 * io/inquire.c(inquire_via_unit): implement POSITION=.
1397 * io/transfer.c(next_record): update position for
1399 * io/rewind.c(st_rewind): update position for
1402 2005-01-16 Bud Davis <bdavis9659@comcast.net>
1405 * io/transfer.c (us_read): no bytes available is not a
1408 2005-01-15 Bud Davis <bdavis9659@comcast.net>
1411 * io/transfer.c (st_write_done): only truncate when it
1414 2005-01-12 Toon Moene <toon@moene.indiv.nluug.nl>
1417 c99_protos.h: License changed to GPL+exception.
1418 libgfortran.h: Ditto.
1419 intrinsics/abort.c: Ditto.
1420 intrinsics/args.c: Ditto.
1421 intrinsics/associated.c: Ditto.
1422 intrinsics/bessel.c: Ditto.
1423 intrinsics/c99_functions.c: Ditto.
1424 intrinsics/cpu_time.c: Ditto.
1425 intrinsics/cshift0.c: Ditto.
1426 intrinsics/date_and_time.c: Ditto.
1427 intrinsics/env.c: Ditto.
1428 intrinsics/eoshift0.c: Ditto.
1429 intrinsics/eoshift2.c: Ditto.
1430 intrinsics/erf.c: Ditto.
1431 intrinsics/etime.c: Ditto.
1432 intrinsics/exit.c: Ditto.
1433 intrinsics/flush.c: Ditto.
1434 intrinsics/fnum.c: Ditto.
1435 intrinsics/getXid.c: Ditto.
1436 intrinsics/getcwd.c: Ditto.
1437 intrinsics/ishftc.c: Ditto.
1438 intrinsics/mvbits.c: Ditto.
1439 intrinsics/pack_generic.c: Ditto.
1440 intrinsics/rand.c: Ditto.
1441 intrinsics/random.c: Ditto.
1442 intrinsics/reshape_generic.c: Ditto.
1443 intrinsics/reshape_packed.c: Ditto.
1444 intrinsics/size.c: Ditto.
1445 intrinsics/spread_generic.c: Ditto.
1446 intrinsics/stat.c: Ditto.
1447 intrinsics/string_intrinsics.c: Ditto.
1448 intrinsics/system.c: Ditto.
1449 intrinsics/system_clock.c: Ditto.
1450 intrinsics/transpose_generic.c: Ditto.
1451 intrinsics/umask.c: Ditto.
1452 intrinsics/unlink.c: Ditto.
1453 intrinsics/unpack_generic.c: Ditto.
1454 io/backspace.c: Ditto.
1456 io/endfile.c: Ditto.
1458 io/inquire.c: Ditto.
1460 io/list_read.c: Ditto.
1465 io/transfer.c: Ditto.
1474 m4/cshift1.m4: Ditto.
1476 m4/dotprod.m4: Ditto.
1477 m4/dotprodc.m4: Ditto.
1478 m4/dotprodl.m4: Ditto.
1479 m4/eoshift1.m4: Ditto.
1480 m4/eoshift3.m4: Ditto.
1481 m4/exponent.m4: Ditto.
1482 m4/fraction.m4: Ditto.
1484 m4/iforeach.m4: Ditto.
1485 m4/ifunction.m4: Ditto.
1486 m4/in_pack.m4: Ditto.
1487 m4/in_unpack.m4: Ditto.
1489 m4/matmul.m4: Ditto.
1490 m4/matmull.m4: Ditto.
1491 m4/maxloc0.m4: Ditto.
1492 m4/maxloc1.m4: Ditto.
1493 m4/maxval.m4: Ditto.
1494 m4/minloc0.m4: Ditto.
1495 m4/minloc1.m4: Ditto.
1496 m4/minval.m4: Ditto.
1498 m4/nearest.m4: Ditto.
1500 m4/product.m4: Ditto.
1501 m4/reshape.m4: Ditto.
1502 m4/set_exponent.m4: Ditto.
1504 m4/specific.m4: Ditto.
1505 m4/specific2.m4: Ditto.
1507 m4/transpose.m4: Ditto.
1509 runtime/environ.c: Ditto.
1510 runtime/error.c: Ditto.
1511 runtime/in_pack_generic.c: Ditto.
1512 runtime/in_unpack_generic.c: Ditto.
1513 runtime/main.c: Ditto.
1514 runtime/memory.c: Ditto.
1515 runtime/normalize.c: Ditto.
1516 runtime/pause.c: Ditto.
1517 runtime/select.c: Ditto.
1518 runtime/stop.c: Ditto.
1519 runtime/string.c: Ditto.
1520 generated/_abs_c4.f90: Regenerated.
1521 generated/_abs_c8.f90: Regenerated.
1522 generated/_abs_i4.f90: Regenerated.
1523 generated/_abs_i8.f90: Regenerated.
1524 generated/_abs_r4.f90: Regenerated.
1525 generated/_abs_r8.f90: Regenerated.
1526 generated/_acos_r4.f90: Regenerated.
1527 generated/_acos_r8.f90: Regenerated.
1528 generated/_aint_r4.f90: Regenerated.
1529 generated/_aint_r8.f90: Regenerated.
1530 generated/_anint_r4.f90: Regenerated.
1531 generated/_anint_r8.f90: Regenerated.
1532 generated/_asin_r4.f90: Regenerated.
1533 generated/_asin_r8.f90: Regenerated.
1534 generated/_atan2_r4.f90: Regenerated.
1535 generated/_atan2_r8.f90: Regenerated.
1536 generated/_atan_r4.f90: Regenerated.
1537 generated/_atan_r8.f90: Regenerated.
1538 generated/_conjg_c4.f90: Regenerated.
1539 generated/_conjg_c8.f90: Regenerated.
1540 generated/_cos_c4.f90: Regenerated.
1541 generated/_cos_c8.f90: Regenerated.
1542 generated/_cos_r4.f90: Regenerated.
1543 generated/_cos_r8.f90: Regenerated.
1544 generated/_cosh_r4.f90: Regenerated.
1545 generated/_cosh_r8.f90: Regenerated.
1546 generated/_dim_i4.f90: Regenerated.
1547 generated/_dim_i8.f90: Regenerated.
1548 generated/_dim_r4.f90: Regenerated.
1549 generated/_dim_r8.f90: Regenerated.
1550 generated/_exp_c4.f90: Regenerated.
1551 generated/_exp_c8.f90: Regenerated.
1552 generated/_exp_r4.f90: Regenerated.
1553 generated/_exp_r8.f90: Regenerated.
1554 generated/_log10_r4.f90: Regenerated.
1555 generated/_log10_r8.f90: Regenerated.
1556 generated/_log_c4.f90: Regenerated.
1557 generated/_log_c8.f90: Regenerated.
1558 generated/_log_r4.f90: Regenerated.
1559 generated/_log_r8.f90: Regenerated.
1560 generated/_mod_i4.f90: Regenerated.
1561 generated/_mod_i8.f90: Regenerated.
1562 generated/_mod_r4.f90: Regenerated.
1563 generated/_mod_r8.f90: Regenerated.
1564 generated/_sign_i4.f90: Regenerated.
1565 generated/_sign_i8.f90: Regenerated.
1566 generated/_sign_r4.f90: Regenerated.
1567 generated/_sign_r8.f90: Regenerated.
1568 generated/_sin_c4.f90: Regenerated.
1569 generated/_sin_c8.f90: Regenerated.
1570 generated/_sin_r4.f90: Regenerated.
1571 generated/_sin_r8.f90: Regenerated.
1572 generated/_sinh_r4.f90: Regenerated.
1573 generated/_sinh_r8.f90: Regenerated.
1574 generated/_sqrt_c4.f90: Regenerated.
1575 generated/_sqrt_c8.f90: Regenerated.
1576 generated/_sqrt_r4.f90: Regenerated.
1577 generated/_sqrt_r8.f90: Regenerated.
1578 generated/_tan_r4.f90: Regenerated.
1579 generated/_tan_r8.f90: Regenerated.
1580 generated/_tanh_r4.f90: Regenerated.
1581 generated/_tanh_r8.f90: Regenerated.
1582 generated/all_l4.c: Regenerated.
1583 generated/all_l8.c: Regenerated.
1584 generated/any_l4.c: Regenerated.
1585 generated/any_l8.c: Regenerated.
1586 generated/count_4_l4.c: Regenerated.
1587 generated/count_4_l8.c: Regenerated.
1588 generated/count_8_l4.c: Regenerated.
1589 generated/count_8_l8.c: Regenerated.
1590 generated/cshift1_4.c: Regenerated.
1591 generated/cshift1_8.c: Regenerated.
1592 generated/dotprod_c4.c: Regenerated.
1593 generated/dotprod_c8.c: Regenerated.
1594 generated/dotprod_i4.c: Regenerated.
1595 generated/dotprod_i8.c: Regenerated.
1596 generated/dotprod_l4.c: Regenerated.
1597 generated/dotprod_l8.c: Regenerated.
1598 generated/dotprod_r4.c: Regenerated.
1599 generated/dotprod_r8.c: Regenerated.
1600 generated/eoshift1_4.c: Regenerated.
1601 generated/eoshift1_8.c: Regenerated.
1602 generated/eoshift3_4.c: Regenerated.
1603 generated/eoshift3_8.c: Regenerated.
1604 generated/exp_c4.c: Regenerated.
1605 generated/exp_c8.c: Regenerated.
1606 generated/exponent_r4.c: Regenerated.
1607 generated/exponent_r8.c: Regenerated.
1608 generated/fraction_r4.c: Regenerated.
1609 generated/fraction_r8.c: Regenerated.
1610 generated/hyp_c4.c: Regenerated.
1611 generated/hyp_c8.c: Regenerated.
1612 generated/in_pack_i4.c: Regenerated.
1613 generated/in_pack_i8.c: Regenerated.
1614 generated/in_unpack_i4.c: Regenerated.
1615 generated/in_unpack_i8.c: Regenerated.
1616 generated/matmul_c4.c: Regenerated.
1617 generated/matmul_c8.c: Regenerated.
1618 generated/matmul_i4.c: Regenerated.
1619 generated/matmul_i8.c: Regenerated.
1620 generated/matmul_l4.c: Regenerated.
1621 generated/matmul_l8.c: Regenerated.
1622 generated/matmul_r4.c: Regenerated.
1623 generated/matmul_r8.c: Regenerated.
1624 generated/maxloc0_4_i4.c: Regenerated.
1625 generated/maxloc0_4_i8.c: Regenerated.
1626 generated/maxloc0_4_r4.c: Regenerated.
1627 generated/maxloc0_4_r8.c: Regenerated.
1628 generated/maxloc0_8_i4.c: Regenerated.
1629 generated/maxloc0_8_i8.c: Regenerated.
1630 generated/maxloc0_8_r4.c: Regenerated.
1631 generated/maxloc0_8_r8.c: Regenerated.
1632 generated/maxloc1_4_i4.c: Regenerated.
1633 generated/maxloc1_4_i8.c: Regenerated.
1634 generated/maxloc1_4_r4.c: Regenerated.
1635 generated/maxloc1_4_r8.c: Regenerated.
1636 generated/maxloc1_8_i4.c: Regenerated.
1637 generated/maxloc1_8_i8.c: Regenerated.
1638 generated/maxloc1_8_r4.c: Regenerated.
1639 generated/maxloc1_8_r8.c: Regenerated.
1640 generated/maxval_i4.c: Regenerated.
1641 generated/maxval_i8.c: Regenerated.
1642 generated/maxval_r4.c: Regenerated.
1643 generated/maxval_r8.c: Regenerated.
1644 generated/minloc0_4_i4.c: Regenerated.
1645 generated/minloc0_4_i8.c: Regenerated.
1646 generated/minloc0_4_r4.c: Regenerated.
1647 generated/minloc0_4_r8.c: Regenerated.
1648 generated/minloc0_8_i4.c: Regenerated.
1649 generated/minloc0_8_i8.c: Regenerated.
1650 generated/minloc0_8_r4.c: Regenerated.
1651 generated/minloc0_8_r8.c: Regenerated.
1652 generated/minloc1_4_i4.c: Regenerated.
1653 generated/minloc1_4_i8.c: Regenerated.
1654 generated/minloc1_4_r4.c: Regenerated.
1655 generated/minloc1_4_r8.c: Regenerated.
1656 generated/minloc1_8_i4.c: Regenerated.
1657 generated/minloc1_8_i8.c: Regenerated.
1658 generated/minloc1_8_r4.c: Regenerated.
1659 generated/minloc1_8_r8.c: Regenerated.
1660 generated/minval_i4.c: Regenerated.
1661 generated/minval_i8.c: Regenerated.
1662 generated/minval_r4.c: Regenerated.
1663 generated/minval_r8.c: Regenerated.
1664 generated/nearest_r4.c: Regenerated.
1665 generated/nearest_r8.c: Regenerated.
1666 generated/pow_c4_i4.c: Regenerated.
1667 generated/pow_c4_i8.c: Regenerated.
1668 generated/pow_c8_i4.c: Regenerated.
1669 generated/pow_c8_i8.c: Regenerated.
1670 generated/pow_i4_i4.c: Regenerated.
1671 generated/pow_i4_i8.c: Regenerated.
1672 generated/pow_i8_i4.c: Regenerated.
1673 generated/pow_i8_i8.c: Regenerated.
1674 generated/pow_r4_i4.c: Regenerated.
1675 generated/pow_r4_i8.c: Regenerated.
1676 generated/pow_r8_i4.c: Regenerated.
1677 generated/pow_r8_i8.c: Regenerated.
1678 generated/product_c4.c: Regenerated.
1679 generated/product_c8.c: Regenerated.
1680 generated/product_i4.c: Regenerated.
1681 generated/product_i8.c: Regenerated.
1682 generated/product_r4.c: Regenerated.
1683 generated/product_r8.c: Regenerated.
1684 generated/reshape_i4.c: Regenerated.
1685 generated/reshape_i8.c: Regenerated.
1686 generated/set_exponent_r4.c: Regenerated.
1687 generated/set_exponent_r8.c: Regenerated.
1688 generated/shape_i4.c: Regenerated.
1689 generated/shape_i8.c: Regenerated.
1690 generated/sum_c4.c: Regenerated.
1691 generated/sum_c8.c: Regenerated.
1692 generated/sum_i4.c: Regenerated.
1693 generated/sum_i8.c: Regenerated.
1694 generated/sum_r4.c: Regenerated.
1695 generated/sum_r8.c: Regenerated.
1696 generated/transpose_i4.c: Regenerated.
1697 generated/transpose_i8.c: Regenerated.
1698 generated/trig_c4.c: Regenerated.
1699 generated/trig_c8.c: Regenerated.
1701 2005-01-07 Bud Davis <bdavis9659@comcast.net>
1704 * transfer.c (next_record_r): always skip the
1705 eol search if it was found during sf_read.
1707 2004-12-27 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1709 * libgfortran/libgfortran.h (GFC_UINTEGER_1, GFC_UINTEGER_2):
1711 * intrinsics/ishftc.c: Update copyright years.
1712 (ishftc8): Change 'shift' and 'size' to GFC_INTEGER_4.
1713 * intrinsics/mvbits.c: Correct non-ASCII character in my name.
1714 Add implementations for GFC_INTEGER_1 and GFC_INTEGER_2.
1716 2004-12-23 Bud Davis <bdavis9659@comcast.net>
1719 * io/tranfer.c (formatted_transfer): moved check for
1720 format reversion inside the processing loop.
1722 2004-12-19 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
1725 * libgfortran.h (itoa): Rename to gfc_itoa.
1726 * io/write.c (itoa): Same.
1727 * runtime/environ.c (itoa): Same.
1728 * runtime/error.c (itoa): Same.
1730 2004-12-15 Bud Davis <bdavis9659@comcast.net>
1731 Steven G. Kargl <kargls@comcast.net>
1734 * io/list_read.c (read_real): do not push back a comma when
1735 it delimits a real value without a decimal point
1737 2004-12-14 Steve Ellcey <sje@cup.hp.com>
1739 * libgfortran/io/transfer.c (us_read): Use memcpy/memset
1740 instead of assignment to fill unaligned buffer.
1742 (next_record_w): Ditto.
1744 2004-12-14 Steven G. Kargl <kargls@comcast.net>
1747 * gfortran.h: typedef GFC_INTEGER_1 and GFC_INTEGER_2
1748 * intrinsics/cshift0.c (cshift0_1,cshift0_2): New functions.
1749 * intrinsics/eoshift0.c (eoshift0_1,eoshift0_2): New functions.
1750 * intrinsics/eoshift2.c (eoshift2_1,eoshift2_2): New functions.
1752 2004-12-13 David Edelsohn <edelsohn@gnu.org>
1754 * io/transfer.c (read_sf): Change bitwise "and" to logical "and".
1756 2004-12-12 Richard Henderson <rth@redhat.com>
1758 * intrinsics/cshift0.c, intrinsics/eoshift0.c, intrinsics/eoshift2.c,
1759 intrinsics/pack_generic.c, intrinsics/reshape_generic.c,
1760 intrinsics/spread_generic.c, intrinsics/transpose_generic.c,
1761 intrinsics/unpack_generic.c, m4/cshift1.m4, m4/dotprod.m4,
1762 m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4, m4/eoshift3.m4,
1763 m4/iforeach.m4, m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4,
1764 m4/reshape.m4, m4/shape.m4, m4/transpose.m4: Use standard prefix
1766 * generated/*: Rebuild.
1768 2004-12-12 Richard Henderson <rth@redhat.com>
1770 * acinclude.m4 (LIBGFOR_CHECK_ATTRIBUTE_VISIBILITY): New.
1771 (LIBGFOR_CHECK_ATTRIBUTE_DLLEXPORT): New.
1772 (LIBGFOR_CHECK_ATTRIBUTE_ALIAS): New.
1773 * configure.ac: Use them.
1774 * configure, config.h.in, aclocal.m4: Rebuild.
1775 * libgfortran.h (prefix): Remove.
1776 (PREFIX, IPREFIX): New.
1777 (sym_rename, sym_rename1, sym_rename2): New.
1778 (internal_proto, export_proto, export_proto_np): New.
1779 (iexport_proto, iexport): New.
1780 (iexport_data_proto, iexport_data): New.
1781 * intrinsics/abort.c, intrinsics/args.c, intrinsics/associated.c,
1782 intrinsics/cpu_time.c, intrinsics/cshift0.c,
1783 intrinsics/date_and_time.c, intrinsics/env.c, intrinsics/eoshift0.c,
1784 intrinsics/eoshift2.c, intrinsics/etime.c, intrinsics/exit.c,
1785 intrinsics/flush.c, intrinsics/fnum.c, intrinsics/getXid.c,
1786 intrinsics/getcwd.c, intrinsics/ishftc.c, intrinsics/mvbits.c,
1787 intrinsics/pack_generic.c, intrinsics/rand.c, intrinsics/random.c,
1788 intrinsics/reshape_generic.c, intrinsics/size.c,
1789 intrinsics/spread_generic.c, intrinsics/stat.c,
1790 intrinsics/string_intrinsics.c, intrinsics/system.c,
1791 intrinsics/system_clock.c, intrinsics/transpose_generic.c,
1792 intrinsics/umask.c, intrinsics/unlink.c, intrinsics/unpack_generic.c,
1793 io/backspace.c, io/close.c, io/endfile.c, io/inquire.c, io/io.h,
1794 io/open.c, io/rewind.c, io/transfer.c, libgfortran.h, m4/cshift1.m4,
1795 m4/dotprod.m4, m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4,
1796 m4/eoshift3.m4, m4/exponent.m4, m4/fraction.m4, m4/iforeach.m4,
1797 m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4, m4/nearest.m4,
1798 m4/pow.m4, m4/reshape.m4, m4/set_exponent.m4, m4/shape.m4,
1799 m4/transpose.m4, runtime/environ.c, runtime/error.c,
1800 runtime/in_pack_generic.c, runtime/in_unpack_generic.c,
1801 runtime/main.c, runtime/memory.c, runtime/pause.c, runtime/select.c,
1802 runtime/stop.c: Use them to mark symbols internal or external.
1803 * generated/*: Rebuild.
1805 2004-12-09 David Edelsohn <edelsohn@gnu.org>
1808 Revert 2004-12-07 change.
1809 * Makefile.am (AM_MAKEFLAGS): Delete.
1810 * Makefile.in: Regenerate.
1812 2004-12-07 Steve Ellcey <sje@cup.hp.com>
1814 * libgfortran/Makefile.am (AM_MAKEFLAGS): New.
1815 * libgfortran/Makefile.in: Regenerate
1817 2004-12-07 Steve Ellcey <sje@cup.hp.com>
1819 * io/io.h (open_external): Change prototype.
1820 * io/unix.c (regular_file): Change prototype and set flags->action if
1822 (open_external): Ditto.
1823 * io/open.c (new_unit): Let open_external set flags->action.
1825 2004-12-07 Eric Botcazou <ebotcazou@libertysurf.fr>
1827 * configure.ac: Check for ieeefp.h. Check for fabsf in libm.
1828 * configure: Regenerate.
1829 * config.h.in: Likewise.
1830 * c99_protos.h: New file.
1831 * libgfortran.h: Include c99_protos.h and conditionally ieeefp.h.
1832 * intrinsics/c99_functions.c (fabsf): New function.
1834 2004-12-06 Richard Henderson <rth@redhat.com>
1836 * intrinsics/cshift0.c, intrinsics/eoshift0.c, intrinsics/eoshift2.c,
1837 intrinsics/pack_generic.c, intrinsics/string_intrinsics.c,
1838 intrinsics/transpose_generic.c, m4/ifunction.m4, m4/matmul.m4,
1839 m4/matmull.m4, m4/transpose.m4: Use internal_malloc_size instead
1841 * generated/*: Rebuild.
1843 2004-12-06 Richard Henderson <rth@redhat.com>
1845 * intrinsics/c99_functions.c, intrinsics/eoshift0.c,
1846 intrinsics/eoshift2.c, intrinsics/exit.c, intrinsics/flush.c,
1847 intrinsics/ishftc.c, intrinsics/mvbits.c, intrinsics/pack_generic.c,
1848 intrinsics/random.c, intrinsics/reshape_generic.c, intrinsics/size.c,
1849 intrinsics/spread_generic.c, intrinsics/stat.c,
1850 intrinsics/string_intrinsics.c, intrinsics/system_clock.c,
1851 intrinsics/transpose_generic.c, intrinsics/unlink.c,
1852 intrinsics/unpack_generic.c, io/backspace.c, io/format.c,
1853 io/list_read.c, io/lock.c, io/open.c, io/transfer.c, io/unix.c,
1854 io/write.c, runtime/environ.c, runtime/error.c,
1855 runtime/in_pack_generic.c, runtime/in_unpack_generic.c, runtime/main.c,
1856 runtime/memory.c, runtime/pause.c, runtime/stop.c,
1857 runtime/string.c: Whitespace fixes.
1859 2004-12-06 Richard Henderson <rth@redhat.com>
1861 * Makefile.am: Generate all m4 output under $(srcdir).
1862 * Makefile.in: Regenerate.
1864 2004-12-02 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
1867 * io/transfer.c (unformatted_read, unformatted_write): width of
1868 a COMPLEX is twice its kind.
1870 2004-12-02 Richard Sandiford <rsandifo@redhat.com>
1872 * configure.ac: Use TL_AC_GCC_VERSION to set gcc_version.
1873 * configure, aclocal.m4, Makefile.in: Regenerate.
1875 2004-12-02 Bud Davis <bdavis9659@comcast.net>
1878 * io/unix.c (fd_alloc_w_at): Update file_length when extending.
1879 * io/backspace.c (formatted_backspace): Reset endfile after backspace.
1881 2004-12-02 Bud Davis <bdavis9659@comcast.net>
1883 * io/inquire.c (inquire_via_unit): do not allow a direct access
1884 file to be opened for sequential I/O.
1886 2004-12-02 Steven G. Kargl <kargls@comcast.net>
1887 Paul Brook <paul@codesourcery.com>
1889 * intrinsics/flush.c: New file.
1890 * intrinsics/fnum.c: ditto
1891 * intrinsics/stat.c: ditto
1892 * io/io.h (unit_to_fd): Add prototype.
1893 * io/unix.c (unit_to_fd): New function.
1894 * configure.ac: Add test for members of struct stat. Check for
1895 sys/types.h and sys/stat.h
1896 * Makefile.am: Add intrinsics/{flush.c,fnum.c,stat.c}
1897 * configure.in: Regenerate.
1898 * config.h.in: Regenerate.
1899 * Makefile.in: Regenerate.
1901 2004-12-01 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
1903 * Makefile.am (AM_CPPFLAGS): Use -iquote instead of -I.
1905 2004-11-28 Bud Davis <bdavis9659@comcast.net>
1907 * io/unix.c (mmap_alloc_w_a): check for a write to a location
1908 less than the mapped area.
1910 2004-11-27 Bud Davis <bdavis9659@comcast.net>
1913 * io/endfile.c (st_endfile): flush the stream before truncating.
1915 2004-11-24 Kelley Cook <kcook@gcc.gnu.org>
1917 * configure: Regenerate for libtool change.
1919 2004-11-22 Steven Bosscher <stevenb@suse.de>
1922 * configure.ac: Check for finite in libm.
1923 * libgfortran.h: Define isfinite macro if not defined.
1924 * intrinsics/c99_functions.c: Use defined(fpclassify) instead of
1926 * io/write.c (write_float): Use isfinite instead of finite.
1927 * configure, config.h.in: Rebuilt.
1929 2004-11-20 Roger Sayle <roger@eyesopen.com>
1931 * io/write.c (write_float, list_formatted_write): Fix indentation.
1933 2004-11-20 Eric Botcazou <ebotcazou@libertysurf.fr>
1936 * acinclude.m4 (LIBGFOR_TARGET_ILP32): New check.
1937 * configure.ac: Include LIBGFOR_TARGET_ILP32.
1938 * configure: Regenerate.
1939 * config.h.in: Likewise.
1940 * libgfortran.h: Provide default definitions for C99 types
1941 on ILP32 targets that don't have them.
1944 * configure.ac: Check for snprintf.
1945 * configure: Regenerate.
1946 * config.h.in: Likewise.
1947 * intrinsics/date_and_time.c (date_and_time): Do not
1948 use snprinf if it is not available.
1949 * io/write.c (output_float): Likewise.
1951 2004-11-20 Steven G. Kargl <kargls@comcast.net>
1953 * Makefile.am: Add intrinsics/{umask.c,unlink.c,exit.c}
1954 * Makefile.in: Regenerated
1955 * intrinsics/umask.c: New file
1956 * intrinsics/unlink.c: ditto
1957 * intrinsics/exit.c: ditto
1959 2004-11-18 Victor Leikehman <lei@il.ibm.com>
1961 * m4/matmul.m4: Loops reordered to improve cache behavior.
1962 * generated/matmul_??.c: Regenerated.
1964 2004-11-10 Paul Brook <paul@codesourcery.com>
1967 * configure.ac: Check for strtof.
1968 * configure: Regenerate.
1969 * config.h.in: Regenerate.
1970 * io/read.c (convert_real): Use strtof if available.
1971 (convert_precision_real): Remove.
1972 (read_f): Avoid poor exponentiation algorithm.
1974 2004-11-05 Andreas Schwab <schwab@suse.de>
1976 * configure.ac: Use AC_PROG_FC, FC and FCFLAGS instead of
1977 AC_PROG_F77, F77 and FFLAGS.
1978 * Makefile.am (selected_int_kind.inc, selected_real_kind.inc): Use
1979 FCCOMPILE instead of F77COMPILE.
1980 * configure, Makefile.in: Regenerate.
1982 2004-11-05 Kelley Cook <kcook@gcc.gnu.org>
1984 * acinclude.m4: Properly quote AC_CACHE_CHECK.
1985 * Makefile.am: Add in ACLOCAL_AMFLAGS.
1986 * aclocal.m4, configure, Makefile.in: Regenerate.
1988 2004-10-30 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
1990 * config.h.in: Regenerate.
1991 * configure: Regenerate.
1992 * configure.ac (AC_CHECK_FUNCS): Add mkstemp.
1993 * io/unix.c (S_IRGRP): Define if undefined.
1997 (tempfile): Use mktemp if mkstemp missing, fix typos.
1999 2004-10-30 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2001 * intrinsics/system.c ("libgfortran.h"): Move after system headers.
2003 2004-10-30 Canqun Yang <canqun@nudt.edu.cn>
2005 * intrinsics/rand.c (irand): Handle NULL argument.
2007 2004-10-07 Paul Brook <paul@codesourcery.com>
2009 * io/transfer.c (finalize_transfer): Free internal streams.
2010 * io/unix.c (mem_close): Free stream object.
2012 2004-10-07 Paul Brook <paul@codesourcery.com>
2014 * intrinsics/string_intrinsics.c (string_verify): Fix off by one
2017 2004-10-06 Paul Brook <paul@codesourcery.com>
2020 * io/transfer.c (data_transfer_init): Reset sf_seen_eor.
2022 2004-10-04 Andrew Pinski <pinskia@physics.uc.edu>
2024 * intrinsics/mvbits.c: Commit the file.
2026 2004-10-04 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2029 * intrinsics/pack_generic.c (__pack): Allocate memory for return array
2030 if not done by caller.
2031 (__pack_s): New function.
2032 * runtime/memory.c (internal_malloc, internal_malloc64): Allow
2033 allocating zero memory.
2036 * Makefile.am (gfor_helper_src): Add intrinsics/mvbits.h.
2037 * Makefile.in: Regenerate.
2038 * intrinsics/mvbits.h: New file.
2041 * intrinsics/system.c: New file.
2042 * Makefile.am: Add dependency for the new file.
2043 * Makefile.in: Regenerate.
2045 2004-10-04 Paul Brook <paul@codesourcery.com>
2046 Bud Davis <bdavis9659@comcast.net>
2050 * io/format.c (parse_format_list): Set repeat count for S, SP, SS,
2052 * io/write.c (output_float): Don't output minus zero.
2054 2004-10-03 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2056 * intrinsics/abort.c ("libgfortran.h"): Move.
2057 * intrinsics/date_and_time.c ("libgfortran.h"): Same.
2058 * intrinsics/write.c ("libgfortran.h"): Same.
2060 2004-09-26 Tobias Schlueter <tobis.schlueter@physik.uni-muenchen.de>
2063 * config.h.in (HAVE_POWF): Undefine.
2064 * configure.ac: Check for 'powf' in library.
2065 * configure: Regenerate.
2066 * intrinsics/c99_functions.c (powf): New function.
2068 2004-09-24 Tobias Schlueter <tobis.schlueter@physik.uni-muenchen.de>
2070 * intrinsics/etime.c (etime_): New function.
2072 2004-09-21 Steven G. Kargl <kargls@comcast.net>
2074 * libgfortran.h: define gfc_alloca()
2075 * intrinsics/env.c (getenv, get_environment_variable_i4): Use it.
2077 2004-09-21 Bud Davis <bdavis9659@comcast.net>
2080 * io/list_read.c (namelist_read): ignore spaces after
2081 the '=' for namelist reads.
2083 2004-09-15 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2085 * config.h.in: Regenerate.
2086 * configure: Regenerate.
2087 * configure.ac (AC_CHECK_HEADERS): Check for sys/mman.h.
2088 * unix.c: Include stdio.h.
2089 (HAVE_SYS_MMAN_H): Check.
2090 (PROT_READ, PROT_WRITE): Provide default definitions.
2092 2004-09-15 Steven G. Kargl <kargls@comcast.net>
2094 * intrincics/getcwd.c: New file.
2095 * Makefile.am: Add getcwd.c.
2096 * Makefile.in: Regenerated.
2098 2004-09-15 Steven G. Kargl <kargls@comcast.net>
2099 Paul Brook <paul@codesourcery.com>
2101 * intrinsics/env.c (getenv, get_environmental_variable): Remove
2102 trailing white space. Use alloca. Honour trim_name.
2104 2004-09-13 Bud Davis <bdavis9659@comcast.net>
2108 * io/list_read.c (list_formatted_read): Handle trailing spaces
2111 2004-09-06 Steven G. Kargl <kargls@comcast.net>
2113 * io/write.c (output_float): Typo in comment. Remove debugging
2114 printf. Fix format for FP of form 1e10.
2116 2004-09-03 Richard Henderson <rth@redhat.com>
2118 * intrinsics/cshift0.c (DEF_COPY_LOOP, copy_loop_int, copy_loop_long,
2119 copy_loop_double, copy_loop_ldouble): New.
2120 (__cshift0): Make shift type ssize_t. Use % operator instead of
2121 div. Use specialized versions of copy loop depending on the shape.
2123 2004-09-02 Paul Brook <paul@codesourcery.com>
2125 * io/format.c (parse_format_list): Set repeat count for P descriptors.
2126 * write.c (output_float): Fix condition. Correctly handle nonzero
2129 2004-09-01 Eric Botcazou <ebotcazou@libertysurf.fr>
2131 * mk-sik-inc.sh: Use a temporary string instead of 'echo -n'.
2132 * mk-srk-inc.sh: Likewise.
2134 2004-09-01 Paul Brook <paul@codesourcery.com>
2136 * runtime/error.c (generate_error): Set both iostat and
2139 2004-08-31 Paul Brook <paul@codesourcery.com>
2142 * io/list_read.c (next_char): Don't signal EOF for internal files.
2143 * io/unix.c (mem_alloc_r_at): Don't return NULL for incomplete reads.
2145 2004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2147 * io/unit.c: Separate copyright years by ','.
2148 (compare, insert_unit, delete_unit, is_internal_unit, close_units):
2149 Remove blank line in beginning of function.
2150 (get_unit): Simplify code.
2152 2004-08-31 Paul Brook <paul@codesourcery.com>
2154 * io/unit.c (get_unit): Remove superfluous if.
2156 2004-08-31 Paul Brook <paul@codesourcery.com>
2158 * io/transfer.c (read_sf): Rename uinty to readlen. Detect EOF.
2159 (finalize_transfer): Move setjmp after namlist IO.
2160 * io/unix.c (mem_alloc_r_at): Calculate remaining length correctly.
2162 2004-08-31 Paul Brook <paul@codesourcery.com>
2164 * list_read.c (eat_separator): Set at_eo when a '/' is seen.
2166 2004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2168 * libgfortran.h: Replace 'gfc_strlen_type' by
2169 'gfc_charlen_type'. Update comment accordingly.
2170 * intrinsics/args.c, intrinsics/env.c, io/io.h, io/transfer.c:
2171 Replace all occurences of 'gfc_strlen_type' by 'gfc_charlen_type'.
2173 2004-08-31 Paul Brook <paul@codesourcery.com>
2175 * libgfortran.h: Add comments.
2177 2004-08-30 Richard Henderson <rth@redhat.com>
2179 * Makefile.am (gfor_helper_src): Split selected_kind.f90.
2180 (gfor_built_src): Add selected_int_kind.inc selected_real_kind.inc.
2181 (selected_int_kind.inc selected_real_kind.inc): New rules.
2182 * Makefile.in: Regenerate.
2183 * mk-sik-inc.sh, mk-srk-inc.sh: New files.
2184 * intrinsics/selected_int_kind.f90: Split from selected_kind.f90,
2185 include table of detected kinds.
2186 * intrinsics/selected_real_kind.f90: Similarly.
2188 2004-08-29 Steven G. Kargl <kargls@comcast.net>
2189 Paul Brook <paul@codesourcery.com>
2191 * intrinsics/bessel.c: New file.
2192 * intrinsics/erf.c: New file.
2193 * Makefie.am: Add intrinsics/bessel.c and intrinsics/erf.c.
2194 * configure.ac: Test for C99 Bessel and Error functions.
2195 * Makefile.in: Regenerate.
2196 * config.h.in: Regenerate.
2197 * configure: Regenerate.
2199 2004-08-29 Steven G. Kargl <kargls@comcast.net>
2200 Paul Brook <paul@codesourcery.com>
2202 * Makefile.am: Add intrinsics/getXid.c.
2203 * configure.ac: Add tests for get{g,p,u}id.
2204 * config.h.in: Regenerate.
2205 * Makefile.in: Regenerate.
2206 * configure: Regenerate.
2208 2004-08-28 Paul Brook <paul@codesourcery.com>
2211 * libgfortran.h (rtoa): Remove prototype.
2212 * runtime/error.c (rtoa): Remove.
2213 * io/write.c (calculate_G_format): Don't add blanks if E format is
2214 used. Add correct number of blanks when exponent width is specified.
2215 (output_float): Rewrite.
2217 2004-08-27 Paul Brook <paul@codesourcery.com>
2219 * io/rewind.c (st_rewind): Reset unit to read mode.
2221 2004-08-27 Bud Davis <bdavis9659@comcast.net>
2224 * io/io.h: created typedef for unit_mode.
2225 * io/io.h (gfc_unit): added mode to unit structure.
2226 * io/transfer.c (data_transfer_init): flush if a write then
2227 read is done on a unit (direct access files).
2228 * io/rewind.c (st_rewind): Used unit mode instead of global.
2230 2004-08-24 Bud Davis <bdavis9659@comcast.net>
2233 * runtime/error.c (itoa): keep from overflowing during
2234 mod operation by using unsigned variable.
2236 2004-08-24 Bud Davis <bdavis9659@comcast.net>
2239 * runtime/string_intrinsics.c (string_index):check for
2240 substring longer than string.
2242 2004-08-24 David Edelsohn <edelsohn@gnu.org>
2244 * Makefile.am (libgfortran_la_LDFLAGS): Add -lm.
2245 * Makefile.in: Rebuilt.
2247 2004-08-23 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2249 * io/io.h, io/list_read.c, io/open.c, io/transfer.c, io/write.c:
2250 Fix formatting issues, update copyright years.
2252 2004-08-21 Bud Davis <bdavis9659@comcast.net>
2255 * io/transfer.c (next_record_w): Do not blank pad.
2256 * io/transfer.c (next_record): Take into account partial records.
2258 2004-08-18 Victor Leikehman <lei@il.ibm.com>
2261 * io/transfer.c (st_set_nml_var)
2262 * io/write.c (namelist_write): Allow var_name and var_name_len to be
2263 null. For strings, use string_length field instead of len.
2264 * io/io.h (struct namelist_type): New field string_length.
2265 (st_set_nml_var_char): New argument string_length.
2267 2004-08-13 Bud Davis <bdavis9659@comcast.net>
2270 * io/open.c (st_open): use flags instead of the unit structure.
2272 2004-08-10 Victor Leikehman <lei@il.ibm.com>
2274 * io/list_read.c (namelist_read): Convert variable names
2275 to lower case, so that mixed-case names are recognized.
2276 Don't read beyond terminating slash.
2278 2004-08-09 Richard Henderson <rth@redhat.com>
2279 Roger Sayle <roger@eyesopen.com>
2281 * intrinsics/c99_functions.c (nextafterf): New implementation that
2282 works correctly with denormalized numbers.
2284 2004-08-09 Victor Leikehman <lei@il.ibm.com>
2286 * m4/matmul.m4, m4/matmull.m4, intrinsics/eoshift0.c,
2287 intrinsics/eoshift2.c, intrinsics/transpose_generic.c:
2288 Allocate space if return value has NULL in its data field.
2289 * generated/*.c: Regenerate.
2291 2004-08-06 Janne Blomqvist <jblomqvi@cc.hut.fi>
2293 * intrinsics/env.c: New file.
2294 * Makefile.am: Add env.c to build.
2295 * Makefile.in: Regenerate.
2297 2004-08-05 Victor Leikehman <lei@il.ibm.com>
2299 PR libgfortran/16704
2300 * io/read.c (read_radix): Understand letters f and F as hex digits.
2302 2004-08-04 Victor Leikehman <lei@il.ibm.com>
2304 * libgfortran.h (array_t, size0) New declarations.
2305 * m4/ifunction.m4, m4/transpose.m4, intrinsics/cshift0.c: Allocate
2306 space if return value descriptor has NULL in its data field,
2307 and initialize bounds and stride.
2308 * intrinsics/size.c (array_t, size0): Declarations moved to
2310 * generated/*.c: Regenerate.
2312 2004-08-03 Roger Sayle <roger@eyesopen.com>
2314 PR libgfortran/16137
2315 * configure.ac: Add tests for acosf, asinf, atan2f, atanf, ceilf,
2316 copysignf, cosf, coshf, expf, floorf, frexpf, hypotf, logf, log10f,
2317 scalbnf, sinf, sinhf, sqrtf, tanf and tanhf in libm.
2318 * config.h.in: Regenerate.
2319 * configure: Regenerate.
2321 * instrinsics/c99_functions.c (acosf, asinf, atan2f, atanf, ceilf,
2322 copysignf, cosf, coshf, expf, floorf, frexpf, hypotf, logf, log10f,
2323 nextafterf, scalbnf, sinf, sinhf, sqrtf, tanf, tanhf): New stub
2324 implementations for targets that don't support C99 float functions.
2326 2004-08-01 Roger Sayle <roger@eyesopen.com>
2328 * io/write.c (write_float): Use the slightly more portable isnan
2329 in preference to isinf.
2331 2004-07-18 Bud Davis <bdavis9659@comcast.net>
2333 * configure.ac: Add check for LFS support.
2334 * configure: Regenerate
2336 2004-07-11 Paul Brook <paul@codesourcery.com>
2339 * m4/cexp.m4 (carg): Return -pi to pi.
2340 * generated/exp_c?.c: Regenerate.
2342 2004-07-08 Andreas Krebbel <krebbel1@de.ibm.com>
2345 * libgfortran/io/write.c: (write_float): Added length check.
2346 Remove pointless memset calls.
2348 2004-07-04 Bud Davis <bdavis9659@comcast.net>
2349 Paul Brook <paul@codesourcery.com>
2352 * io/transfer.c(us_write): set recl for seq unform writes to max size.
2353 * io/transfer.c(data_transfer_init): handle un-opened seq unform unit.
2354 * io/unix.c(fd_alloc_w_at): handle requests at start, fd_flush at
2356 * io/unix.c(is_seekable): set based upon the file/device, not the
2357 method being used to access it (fd or mmap).
2358 * io/unix.c(fd_flush): don't set file_size if !seekable.
2359 * io/unix.c(fd_truncate: ditto.
2361 2004-07-04 Janne Blomqvist <jblomqvi@cc.hut.fi>
2362 Paul Brook <paul@codesourcery.com>
2366 * libgfortran.h (gfc_strlen_type): Define.
2367 * intrinsics/args.c (getarg): Rename ...
2368 (getarg_i4): ... to this.
2369 (getarg_i8, get_command_argument_i4, get_command_argument_i8,
2370 get_command_i4, get_command_i8): New functions.
2372 2004-07-04 Matthias Klose <doko@debian.org>
2374 * libtool-version: New.
2375 * Makefile.am (libgfortran_la_LDFLAGS): Use -version-info for soname.
2376 * Makefile.in: Regenerate.
2377 * configure.ac: Remove libtool_VERSION macro
2378 * configure: Regenerate
2380 2004-06-30 Steve Kargl <sgk@troutmask.apl.washington.edu>
2381 Steven Bosscher <stevenb@suse.de>
2383 * intrinsics/rand.c (rand): Wrap the irand() call from the previous
2386 2004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2387 Paul Brook <paul@codesourcery.com>
2389 * runtime/normalize.c (normalize_r4_i4, normalize_r8_i8): Fix
2391 * intrinsics/rand.c (rand): Call irand() in call to normalize_r4_i4.
2393 2004-06-27 Bud Davis <bdavis9659@comcast.net>
2396 * io/write.c (write_float): check signbit for Infinity.
2398 2004-06-26 Bud Davis <bdavis9659@comcast.net>
2401 * unix.c(regular_file): create file if it does not exist.
2403 2004-06-24 Andrew Pinski <apinski@apple.com>
2405 * configure.ac: Remove check for libmx.
2406 * configure: Regenerate.
2408 2004-06-22 Janne Blomqvist <jblomqvi@cc.hut.fi>
2411 * inquire.c (st_inquire): Add comment
2412 * io.h (st_parameter): Add iolength.
2413 (st_iolength, st_iolength_done): Declare.
2414 * transfer.c (iolength_transfer, iolength_transfer_init,
2415 st_iolength, st_iolength_done): New functions.
2417 2004-06-21 Steven G. Kargl <kargls@comcast.net>
2419 * etime.c (etime_sub): Remove array rank check;
2420 Add check for sufficient space.
2422 2004-06-19 Bud Davis <bdavis9659@comcast.net>
2425 * io/list_read.c(set_value): fixed spelling.
2427 2004-06-19 Bud Davis <bdavis9659@comcast.net>
2430 * io/list_read.c(set_value): don't copy if the string is null.
2432 2004-06-14 Bud Davis <bdavis9659@comcast.net>
2435 * intrinsics/c99_functions.c: Use fpclassify if it exists.
2437 2004-06-13 Paul Brook <paul@codesourcery.com>
2439 * Makefile.am (gfor_helper_src): Add runtime/normalize.f90.
2440 * configure.ac: Add checks for nextafter and nextafterf.
2441 * Makefile.in, config.h.in, configure: Regenerate.
2442 * libgfortran.h (normalize_r4_i4, normalize_r8_i8): Declare.
2443 * intrinsics/rand.c (rand): Use normalize_r4_i4.
2444 * intrinsics/random.c (random_r4): Use normalize_r4_i4.
2445 (random_r8): Use normalize_r8_i8.
2446 * runtime/normalize.c: New file.
2448 2004-06-13 Steven G. Kargl <kargls@comcast.net>
2449 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2451 * random.c: Fix several spelling and formatting mistakes in
2453 (random_r8): Fix loop to make random numbers range in [0,1(.
2456 2004-06-13 Steven G. Kargl <kargls@comcast.net>
2458 * random.c (random_r4): Burn a random number.
2459 (random_r8): fix infinite loop.
2461 2004-06-12 Bud Davis <bdavis9659@comcast.net>
2462 Steve Kargl <sgk@troutmask.apl.washington.edu>
2465 * intrinsics/c99_functions.c: New file.
2466 * Makefile.am: Add new file.
2467 * configure.ac: Added test for round/roundf.
2468 * Makefile.in: Regenerate.
2469 * configure: Regenerate.
2470 * configure.h.in: Regenerate.
2472 2004-06-12 Steven G. Kargl <kargls@comcast.net>
2474 * Makefile.am: Add rand.c and etime.c
2475 * Makefile.in: Regenerated.
2476 * aclocal.in: Regenerated.
2477 * cpu_time.c (second_sub, second): New functions.
2478 * rand.c (irand, rand, srand): New file.
2479 * etime.c (etime_sub, etime): New file.
2481 2004-06-12 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2482 Steven Bosscher <stevenb@suse.de>
2485 * intrinsics/date_and_time.c: New file.
2486 * Makefile.am (gfor_helper_src): Add intrinsics/date_and_time.c.
2487 * Makefile.in, aclocal.m4: Regenerate.
2488 * libgfortran.h: Prototype date_and_time().
2490 2004-06-12 Bud Davis <bdavis9659@comcast.net>
2493 * intrinsics/args.c: Implement GETARG and IARGC.
2494 * Makefile.am: Add it.
2495 * Makefile.in: Regenerate.
2497 2004-06-12 Bud Davis <bdavis9659@comcast.net>
2500 * io/write.c(write_float): Format inf and nan IAW F2003.
2502 2004-06-09 Bud Davis <bdavis9659@comcaste.net>
2505 * io/transfer.c (formatted_transfer): position is unique
2506 for T and TL edit descriptors.
2507 (data_transfer_init): set record length to size of internal
2510 2004-06-09 Bud Davis <bdavis9659@comcast.net>
2513 * io/backspace.c(st_backspace): call correct routine for
2514 formatted and un-formatted units.
2516 2004-05-30 Andreas Jaeger <aj@suse.de>, Steven Bosscher <stevenb@suse.de>
2519 * Makefile.am (AM_CPPFLAGS): Renamed from INCLUDES.
2520 (lib_LTLIBRARIES): Rename to ...
2521 (toolexeclib_LTLIBRARIES): this for multilib support.
2522 * configure.in: Rename to ...
2523 * configure.ac: this. Update to modern autoconf style, enable
2524 multilibs, support --enable-version-specific-runtime-libs.
2525 * Makefile.in: Regenerated.
2526 * configure: Regenerated.
2527 * aclocal.m4: Regenerated.
2529 2004-05-30 Steven G. Kargl <kargls@comcast.net>
2531 * libgfortran.h (random_seed): Update prototype.
2532 * intrinsics/random.c: Disable old implementation and add new one.
2534 2004-05-30 Andreas Jaeger <aj@suse.de>
2536 * intrinsics/random.c: Include unistd.h for close and read
2537 prototypes, remove unneeded inclusion of assert.h.
2539 * intrinsics/abort.c: Include stdlib.h for abort prototype, remove
2540 unneeded inclusion of assert.h.
2542 2004-05-27 Tobias Schlueter <tobias.shclueter@physik.uni-muenchen.de>
2545 * intrinsics/associated.c: Remove enum.
2546 (associated): Replace TRUE/FALSE by 1/0.
2548 2004-05-23 Steven G. Kargl <kargls@comcast.net>
2550 * random.c (random_seed): Use correct variable.
2552 2004-05-22 Steven G. Kargl <kargls@comcast.net>
2554 * intrinsics/system_clock: New file.
2555 * Makefile.am: Add intrinsics/system_clock.c.
2556 * Makefile.in: Regenerate.
2558 2004-05-21 Roger Sayle <roger@eyesopen.com>
2560 * io/format.c (parse_format_list): Allow the comma after a string
2561 literal to be optional.
2563 2004-05-18 Paul Brook <paul@codesourcery.com>
2564 Feng Wang <fengwang@nudt.edu.cn>
2566 * Makefile.am (i_pow_c): Set it. Add build rule.
2567 (gfor_built_src): Use it.
2568 (m4_files): add m4/pow.m4.
2569 * Makefile.in: Regenerate.
2570 * m4/pow.m4: New file.
2571 * generated/pow_*.c: Regenerate.
2573 2004-05-18 Paul Brook <paul@codesourcery.com>
2575 * Makefile.am: Remove references to types.m4.
2576 * m4/iparm.m4: Merge with types.m4.
2577 * m4/types.m4: Remove.
2578 * m4/cshift1.m4, m4/dotprod.m4, m4/dotprodc.m4, m4/dotprodl.m4,
2579 m4/eoshift1.m4, m4/eoshift3.m4, m4/iforeach.m4, m4/ifunction.m4,
2580 m4/in_pack.m4, m4/in_unpack.m4, m4/iparm.m4, m4/matmul.m4,
2581 m4/matmull.m4, m4/maxloc0.m4, m4/maxloc1.m4, m4/maxval.m4,
2582 m4/minloc0.m4, m4/minloc1.m4, m4/minval.m4, m4/reshape.m4,
2583 m4/shape.m4, m4/specific.m4, m4/specific2.m4, m4/transpose.m4):
2584 Update to use new iparm.m4.
2585 * generated/*.c: Regenerate.
2587 2004-05-18 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2590 * gfortran.h (offset_t): Rename to ...
2591 (gfc_offset): ... this.
2592 * io/backspace.c (formatted_backspace, unformatted_backspace),
2593 io/io.h (stream, gfc_unit, global_t, file_length, file_position),
2594 transfer.c (us_read, us_write, next_record_r, next_record_w),
2595 io/unit.c (init_units), unix.c (unix_stream, fd_alloc,
2596 fd_alloc_r_at, fd_alloc_w_at, fd_seek, mmap_alloc,
2597 mmap_alloc_r_at, mmap_alloc_w_at, mmap_seek, mem_alloc_r_at,
2598 mem_alloc_w_at, mem_seek, file_length, file_position): Replace all
2599 occurences of offset_t by gfc_offset.
2601 2004-05-16 Paul Brook <paul@codesourcery.com>
2603 * io/format.c (write_real): Don't include padding in format.
2605 2004-05-16 Paul Brook <paul@codesourcery.com>
2607 * io/format.c (format_lex): Make c an int.
2609 2004-05-16 Janne Blomqvist <jblomqvi@cc.hut.fi>
2610 Paul Brook <paul@codesourcery.com>
2612 * io/write.c (write_logical): Don't print extra blank.
2613 (write_integer): Base field width on kind.
2614 (list_formatted_write): Output initial blank.
2616 2004-05-16 Janne Blomqvist <jblomqvi@cc.hut.fi>
2618 * io/io.h (flush): Add prototype.
2619 * io/transfer.c (finalize_transfer): Flush partial records.
2620 * io/unix.c (flush): New function.
2622 2004-05-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2625 * io/io.h (unit_t): Rename to ...
2626 (gfc_unit) ... this.
2627 (unit_root, current_unit, find_file, find_unit, get_unit): Now
2629 (delete_file, insert_unit, close_unit): Argument now of type
2631 * backspace.c (st_backspace), close.c (st_close), endfile.c
2632 (st_endfile), inquire.c (inquire_via_unit, st_inquire), open.c
2633 (test_endfile, edit_modes, new_unit, already_open, st_open),
2634 rewind.c (st_rewind), transfer.c (current_unit), unit.c
2635 (internal_unit, unit_cache, rotate_left, rotate_right, insert,
2636 insert_unit, delete_root, delete_treap, delete_unit, find_unit,
2637 get_unit, init_units, close_unit), unix.c (find_file0,
2638 find_file, delete_file): Replace all occurences of unit_t by
2641 2004-05-15 Bud Davis <bdavis9659@comcast.net>
2644 * io/write.c (write_a): right justify A edit output.
2646 2004-05-14 Bud Davis <bdavis9659@comcast.net>
2649 * libgfortan.h,intrinsics/random.c: Made random_seed visible.
2650 * runtime/main.c(init): Call random_seed as part of MAIN init.
2652 2004-05-13 Tobias Schlter <tobias.schlueter@physik.uni-muenchen.de>
2654 * io/format.c: (parse_format_list): No comma is required after
2657 2004-05-13 Bud Davis <bdavis9659@comcast.net>
2660 * io/intrinsic/string_intrinsics.c (adjustr): rework logic.
2662 2004-05-06 Rainer Orth <ro@TechFak.Uni-Bielefeld.DE>
2663 Steven Bosscher <stevenb@suse.de>
2666 * libgfortran.h: Include <inttypes.h> if available.
2668 2004-05-03 Rainer Orth <ro@TechFak.Uni-Bielefeld.DE>
2670 * io/unix.c (MAP_FAILED): Define if missing.
2671 (mmap_alloc): Cast MAP_FAILED to char *.
2672 (mmap_open): Likewise.
2674 2004-04-26 Bud Davis <bdavis9659@comcast.net>
2676 * generated/_abs_i8.f90: New file.
2677 * generated/_abs_c4.f90: New file.
2678 * generated/_abs_c8.f90: New file.
2679 * Makefile.am: Add them.
2680 * Makefile.in: Regenerate.
2682 2004-04-26 Bud Davis <bdavis9659@comcast.net>
2685 * generated/_abs_i4.f90: New file.
2686 * Makefile.am: Add it.
2687 * Makefile.in: Regenerate.
2689 2004-04-25 Bud Davis <bdavis9659@comcast.net>
2692 * io/list_read.c(list_formatted_read): finish consuming the
2693 spaces and seperators at eoln to get ready for next item.
2695 2004-04-23 Bud Davis <bdavis9659@comcast.net>
2698 * io/read.c(read_a): Handle field width > destination and no field width.
2700 2004-04-22 Bud Davis <bdavis9659@comcast.net>
2703 * io/format.c (format_item): gracefully handle a ')'
2704 when it is the first character encountered in the string.
2706 2004-04-11 Bud Davis <bdavis9659@comcast.net>
2709 * io/transfer.c (next_record): Update last_record when
2710 more than one record is written to a direct access file
2711 with one write statement.
2713 2004-04-11 Bud Davis <bdavis9659@comcast.net>
2716 * io/transfer.c (next_record_w) : No '\n' if internal.
2717 * io/unix.c (empty_internal_buffer) : Init to spaces, not '\n'.
2719 2004-04-11 Bud Davis <bdavis9659@comcast.net>
2721 * io.h (ioparm): Interface from FE is 32 bit, irregardless of offset_t.
2722 Will need to change this later to support direct access files > 2gb.
2724 2004-04-03 Bud Davis <bdavis9659@comcast.net>
2727 * io/transfer.c (next_record_r) : Skip to next record.
2729 2004-04-03 Bud Davis <bdavis9659@comcast.net>
2732 * io/transfer.c (next_record): Update last_record for DIRECT
2734 2004-04-03 Bud Davis <bdavis9659@comcast.net>
2737 * io/unix.c (find_file0): Use fd field of struct
2739 2004-04-03 Bud Davis <bdavis9659@comcast.net>
2742 * io/inquire.c (inquire_via_unit): Changed return string for
2743 BLANK=NULL. Use correct variable for ACTION.
2745 2004-04-01 Bud Davis <bdavis9659@comcast.net>
2748 * io/read.c (read_f): Allow a decimal without a leading digit.
2749 * io/write.c (output_float): remove a leading '0' to keep from
2750 overflowing the field (F edit descriptor).
2752 2004-04-01 Bud Davis <bdavis9659@comcast.net>
2755 * io/open.c (new_unit),
2756 * io/io.h : new_unit is now visible
2757 * io/transfer.c (data_transfer_init): open unit if no OPEN statement.
2758 * io/transfer.c (data_transfer_init): remove compile warnings.
2759 * io/rewind.c (st_rewind): ftruncate if writing.
2761 2004-03-24 Bud Davis <bdavis9659@comcast.net>
2763 * write.c (write_l): Use extract_int for 'L' edit descriptor.
2765 2004-03-24 Bud Davis <bdavis9659@comcast.net>
2768 * io/io.h (global_t):
2769 * io/list_read.c (next_char,list_formatted_read,ist_formatted_read):
2770 Move eof_jmp to a global structure.
2771 * io/transfer.c(finalize_transfer) : Set up eof_jump for callers.
2773 2004-03-24 Bud Davis <bdavis9659@comcast.net>
2775 * m4/cexp.m4 (csqrt): Actually use the passed value.
2776 * generated/exp_c?.c: Regenerate.
2778 2004-03-24 Bud Davis <bdavis9659@comcast.net>
2781 * io.h, transfer.c, open.c : recl_in changed from ptr to variable.
2782 * open.c (new_unit): Moved test for positioned direct access error.
2783 (init_units): Corrected calculation of max records.
2785 2004-02-06 Feng Wang <fengwang@nudt.edu.cn>
2787 * Makefile.am: Add m4/dotprodc.m4. And fix spelling.
2788 * Makefile.in: Regenerate.
2789 * m4/dotprodc.m4: New file. Implement complex dot_product.
2790 * m4/dotprod.m4: Delete the complex implementation.
2791 * generated/dotprod_*: Update.
2793 2004-02-07 Bud Davis <bdavis9659@comcast.net>
2795 * transfer.c (write_constant_string): Do not delete H's in hollerith
2798 2004-01-05 Andrew Pinski <apinski@apple.com>
2800 * configure.in: Check for csin in -lmx also.
2801 * configure: Regenerate.
2803 2004-01-01 Paul Brook <paul@codesourcery.com>
2805 * io/list_read.c (find_nml_node): Make static.
2806 (match_namelist_name): Ditto.
2807 * io/read.c (convert_precision_real): Make static, fix spelling.
2808 * io/transfer.c (extract_real): Remove unused prototype.
2809 (st_set_nml_var): Make static.
2810 * io/write.c (extract_real): Make static.
2812 2003-12-12 Huang Chun <chunhuang73@hotmal.com>
2814 * intrinsics/string_intrinsics.c (string_index): Fix logics thinko.
2816 2003-12-05 Melvin Hadasht <melvin.hadasht@free.fr>
2818 * io/transfer.c (data_transfer_init): Give a runtime error for list
2819 formatted reads and writes from/to files opened for unformatted IO.
2821 2003-11-30 Paul Brook <paul@nowt.org>
2823 * runtime/memory.c (push_context): Remove.
2824 (pop_context): Remove.
2825 * libgfortran.h: Remove prototypes.
2827 2003-11-27 Paul Brook <paul@nowt.org>
2829 * runtime/memory.c (deallocate): Nullify pointer after freeing.
2831 2003-11-27 Paul Brook <paul@nowt.org>
2833 * intrinsics/string_intrinsics.c: Use new memory allocation interface.
2834 * libgfortran.h: Ditto.
2835 * m4/in_pack.m4: Ditto.
2836 * runtime/in_pack_generic.c: Ditto.
2837 * runtime/memory.c: Ditto.
2839 2003-11-26 Richard Henderson <rth@redhat.com>
2841 * m4/exponent.m4, m4/fraction.m4: New.
2842 * m4/nearest.m4, m4/set_exponent.m4: New.
2843 * generated/*: Update.
2844 * Makefile.am: Add them.
2845 (AM_CFLAGS): New. Use -std=gnu99.
2846 * Makefile.in: Regenerate.
2848 2003-11-08 Paul Brook <paul@nowt.org>
2851 * m4/maxloc0.m4: Use default value of 1. Handle zero sized arrays.
2852 * m4/maxloc1.m4: Ditto.
2853 * m4/minloc0.m4: Ditto.
2854 * m4/minloc1.m4: Ditto.
2855 * m4/ifunction.m4: Set return value for zero sized arrays.
2856 * m4/iforeach.m4: Ditto.
2857 * m4/all.m4, m4/any.m4, m4/count.m4, m4/maxloc1.m4, m4/minloc1.m4,
2858 m4/mxaval.m4, m4/minval.m4, m4/product.m4, m4/sum.m4: Ditto.
2859 * generated/*: Update.
2861 2003-10-30 Toon Moene <toon@moene.indiv.nluug.nl>
2864 * io/list_read.c (eat_spaces): Treat tab as space.
2866 2003-10-30 Lars Segerlund <Lars.Segerlund@comsys.se>
2868 * intrinsics/random.c: Add reference to paper containing algorithm.
2869 (random_seed): Extra error checking and proper handling of arrays.
2870 (arandom_r4, arandom_r8): Implement.
2872 2003-10-29 Toon Moene <toon@moene.indiv.nluug.nl>
2875 * runtime/memory.c (allocate_size): Allow allocation
2876 of zero-sized objects.
2878 2003-10-29 Toon Moene <toon@moene.indiv.nluug.nl>
2881 * open.c (new_unit): Open without a file name opens
2882 a file with name fort.<unit>.
2884 2003-10-12 Feng Wang <wf_cs@yahoo.com>
2886 * intrinsics/cshift0.c: New file.
2887 * m4/cshift1.m4: New file
2888 * generated/cshift*.c: New files.
2889 * Makefile.am: Add them.
2890 * Makefile.in: Regenerate.
2892 2003-10-12 XiaoQiang Zhang <zhangapache@yahoo.com>
2894 * io/list_read.c (read_character): Remove unwanted call to free_saved.
2896 2003-10-11 Huang Chun <jiwang@mail.edu.cn>
2898 * intrinsics/string_intrinsics.c (string_trim): New function.
2899 (string_repeat): New function.
2901 2003-10-11 Paul Brook <paul@nowt.org>
2903 * intrinsics/dprod_r8.f90: New file.
2904 * Makefile.am (gfor_specific_src): Add it.
2905 (gfor_built_specific_src): Rename from gfor_build_specific_c.
2907 (gfor_specific2_src): Rename from gfor_built_specific2_c.
2909 * Makefile.in: Regenerate.
2910 * generated/_aint_*.f90: New files.
2911 * generated/_anint*.f90: New files.
2912 * generated/_atan2*.f90: New files.
2913 * generated/_mod*.f90: New files.
2915 2003-09-20 Kejia Zhao <kejia_zh@yahoo.com.cn>
2917 * intrinsics/selected_kind.f90: New file.
2918 * Makefile.am: Add it.
2919 * Makefile.in: regenerate.
2921 2003-09-19 Lars Segerlund <Lars.Segerlund@comsys.se>
2922 Paul Brook <paul@nowt.org>
2924 * intrinsics/random.c: New file.
2925 * Makefile.am (gfor_hemper_src): Add it.
2926 (gfor_specific_c): Fix typo.
2928 2003-09-19 Paul Brook <paul@nowt.org>
2930 * All: rename g95->gfc.
2932 2003-09-18 XiaoQiang Zhang <zhangapache@yahoo.com>
2934 * io/write.c (output_float): Fix bug of FMT_E, Add comments.
2936 2003-09-09 XiaoQiang Zhang <zhangapache@yahoo.com>
2938 * io/write.c (write_float): Dectection of positive infinite number,
2939 Not a Number(NaN) and negative infinite number.
2940 (ioutput_float): Bug fix for FMT_E and FMT_D processing to
2941 output a very_very small number ( < 0.1e-100 ).
2943 2003-09-07 XiaoQiang Zhang <zhangapache@yahoo.com>
2945 * libgfortran.h (xtoa, itoa): Parameter modified.
2946 * io/io.h (namelist_info): Declaration to support namelist I/O
2947 (st_parameter): Add namelist related component
2948 (ionml, empty_internal_buffer, st_set_nml_var_int,
2949 st_set_nml_var_float, st_set_nml_var_char, st_set_nml_var_complex,
2950 st_set_nml_var_log): Declaration
2951 (set_integer, set_integer): Parameter changed
2952 * io/format.c (free_nodes): Fix annoying bug of lefting "deallocated"
2954 (parse_format_list): Fix bug about FMT_SLASH
2955 * io/list_read.c (push_char): Totally clear old saved_string, zeroize
2956 newly allocated saved_string
2957 (next_char): Add detection of End_Of_Line support
2958 (convert_integer): Now can process 64 bits interger
2959 (read_real): Bug fixed
2960 (init_at_eol, find_nml_node, match_namelist_name): Add new functions
2961 (match_namelist_name): New implemention
2962 * io/lock.c (ionml): New global variable
2963 (library_end): Free memory in ionml
2964 * io/open.c (st_open): Variable initializtion
2965 * io/read.c (max_value): 64 bits interger support
2966 (convert_precsion_real): New procedure to replace "strtod" with more
2968 (read_f, read_radix): Input bug fix
2969 * io/transfer.c: (sf_seen_eor): New static variable
2970 (read_sf): Zeroize base buffer; fix bugs: single read statement can
2971 not get input in mutli line when read from stdin
2972 (formatted_transfer): Fix bug of FMT_O, FMT_B, FMT_Z for INTEGER type
2974 (data_transfer_init): Clear internal buffer for Internel File I/O.
2975 Internal File now worked. Detect some error condition for namelist.
2977 (next_record_w): Internal file and Namelist I/O support.
2978 (st_set_nml_var, st_set_nml_var_float, st_set_nml_var_char,
2979 st_set_nml_var_complex, st_set_nml_var_log): Implemention.
2980 * io/unit.c (implicit_unit): Deletion
2981 (get_unit): Now cannot open a unit implicitly.
2982 * io/unix.c (mmap_alloc): Fix fatal error in calculating the length of
2984 (mem_alloc_r_at): Internal file I/O support added
2985 (empty_internal_buffer): New function
2986 * io/write.c (extract_int): Support 64 bits interger processing
2987 (output_float): Varibale initialization
2988 (write_float): Infinite real number detection.
2989 (write_int): 64 bits integer I/O support
2990 (write_decimal): New function to output decimal number
2991 (otoa, btoa): Better implemention and 64 bits interger support
2992 (namelist_write): New function
2993 * runtime/error.c (itoa, xtoa): Better implemention and 64 bits
2996 2003-08-15 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
2998 * libgfortran.h (os_error, runtime_error,internal_error, sys_exit,
2999 get_mem ): Add attribute.
3000 * intrinsics/spread_generic.c (__spread): Fix spelling.
3001 * io/inquire.c (inquire_via_filename): Add const.
3002 * io/io.h (sys_exit): Add attribute.
3003 * io/io.h (move_pos_offset): Add move_pos_offset.
3004 * io/io.h (compare_file_filename, inquire_sequential, inquire_direct,
3005 inquire_formatted, inquire_unformatted, inquire_read, inquire_write,
3006 inquire_readwrite, convert_real, write_a, write_b, write_d, write_e,
3007 write_en, write_es, write_f, write_i, write_l, write_o, write_x,
3008 write_z): Add const.
3009 * io/read.c (convert_real): Add const.
3010 * io/transfer.c (type_name): Add const.
3011 * io/unix.c (unpack_filename, compare_file_filename,inquire_sequential,
3012 inquire_direct, inquire_formatted, inquire_unformatted, inquire_access,
3013 inquire_read, inquire_write, inquire_readwrite): Add const.
3014 * io/write.c (output_float): Remove unused variable.
3015 * io/write.c (write_a, extract_int, extract_real, output_float,
3016 write_float, write_int, write_i, write_b, write_o, write_z, write_d,
3017 write_e, write_f, write_en, write_es, write_logical, write_integer,
3018 write_character, write_real, write_complex): Add const.
3019 * runtime/error.c (rtoa): Remove unused variable.
3020 * runtime/select.c (select_string): Add const.
3021 * runtime/stop.c (stop_string): Add const.
3023 2003-08-10 Paul Brook <paul@nowt.org>
3025 * Makefile.am (gfor_helper_src): Add intrinsics/abort.c.
3026 (FFLAGS): Add -fno-underscoring.
3027 * Makefile.in: Regenerate.
3028 * intrinsics/abort.c: New file.
3030 2003-08-10 Erik Schnetter <schnetter@uni-tuebingen.de>
3032 * fmain.c (main): Do not call init and cleanup; call set_args instead.
3033 * libgfortran.h (init, cleanup): Remove declarations.
3034 (set_args): Add declaration.
3035 * runtime/main.c (init, cleanup): Make them static, and give them
3036 the constructor and destructor attributes.
3037 (set_args): New function.
3039 2003-08-10 Paul Brook <paul@nowt.org>
3041 * intrinsics/strinf_intrinsics.c (compare_string): Return value based
3042 on which string is longest.
3044 2003-08-10 Paul Brook <paul@nowt.org>
3046 * Makefile.am (EXTRA_DIST): Remove old files.
3047 * Makefile.in: Regenerate.
3049 2003-07-26 Paul Brook <paul@nowt.org>
3051 Rename library to libgfortran.
3052 * libgfortran.h: Change prefix to _libgfortran_.
3054 2003-07-24 Paul Brook <paul@nowt.org>
3056 * configure.in: Don't pull in system libtool. Use toplevel
3059 2003-07-22 Paul Brook <paul@nowt.org>
3061 Regenerate all configury files.
3063 2003-07-09 Chun Huang <compiler@sohu.com>
3065 * intrinsics/string_intrinsic.c (string_scan): New function.
3066 (string_verify): New function.
3068 2003-06-25 Paul Brook <paul@nowt.org>
3070 * io/unix.c (mem_alloc_r_at, mem_alloc_w_at): Advance logical_offset.
3071 (mem_seek): Don't bother setting physical_offset.
3073 2003-06-20 Paul Brook <paul@nowt.org>
3075 * libgfor.h (stop_numeric): Declare.
3076 * runtime/pause.c: New file.
3077 * Makefile.am: Add it.
3079 2003-06-08 Paul Brook <paul@nowt.org>
3081 * m4/cexp.m4 (cabs): Use correct typed version.
3082 (csqrt): New function.
3084 2003-06-07 Canqun Yang <canqun@yahoo.com.cn>
3086 Spotted by Benjamin and Tobias:
3087 * io/list_read.c: Add Separator '\t'.
3088 (parse_real, read_real): Accept real values starting with an optional
3089 sign follows a decimal point.
3091 2003-06-06 Steven Bosscher <steven@gcc.gnu.org>
3093 * Makefile.am: Don't put cmath objects in subdir.
3094 * configure.in: Rename MATHOBJ to MATH_OBJ.
3096 2003-06-02 Kejia Zhao <Kejia_zh@yahoo.com.cn>
3098 * intrinsics/associated.c: New file.
3099 * Makefile.am: Add it. Regenerate Makefile.in.
3100 * libgfor.h: Define g95_array_void, G95_DESCRIPTOR_DATA, and
3101 G95_DESCRIPTOR_DTYPE.
3103 2003-06-01 Canqun Yang <canqun@yahoo.com.cn>
3105 * io/write.c (calcuate_exp): Rewrite it to avoid overflow.
3106 (calculate_G_format): Rewrite it to eliminate an infinte loop and set
3107 the scale_factor to 0 for F editing.
3109 2003-05-11 Tobias Schlter <innenminister@gmx.de>
3111 * libgfor.h: Only include stdint.h if it exists.
3113 2003-05-07 Paul Brook <paul@nowt.org>
3115 * libgfor.h: Use stdint.h types.
3116 * intrinsics/ishift.c: Ditto.
3117 * runtime/memory.c (malloc_t): Reorder fields for better alignment.
3119 2003-05-05 Steven Bosscher <steven@gcc.gnu.org>
3121 * libgfor.h (offsetof): Define if nobody else does.
3122 * runtime/memory.c (HEADER_SIZE): Use it.
3124 2003-05-01 Tobias Schlter <innenminister@gmx.de>
3126 * configure.in: Require autoconf 2.54.
3128 2003-04-28 Tobias Schlter <innenminister@gmx.de>
3129 Paul Brook <paul@nowt.org>
3131 * intrinsics/reshape_generic.c: Copy the whole element, not just the
3133 * m4/transpose.m4: New file.
3134 * Makefile.am: Add them.
3135 Regenerate generated files.
3137 2003-04-18 Steven Bosscher <steven@gcc.gnu.org>
3139 * io/format.c (parse_format_list): Allow 'X' without integer
3140 prefix. This is an extension. Interpretation is '1X'.
3142 2003-04-18 Tobias Schlter <Tobias.Schlueter@physik.uni-muenchen.de>
3144 * io/format.c (parse_format_list): Allow '0P'.
3146 2003-04-18 Steven Bosscher <steven@gcc.gnu.org>
3148 * Makefile.in: Re-regenerate for automake 1.7.3.
3150 2003-04-18 Canqun Yang <canqun@yahoo.com.cn>
3152 Port implementation for CHARACTER SELECT from Andy's tree.
3153 * runtime/select.c: New file
3154 * Makefile.am: Add it.
3155 * Makefile.in: Regenerate.
3157 2003-04-17 Xiaoqiang Zhang <zhangapache@yahoo.com>
3159 * io/transfer.c (formatted_transfer): Modified
3160 * io/unix.c (move_pos_offset): New Function.
3161 * io/format.c (parse_format_list): Modified.
3163 2003-04-15 Xiaoqiang Zhang <zhangapache@yahoo.com>
3165 * io/write.c (write_float,write_real): New implemention of
3166 FMT_G and default float editing.
3167 (calculate_exp,calculate_G_format,output_float): New Function.
3168 (write_float,write_real,write_logical): Modified
3169 * libgfor.h (default_rtoa): Remove Declaration.
3170 * runtime/error.c (default_rtoa): Remove Function.
3172 2003-04-15 Steven Bosscher <steven@gcc.gnu.org>
3175 * io/write.c (extract_real): Add missing break statement.
3177 2003-04-13 Steven Bosscher <steven@gcc.gnu.org>
3179 * cpu_time.c: Make sure we have a definition of HZ. Don't
3180 rely on CLOCKS_PER_SEC, it is always 1000000, on any system.
3182 2003-04-13 Steven Bosscher <steven@gcc.gnu.org>
3183 Paul Brook <paul@nowt.org>
3185 * configure.in: Check for process time headers and GETTIMEOFDAY.
3186 * makefile.am: Add intrinsics/cpu_time.c.
3187 * acinclude.m4: New file.
3188 * intrinsics/cpu_time.c: New file.
3189 * m4/dotprodl.m4: Fix typo.
3190 Regenerate generated files.
3192 2003-04-11 Xiaoqiang Zhang <zhangapache@yahoo.com>
3194 * io/write.c (extract_real): Ouput floating point value.
3195 (write_float): New Function.
3196 (write_e, write_f, write_en, write_es): Modified
3197 * io/transfer.c (formatted_transfer): Modified.
3198 * libgfor.h (default_rtoa): Declaration.
3199 (rtoa): Declaration.
3200 * runtime/error.c (default_rtoa): New Function.
3201 (rtoa): New Function.
3203 2003-04-05 Paul Brook <paul@nowt.org>
3205 * intrinsics/spread_generic.c: New file.
3206 * Makefile.am: Add it. Regenerate Makefile.in.
3208 2003-03-29 Paul Brook <paul@nowt.org>
3210 * intrinsics/pack_generic.c: New file.
3211 * intrinsics/unpack_generic.c: New file.
3212 * Makefile.am: Add them. Regenerate Makefile.in.
3214 2003-03-25 Paul Brook <paul@nowt.org>
3216 * intrinsics/eoshift0.c: New file.
3217 * intrinsics/eoshift2.c: New file.
3218 * m4/eoshift1.m4: New file.
3219 * m4/eoshift3.m4: New file.
3220 * Makefile.am: Add them.
3221 * in_unpack_generic.c: Initialize src.
3222 Regenerate generated files.
3224 2003-03-14 Paul Brook <paul@nowt.org>
3226 * m4/shape.m4: Work properly with array temporaries.
3227 * m4/in_pack.m4: Skip redundant checks for array temporaries.
3228 * runtime/in_pack_generic.c: Ditto.
3230 2003-03-12 Paul Brook <paul@nowt.org>
3232 * m4/shape.m4: Work properly with noncontiguous arrays.
3234 2003-03-08 Paul Brook <paul@nowt.org>
3236 * m4/in_pack.m4: Correctly handle zero sized and assumed size arrays.
3237 * runtime/in_pack_generic.c: Ditto.
3239 2003-02-08 Paul Brook <paul@nowt.org>
3241 * intrinsics/reshape_generic.c: Use runtime_error to report errors.
3242 * io/close.c (st_close): Return void.
3243 * io/open.c (st_open): Return void.
3244 * libgfor.h (g95_array_char): Declare.
3245 (internal_malloc_size): Ditto.
3246 (internal_pack*, internal_unpack*): Ditto.
3247 * m4/in_pack.m4: Allocate storage if neccessary. Fix logic for packed
3249 * m4/in_unpack.m4: Include file fixes.
3250 * m4/reshape.m4: Increment the correct source pointer.
3251 * Makefile.am (maxloc): Fix typo.
3252 * runtime/in_pack_generic.c: Call optimized functions. Allocate
3253 storage if neccessary. Fix logic for packed arrays.
3254 * runtime/in_unpack_generic.c: Call optimized functions.
3255 * runtime/main.c: Use runtime_error to report errors.
3256 * memory.c (internal_malloc_size): Make non-static.
3258 2003-02-02 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
3260 * reshape_packed.c, lock.c: Add #include <string.h>.
3261 * libgfor.h, format.c, inquire.c, io.h, transfer.c, unix.c,
3262 environ.c, error.c, memory.c, string.c: Add const.
3263 * error.c (show_locus): Add void.
3265 2003-02-21 Paul Brook <paul@nowt.org>
3267 * m4/in_pack.m4: Avoid returning const * parameter.
3268 * Makefile.am: Only regenerate files in maintainer mode.
3270 2003-02-20 Paul Brook <paul@nowt.org>
3272 Add array repacking support functions.
3273 * m4/in_pack.m4, m4/in_unpack.m4: New files.
3274 * runtime/in_pack_generic.c, runtime/in_unpack_generic.c: New files.
3275 * Makefile.am: Build them. Regenerate configury files.
3276 * generated/: New directory for generated files (need to move
3277 everything else there).
3279 2003-02-07 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3281 * m4/cexp.m4: Fix typo.
3283 2003-01-26 Paul Brook <paul@nowt.org>
3285 * intrinsics/: Add missing generated files.
3287 2003-01-26 Paul Brook <paul@nowt.org>
3289 * Makefile.am: Put -I before the filename.
3291 2003-01-24 Paul Brook <paul@nowt.org>
3293 * configure.in: Add AM_MAINTAINER_MODE.
3295 2003-01-23 Paul Brook <paul@nowt.org>
3297 * configure.in, Makefile.am: Modify to work with unmodified autoconf
3299 Also regenerate other configury files.
3301 2003-01-21 Paul Brook <paul@nowt.org>
3303 * io/read.c: Don't use stdint.h, it doesn't exist on cygwin.
3305 2003-01-20 Steven Bosscher <s.bosscher@student.tudelft.nl>
3307 * io/read.c (read_f): Don't use alloca, but safe get_mem instead.
3308 Don't include "alloca.h".
3310 2003-01-20 Steven Bosscher <s.bosscher@student.tudelft.nl>
3312 * intrinsics/string.c: Rename to intrinsics/string_intrinsics.c.
3313 * Makefile.am: Adjust file name.
3314 * Makefile.in: Regenerate.
3315 * gfortypes.h: Kill, include everything in...
3316 * libgfor.h: ...here. Include config.h
3317 * fmain.c, intrinsics/ishftc.c, intrinsic/reshape_generic.c,
3318 intrinsics/reshape_i4.c, intrinsics/reshape_i8.c,
3319 intrinsics/reshape_packed.c, intrinsics/size.c,
3320 m4/reshape.m4, runtime/main.c, runtime/memory.c: Use macro
3321 for prefix for all functions instead of hardcoded.
3323 2003-01-19 Steven Bosscher <s.bosscher@student.tudelft.nl>
3325 * io/lock.c (library_end): Propagate library return
3328 2003-01-19 Steven Bosscher <s.bosscher@student.tudelft.nl>
3330 Port fixes from Andy's tree:
3331 * io/read.c (read_decimal): Reverse sense of overflow
3332 comparison during integer reads.
3333 * io/format.c (revert): Fix comment.
3334 (next_format): Fix format revision.
3335 * io/unix.c: Fix and simplify mmap version of stream
3338 2003-01-11 Paul Brook <paul@nowt.org>
3340 * configure, Makefile.in: Regenerate.
3342 2003-01-11 Paul Brook <paul@nowt.org>
3344 * runtime/stop.c: Rewrite.
3346 2003-01-08 Paul Brook <paul@nowt.org>
3348 * configure, Makefile.in: Regenerate.
3350 2003-01-05 Paul Brook <paul@nowt.org>
3352 * (*.m4) Move to m4/.
3353 * intrinsics/string.c (_gfor_string_index): New Function.
3355 2002-12-29 Paul Brook <paul@nowt.org>
3357 * intrinsics/reshape.*: New files.
3358 * gcc_config.patch: Update to new GCC configure system.
3360 2002-10-10 Paul Brook <paul@nowt.org>
3362 * intrinsics/size.c: New file.
3363 * intrinsics/shape.m4: New file.
3364 * Makefile.am: Add above files.
3366 2002-10-02 Paul Brook <paul@nowt.org>
3368 * fmain.c (main): Move here.
3369 * libgfor.c: From here.
3370 * libgfor.h (gfor_init, gfor_runtime_cleanup): Declare.
3371 * Makefile.am: Build libgforbegin.
3372 * gcc_config.patch: Remove stray -march=athlon.
3373 * dotprodl.m4: Fix use of L8_TO_L4 macro.
3374 * ifunction.m4: Move variable declarations to allow compilation with
3376 * specific.m4, specific4.m4: Fix typo typecode->type_code.
3377 * README: Document use of patch -p1.
3379 2002-09-12 Paul Brook <paul@nowt.org>
3381 * math/*: Add complex math library functions.
3382 * intrinsics/specific(2).m4: Generate Specific intrinsic functions.
3383 * Makefile.am: Add details for above.
3384 * configure.in: Use AC_PROG_F95. Test for the presence of csin.
3386 2002-09-09 Paul Brook <paul@nowt.org>
3388 * libgfor.c (determine_endianness): Use an array rather than a struct.
3389 * intrinsics/dotprod*, matmul*: Implement DOT_PRODUCT and MATMUL.
3391 2002-09-09 Steven Bosscher <s.bosscher@student.tudelft.nl>
3393 * libgfor.c: Add fatal signal handler.
3394 Romove superfluous abort() calls.
3396 2002-09-07 Paul Brook <paul@nowt.org>
3398 * Makefile.am, intrinsics: Major rewrite.
3400 2002-09-02 Paul Brook <paul@nowt.org>
3402 * Makefile.am: Added -I$(srcdir) to m4 rule.
3404 2002-08-30 Paul Brook <paul@nowt.org>
3406 * io/*: Integrated libgforio.
3407 * Makefile.am, configure.in: Make compatable with GCC. Build code for
3408 intrinsics in the intrisics directory.
3409 * intrinsics/intrinsics.m4: Move here. Strip directories from the
3410 filename. Add 'and' and 'all' intrinsics.
3412 2002-08-17 Paul Brook <paul@nowt.org>
3414 * ALL: First release as more than just a single file