1 2005-12-08 Jerry DeLisle <jvdelisle@gcc.gnu.org>
4 * io/io.h: Create a new flag sf_read_comma to control comma
5 separators in numeric reads.
6 * io/transfer.c (formatted_transfer_scalar): Initialize the flag.
7 (read_sf): Check for commas coming in and if the flag is set,
9 * io/read.c (read_a) (read_x): Clear the flag for character reads and
10 reset it after the reads.
12 2005-12-04 Francois-Xavier Coudert <coudert@clipper.ens.fr>
14 * io/format.c: Removing unused code.
15 * intrinsics/random.c: Likewise.
17 2005-12-02 Francois-Xavier Coudert <coudert@clipper.ens.fr>
20 * io/transfer.c (data_transfer_init): Don't set the default for
21 namelist I/O on preconnected files to UNFORMATTED.
23 2005-11-30 Eric Botcazou <ebotcazou@libertysurf.fr>
25 * libgfortran.h (ILP32 typedefs): Define _UINT8_T, _UINT32_T and
28 2005-11-28 Steven G. Kargl <kargls@comcast.net>
31 * intrinsics/abort.c: Add external abort_ to allow linking when
32 invoking -std=f95 in testsuite.
34 2005-11-27 Jerry DeLisle <jvdelisle@gcc.gnu.org>
37 * io/unit.c (init_units): Set default flag to BLANK_NULL per
38 requirement of F95 standard. Set PAD_YES for stdin.
40 2005-11-27 David Edelsohn <edelsohn@gnu.org>
42 * intrinsics/random.c: Include config.h
43 * io/size_from_kind.c: Include config.h and libgfortran.h
44 * io/io.h: Revert 2005-11-21 change.
46 2005-11-27 Francois-Xavier Coudert <coudert@clipper.ens.fr>
48 * io/write.c (namelist_write): Correct type in previous
51 2005-11-27 Francois-Xavier Coudert <coudert@clipper.ens.fr>
54 * io/list_read.c (eat_separator, finish_separator,
55 read_character): Handle CRLF separators correctly during reads.
56 (nml_query): Use the HAVE_CRLF macro to print adequate newlines.
57 * io/io.h (st_parameter_dt): Add comment about the possible
58 values for sf_seen_eor.
59 * io/unix.c (tempfile, regular_file): HAVE_CRLF doesn't imply
60 that O_BINARY is defined, so we add that condition.
61 (stream_at_bof): Fix typo in comment.
62 * io/transfer.c (read_sf): Handle correctly CRLF, setting
63 sf_seen_eor value to 2 instead of 1.
64 (formatted_transfer_scalar): Use the sf_seen_eor value to
65 handle CRLF the right way.
66 * io/write.c (nml_write_obj, namelist_write): Use CRLF as newline
67 when HAVE_CRLF is defined.
69 2005-11-27 Janne Blomqvist <jb@gcc.gnu.org>
71 * m4/ifunction.m4: Add const restrict to function arguments.
72 * m4/iforeach.m4: Likewise.
73 * m4/eoshift1.m4: Likewise.
74 * m4/eoshift3.m4: Likewise.
75 * m4/dotprod.m4: Likewise.
76 * m4/dotprodc.m4: Likewise.
77 * m4/dotprodl.m4: Likewise.
78 * m4/shape.m4: Likewise.
79 * m4/cshift1.m4: Likewise.
80 * m4/reshape.m4: Likewise.
81 * m4/transpose.m4: Likewise.
82 * generated/eoshift*: Regenerated
83 * generated/dotprod*: Likewise.
84 * generated/shape*: Likewise.
85 * generated/cshift1*: Likewise.
86 * generated/reshape*: Likewise.
87 * generated/transpose*: Likewise.
89 2005-11-26 Richard Henderson <rth@redhat.com>
91 * io/list_read.c (nml_parse_qualifier): Use ssize_t instead of int
94 2005-11-26 Janne Blomqvist <jb@gcc.gnu.org>
97 * io/open.c (edit_modes): Check for STATUS_UNKNOWN flag.
99 2005-11-25 Richard Henderson <rth@redhat.com>
101 * io/list_read.c (nml_parse_qualifier): Use memcpy to extract
102 values from dtp->u.p.value.
103 * io/io.h (struct st_parameter_dt): Change reversion_flag, first_item,
104 seen_dollar, sf_seen_eor, eor_condition, no_leading_blank, char_flag,
105 input_complete, at_eol, comma_flag, namelist_mode, nml_read_error to
106 single-bit fields. Move value to where it'll be at least pointer
109 2005-11-23 Alan Modra <amodra@bigpond.net.au>
111 * io/open.c (new_unit): Use the right unit number when checking
112 for stdin, stdout, stderr.
114 2005-11-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
117 * io/list_read.c (read_character): Add auto completion on short
120 2005-11-21 David Edelsohn <edelsohn@gnu.org>
122 * io/io.h (_LARGE_FILES): Undefine for AIX.
123 (_LARGE_FILE_API): Define for AIX.
125 2005-11-21 Jakub Jelinek <jakub@redhat.com>
130 * Makefile.am (AM_CPPFLAGS): Add gcc directories as -I paths,
132 * Makefile.in: Regenerated.
133 * acinclude.m4 (LIBGFOR_CHECK_SYNC_FETCH_AND_ADD,
134 LIBGFOR_CHECK_GTHR_DEFAULT, LIBGFOR_CHECK_PRAGMA_WEAK): New macros.
135 * configure.ac: Add them.
136 * configure: Rebuilt.
137 * config.h.in: Rebuilt.
138 * libtool-version: Bump libgfortran.so SONAME to libgfortran.so.1.
139 * libgfortran.h (library_start, show_locus, internal_error,
140 generate_error, find_option): Add st_parameter_common * argument.
141 (library_end): Change into a dummy macro.
142 * io/io.h: Include gthr.h.
143 (SUPPORTS_WEAK): Define if HAVE_PRAGMA_WEAK.
144 (CHARACTER): Remove define.
145 (st_parameter, global_t): Remove typedef.
146 (ioparm, g, ionml, current_unit): Remove variables.
147 (init_error_stream): Remove prototype.
148 (CHARACTER1, CHARACTER2): Define.
149 (st_parameter_common, st_parameter_open, st_parameter_close,
150 st_parameter_filepos, st_parameter_inquire, st_parameter_dt): New
152 (IOPARM_LIBRETURN_MASK, IOPARM_LIBRETURN_OK, IOPARM_LIBRETURN_ERROR,
153 IOPARM_LIBRETURN_END, IOPARM_LIBRETURN_EOR, IOPARM_ERR, IOPARM_END,
154 IOPARM_EOR, IOPARM_HAS_IOSTAT, IOPARM_HAS_IOMSG, IOPARM_COMMON_MASK,
155 IOPARM_OPEN_HAS_RECL_IN, IOPARM_OPEN_HAS_FILE, IOPARM_OPEN_HAS_STATUS,
156 IOPARM_OPEN_HAS_ACCESS, IOPARM_OPEN_HAS_FORM, IOPARM_OPEN_HAS_BLANK,
157 IOPARM_OPEN_HAS_POSITION, IOPARM_OPEN_HAS_ACTION,
158 IOPARM_OPEN_HAS_DELIM, IOPARM_OPEN_HAS_PAD, IOPARM_CLOSE_HAS_STATUS,
159 IOPARM_INQUIRE_HAS_EXIST, IOPARM_INQUIRE_HAS_OPENED,
160 IOPARM_INQUIRE_HAS_NUMBER, IOPARM_INQUIRE_HAS_NAMED,
161 IOPARM_INQUIRE_HAS_NEXTREC, IOPARM_INQUIRE_HAS_RECL_OUT,
162 IOPARM_INQUIRE_HAS_FILE, IOPARM_INQUIRE_HAS_ACCESS,
163 IOPARM_INQUIRE_HAS_FORM, IOPARM_INQUIRE_HAS_BLANK,
164 IOPARM_INQUIRE_HAS_POSITION, IOPARM_INQUIRE_HAS_ACTION,
165 IOPARM_INQUIRE_HAS_DELIM, IOPARM_INQUIRE_HAS_PAD,
166 IOPARM_INQUIRE_HAS_NAME, IOPARM_INQUIRE_HAS_SEQUENTIAL,
167 IOPARM_INQUIRE_HAS_DIRECT, IOPARM_INQUIRE_HAS_FORMATTED,
168 IOPARM_INQUIRE_HAS_UNFORMATTED, IOPARM_INQUIRE_HAS_READ,
169 IOPARM_INQUIRE_HAS_WRITE, IOPARM_INQUIRE_HAS_READWRITE,
170 IOPARM_DT_LIST_FORMAT, IOPARM_DT_NAMELIST_READ_MODE,
171 IOPARM_DT_HAS_REC, IOPARM_DT_HAS_SIZE, IOPARM_DT_HAS_IOLENGTH,
172 IOPARM_DT_HAS_FORMAT, IOPARM_DT_HAS_ADVANCE,
173 IOPARM_DT_HAS_INTERNAL_UNIT, IOPARM_DT_HAS_NAMELIST_NAME,
174 IOPARM_DT_IONML_SET): Define.
175 (gfc_unit): Add lock, waiting and close fields. Change file
176 from flexible array member into pointer to char.
177 (open_external): Add st_parameter_open * argument.
178 (find_file, file_exists): Add file and file_len arguments.
179 (flush_all_units): New prototype.
180 (max_offset, unit_root, unit_lock): New variable.
181 (is_internal_unit, is_array_io, next_array_record,
182 parse_format, next_format, unget_format, format_error,
183 read_block, write_block, next_record, convert_real,
184 read_a, read_f, read_l, read_x, read_radix, read_decimal,
185 list_formatted_read, finish_list_read, namelist_read,
186 namelist_write, write_a, write_b, write_d, write_e, write_en,
187 write_es, write_f, write_i, write_l, write_o, write_x, write_z,
188 list_formatted_write, get_unit): Add st_parameter_dt * argument.
189 (insert_unit): Remove prototype.
190 (find_or_create_unit, unlock_unit): New prototype.
191 (new_unit): Return gfc_unit *. Add st_parameter_open *
192 and gfc_unit * arguments.
193 (free_fnodes): Remove prototype.
194 (free_format_data): New prototype.
196 (init_at_eol): Remove prototype.
197 (free_ionml): New prototype.
198 (inc_waiting_locked, predec_waiting_locked, dec_waiting_unlocked):
199 New inline functions.
200 * io/unit.c (max_offset, unit_root, unit_lock): New variables.
201 (insert): Adjust os_error caller.
202 (insert_unit): Made static. Allocate memory here, initialize
203 lock and after inserting it return it, locked.
204 (delete_unit): Adjust for deletion of g.
205 (find_unit_1): New function.
207 (find_or_create_unit): New function.
208 (get_unit): Add dtp argument, change meaning of the int argument
209 as creation request flag. Adjust for different st_* calling
210 conventions, lock internal unit's lock before returning it
211 and removal of g. Call find_unit_1 instead of find_unit.
212 (is_internal_unit, is_array_io): Add dtp argument, adjust for
213 removal of most of global variables.
214 (init_units): Initialize unit_lock. Adjust insert_unit callers
215 and adjust for g removal.
216 (close_unit_1): New function.
217 (close_unit): Use it.
218 (unlock_unit): New function.
219 (close_units): Lock unit_lock, use close_unit_1 rather than
221 * io/close.c (st_close): Add clp argument. Adjust for new
222 st_* calling conventions and internal function API changes.
223 * io/file_pos.c (st_backspace, st_endfile, st_rewind, st_flush):
224 Add fpp argument. Adjust for new st_* calling conventions and
225 internal function API changes.
226 (formatted_backspace, unformatted_backspace): Likewise. Add
228 * io/open.c (edit_modes, st_open): Add opp argument. Adjust for
229 new st_* calling conventions and internal function API changes.
230 (already_open): Likewise. If not HAVE_UNLINK_OPEN_FILE, unlink
231 scratch file. Instead of calling close_unit just call sclose,
232 free u->file if any and clear a few u fields before calling
234 (new_unit): Return gfc_unit *. Add opp and u arguments.
235 Adjust for new st_* calling conventions and internal function
236 API changes. Don't allocate unit here, rather than work with
237 already created unit u already locked on entry. In case
238 of failure, close_unit it.
239 * io/unix.c: Include unix.h.
240 (BUFFER_SIZE, unix_stream): Moved to unix.h.
241 (unit_to_fd): Add unlock_unit call.
242 (tempfile): Add opp argument, use its fields rather than ioparm.
243 (regular_file): Likewise.
244 (open_external): Likewise. Only unlink file if fd >= 0.
245 (init_error_stream): Add error argument, set structure it points
246 to rather than filling static variable and returning its address.
247 (FIND_FILE0_DECL, FIND_FILE0_ARGS): Define.
248 (find_file0): Use them. Don't crash if u->s == NULL.
249 (find_file): Add file and file_len arguments, use them instead
250 of ioparm. Add locking. Pass either an array of 2 struct stat
251 or file and file_len pair to find_file0.
252 (flush_all_units_1, flush_all_units): New functions.
253 (file_exists): Add file and file_len arguments, use them instead
255 * io/unix.h: New file.
256 * io/lock.c (ioparm, g, ionml): Remove variables.
257 (library_start): Add cmp argument, adjust for new st_* calling
259 (library_end): Remove.
260 (free_ionml): New function.
261 * io/inquire.c (inquire_via_unit, inquire_via_filename,
262 st_inquire): Add iqp argument, adjust for new st_* calling
263 conventions and internal function API changes.
264 * io/format.c (FARRAY_SIZE): Decrease to 64.
265 (fnode_array, format_data): New typedefs.
266 (avail, array, format_string, string, error, saved_token, value,
267 format_string_len, reversion_ok, saved_format): Remove variables.
268 (colon_node): Add const.
269 (free_fnode, free_fnodes): Remove.
270 (free_format_data): New function.
271 (next_char, unget_char, get_fnode, format_lex, parse_format_list,
272 format_error, parse_format, revert, unget_format, next_test): Add
273 fmt or dtp arguments, pass it all around, adjust for internal
274 function API changes and adjust for removal of global variables.
275 (next_format): Likewise. Constify return type.
276 (next_format0): Constify return type.
277 * io/transfer.c (current_unit, sf_seen_eor, eor_condition, max_pos,
278 skips, pending_spaces, scratch, line_buffer, advance_status,
279 transfer): Remove variables.
280 (transfer_integer, transfer_real, transfer_logical,
281 transfer_character, transfer_complex, transfer_array, current_mode,
282 read_sf, read_block, read_block_direct, write_block,
283 write_block_direct, unformatted_read, unformatted_write,
284 type_name, write_constant_string, require_type,
285 formatted_transfer_scalar, us_read, us_write, pre_position,
286 data_transfer_init, next_record_r, next_record_w, next_record,
287 finalize_transfer, iolength_transfer, iolength_transfer_init,
288 st_iolength, st_iolength_done, st_read, st_read_done, st_write,
289 st_write_done, st_set_nml_var, st_set_nml_var_dim,
290 next_array_record): Add dtp argument, pass it all around, adjust for
291 internal function API changes and removal of global variables.
292 * io/list_read.c (repeat_count, saved_length, saved_used,
293 input_complete, at_eol, comma_flag, last_char, saved_string,
294 saved_type, namelist_mode, nml_read_error, value, parse_err_msg,
295 nml_err_msg, prev_nl): Remove variables.
296 (push_char, free_saved, next_char, unget_char, eat_spaces,
297 eat_separator, finish_separator, nml_bad_return, convert_integer,
298 parse_repeat, read_logical, read_integer, read_character,
299 parse_real, read_complex, read_real, check_type,
300 list_formatted_read_scalar, list_formatted_read, finish_list_read,
301 find_nml_node, nml_untouch_nodes, nml_match_name, nml_query,
302 namelist_read): Add dtp argument, pass it all around, adjust for
303 internal function API changes and removal of global variables.
304 (nml_parse_qualifier): Likewise. Add parse_err_msg argument.
305 (nml_read_obj): Likewise. Add pprev_nl, nml_err_msg, clow and
307 (nml_get_obj_data): Likewise. Add pprev_nl and nml_err_msg
309 (init_at_eol): Removed.
310 * io/read.c (convert_real, read_l, read_a, next_char, read_decimal,
311 read_radix, read_f, read_x): Add dtp argument, pass it all around,
312 adjust for internal function API changes and removal of global
314 (set_integer): Adjust internal_error caller.
315 * io/write.c (no_leading_blank, nml_delim): Remove variables.
316 (write_a, calculate_sign, calculate_G_format, output_float,
317 write_l, write_float, write_int, write_decimal, write_i, write_b,
318 write_o, write_z, write_d, write_e, write_f, write_en, write_es,
319 write_x, write_char, write_logical, write_integer, write_character,
320 write_real, write_complex, write_separator,
321 list_formatted_write_scalar, list_formatted_write, nml_write_obj,
322 namelist_write): Add dtp argument, pass it all around, adjust for
323 internal function API changes and removal of global variables.
324 (extract_int, extract_uint, extract_real): Adjust internal_error
326 * runtime/fpu.c (_GNU_SOURCE): Don't define here.
327 * runtime/error.c: Include ../io/unix.h.
328 (filename, line): Remove variables.
329 (st_printf): Pass address of a local variable to init_error_stream.
330 (show_locus): Add cmp argument. Use fields it points to rather than
331 filename and line variables.
332 (os_error, runtime_error): Remove show_locus calls.
333 (internal_error): Add cmp argument. Pass it down to show_locus.
334 (generate_error): Likewise. Use flags bitmask instead of non-NULL
335 check for iostat and iomsg parameter presence, adjust for st_*
336 calling convention changes.
337 * runtime/stop.c (stop_numeric, stop_string): Remove show_locus
339 * runtime/pause.c (pause_numeric, pause_string): Likewise.
340 * runtime/string.c: Include ../io/io.h.
341 (find_option): Add cmp argument. Pass it down to generate_error.
342 * intrinsics/flush.c (recursive_flush): Remove.
343 (flush_i4, flush_i8): Use flush_all_units. Add unlock_unit
345 * intrinsics/rand.c: Include ../io/io.h.
346 (rand_seed_lock): New variable.
347 (srand, irand): Add locking.
348 (init): New constructor function.
349 * intrinsics/random.c: Include ../io/io.h.
350 (random_lock): New variable.
351 (random_r4, random_r8, arandom_r4, arandom_r8): Add locking.
352 (random_seed): Likewise. open failed if fd < 0. Set i correctly.
353 (init): New constructor function.
354 * intrinsics/system_clock.c (tp0, t0): Remove.
355 (system_clock_4, system_clock_8): Don't subtract tp0/t0 from current
356 time, use just integer arithmetics.
357 * intrinsics/tty.c (isatty_l4, isatty_l8, ttynam_sub): Add
360 2005-11-20 Richard Henderson <rth@redhat.com>
362 * Makefile.am: Revert 2005-11-14 change. Enable -free-vectorize
363 via gmake per-target variables.
364 * Makefile.in, aclocal.m4: Regenerate.
366 2005-11-18 Francois-Xavier Coudert <coudert@clipper.ens.fr>
368 * configure.ac: Add "-I ." to the AM_FCFLAGS.
369 * configure: Regenerate.
371 2005-11-18 Hans-Peter Nilsson <hp@axis.com>
373 * config/fpu-glibc.h (set_fpu): Only call fedisableexcept for
374 nonzero FE_ALL_EXCEPT.
376 2005-11-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
379 * io/io.h (unit_access): Add ACCESS_APPEND.
380 * io/open.c (access_opt): Add APPEND value for ACCESS keyword.
381 (st_open): Use that new value to set the POSITION accordingly.
383 2005-11-14 Janne Blomqvist <jb@gcc.gnu.org>
386 * Makefile.am: Add -ftree-vectorize for compiling matmul.
387 * m4/matmul.m4: Add const and restrict to type declarations as
389 * m4/matmull.m4: Likewise.
390 * Makefile.in: Regenerated.
391 * generated/matmul_*.c: Likewise.
393 2005-11-13 Francois-Xavier Coudert <coudert@clipper.ens.fr>
395 * intrinsics/fget.c: New file.
396 * intrinsics/ftell.c: New file.
397 * io/unix.c (stream_offset): New function.
398 * io/io.h: Add prototype for stream_offset.
399 * Makefile.am: Add intrinsics/fget.c and intrinsics/ftell.c.
400 * Makefile.in: Regenerate.
402 2005-11-12 Steven G. Kargl <kargls@comcast.net>
405 * intrinsics/string_intrinsics.c (string_scan): Off by one; Fix typos
408 2005-11-10 Andreas Jaeger <aj@suse.de>
410 * libgfortran.h: Add proper defines where needed.
412 2005-11-10 Andreas Jaeger <aj@suse.de>
414 * libgfortran.h: Add missing prototypes for internal_pack
417 2005-11-06 Janne Blomqvist <jb@gcc.gnu.org>
421 * io/io.h: Add argument to prototypes, add prototypes for
422 size_from_*_kind functions.
423 * io/list_read.c (read_complex): Add size argument, use
425 (list_formatted_read): Add size argument, cleanup.
426 (list_formatted_read_scalar): Add size argument.
427 (nml_read_obj): Fix for padding.
428 * io/transfer.c: Add argument to transfer function pointer.
429 (unformatted_read): Add size argument.
430 (unformatted_write): Likewise.
431 (formatted_transfer_scalar): Fix for padding with complex(10).
432 (formatted_transfer): Add size argument, cleanup.
433 (transfer_integer): Add size argument to transfer call.
434 (transfer_real): Likewise.
435 (transfer_logical): Likewise.
436 (transfer_character): Likewise.
437 (transfer_complex): Likewise.
438 (transfer_array): New kind argument, use it.
439 (data_transfer_init): Add size argument to formatted_transfer
441 (iolength_transfer): Add size argument, cleanup.
442 * io/write.c (write_complex): Add size argument, fix for padding
444 (list_formatted_write): Add size argument, cleanup.
445 (list_formatted_write_scalar): Add size argument, use it.
446 (nml_write_obj): Fix for size vs. kind issue.
447 * io/size_from_kind.c: New file.
448 * Makefile.am: Add io/size_from_kind.c.
449 * configure: Regenerate.
450 * Makefile.in: Regenerate.
452 2005-11-06 Francois-Xavier Coudert <coudert@clipper.ens.fr>
454 * intrinsics/ctime.c: New file.
455 * configure.ac: Add check for ctime.
456 * Makefile.am: Add ctime.c
457 * configure: Regenerate.
458 * config.h.in: Regenerate.
459 * Makefile.in: Regenerate.
461 2005-11-05 Richard Guenther <rguenther@suse.de>
463 * configure.ac: Use AM_FCFLAGS for extra flags, not FCFLAGS.
464 * configure: Regenerate.
466 2005-11-05 Francois-Xavier Coudert <coudert@clipper.ens.fr>
468 * intrinsics/tty.c (ttynam): New function.
470 2005-11-04 Steven G. Kargl <kargls@comcast.net>
473 * runtime/stop.c (stop_numeric): Use stop_code = -1.
475 2005-11-04 Francois-Xavier Coudert <coudert@clipper.ens.fr>
478 * runtime/main.c (stupid_function_name_for_static_linking): New
480 * runtime/error.c (internal_error): Call
481 stupid_function_name_for_static_linking.
482 * libgfortran.h: Add prototype for
483 stupid_function_name_for_static_linking.
485 2005-11-01 Paul Thomas <pault@gcc.gnu.org>
488 * libgfortran/intrinsics/date_and_time.c: Add interface to
489 the functions date_and_time for the intrinsic function secnds.
491 2005-10-31 Jerry DeLisle <jvdelisle@verizon.net>
494 * io/list_read.c (free_saved): Set saved_used to zero.
496 2005-10-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
499 * io/unix.c (flush_if_preconnected): New function.
500 * io/io.h: Add prototype for flush_if_preconnected.
501 * io/transfer.c (data_transfer_init): Use flush_if_preconnected
502 to workaround buggy mixed C-Fortran code.
504 2005-10-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
506 * Makefile.am: Add intrinsics/malloc.c file.
507 * Makefile.in: Regenerate.
508 * intrinsics/malloc.c: New file, with implementations for free
509 and malloc library functions.
511 2005-10-29 Mike Stump <mrs@apple.com>
513 * Makefile.am (kinds.h): Remove target, if command fails.
514 (selected_int_kind.inc): Likewise.
515 (selected_real_kind.inc): Likewise.
516 * Makefile.in: Regenerate.
518 2005-10-28 Francois-Xavier Coudert <coudert@clipper.ens.fr>
521 * Makefile.am (intrinsics): Add signal.c.
522 * Makefile.in: Regenerate.
523 * configure.ac: Checks for signal and alarm.
524 * config.h.in: Regenerate.
525 * configure: Regenerate.
526 * intrinsics/signal.c: New file for SIGNAL and ALARM intrinsics.
528 2005-10-28 Francois-Xavier Coudert <coudert@clipper.ens.fr>
530 * acinclude.m4 (LIBGFOR_CHECK_FPSETMASK): New check.
531 * configure.ac: Check for floatingpoint.h, fptrap.h and float.h
532 headers. Use LIBGFOR_CHECK_FPSETMASK. Check for fp_trap and
534 * configure.host: Add case for systems with fpsetmask and systems
535 with fp_trap/fp_enable.
536 * config/fpu-sysv.h: New file, FPU code using fpsetmask.
537 * config/fpu-aix.h: New file, FPU code for AIX using fp_trap and
539 * aclocal.m4: Regenerate.
540 * configure: Regenerate.
541 * config.h.in: Regenerate.
543 2005-10-24 Jerry DeLisle <jvdelisle@verizon.net>
546 * libgfortran.h: Remove array stride error code.
547 * runtime/error.c: Remove array stride error.
548 * io/io.h: Change name of 'nml_loop_spec' to 'array_loop_spec' to be
549 generic. Add pointer to array_loop_spec and rank to gfc_unit
551 * io/list_read.c: Revise nml_loop_spec references to array_loop_spec.
552 * io/transfer.c (init_loop_spec): New function to initialize
554 (next_array_record): New function to return the index to the next array
555 record by incrementing through the array_loop_spec.
556 (next_record_r): Use new function.
557 (next_record_w): Use new function.
558 (finalize_transfer): Free memory allocated for array_loop_spec.
559 * io/unit.c (get_array_unit_len): Delete this function. Use new
560 function init_loop_spec to initialize the array_loop_spec.
562 2005-10-24 Paul Thomas <pault@gcc.gnu.org>
565 * libgfortran/io/list_read.c (namelist_read): Exit with call to
566 free_saved () so that character strings do not accumulate.
568 2005-10-23 Jerry DeLisle <jvdelisle@verizon.net>
571 * io/transfer.c (read_block): Change the order of execution to not read
573 (read_block_direct): Same change.
575 2005-10-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
578 * acinclude.m4 (LIBGFOR_CHECK_WORKING_STAT): New check.
579 * configure.ac: Use LIBGFOR_CHECK_WORKING_STAT.
580 * Makefile.in: Regenerate.
581 * configure: Regenerate.
582 * config.h.in: Regenerate.
583 * aclocal.m4: Regenerate.
584 * io/unix.c (compare_file_filename): Add fallback case for
585 systems without working stat.
586 * io/open.c (already_open): Correct call to
587 compare_file_filename.
588 * io/io.h: Correct proto for compare_file_filename.
590 2005-10-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
592 * runtime/fpu.c: Add _GNU_SOURCE definition.
593 * config/fpu-glibc.h: Remove __USE_GNU definition.
595 2005-10-23 Paul Thomas <pault@gcc.gnu.org>
598 * intrinsics/spread_generic.c (spread_internal_scalar): New
599 function that handles the special case of spread with a scalar
600 source. This has new interface functions -
601 (spread_scalar, spread_char_scalar): New functions to interface
602 with the calls specified in gfc_resolve_spread.
604 2005-10-21 Francois-Xavier Coudert <coudert@clipper.ens.fr>
607 * io/unix.c: Add fallback definition for SSIZE_MAX.
609 2005-10-19 Francois-Xavier Coudert <coudert@clipper.ens.fr>
611 * c99_protos.h: Define preprocessor HAVE_ macros with value 1
612 instead of empty value.
613 * intrinsics/c99_functions.c: Likewise.
614 * intrinsics/getXid.c: Define HAVE_GETPID with value 1 instead of
616 * intrinsics/sleep.c: Define HAVE_SLEEP with value 1 instead of
619 2005-10-19 Francois-Xavier Coudert <coudert@clipper.ens.fr>
622 * c99_protos.h: Define HAVE_ macros for all provided functions.
624 2005-10-14 Uros Bizjak <uros@kss-loka.si>
626 * config/fpu-387.h (set_fpu): Remove extra ":" in stmxcsr.
627 Change cw and cw_sse variables to unsigned.
628 (SSE): New definition.
631 2005-10-13 Thomas Koenig <Thomas.Koenig@online.de>
633 * io/unix.c(fd_alloc_r_at): Use read() instead of do_read()
634 only in case of special files (e.g. terminals).
636 2005-10-13 Uros Bizjak <uros@kss-loka.si>
638 * config/fpu-387.h (set_fpu): Add "=m" for stmxcsr.
640 2005-10-12 Francois-Xavier Coudert <coudert@clipper.ens.fr>
642 * Makefile.am: Add fpu.c to the build process, and
643 target-dependent code as fpu-target.h.
644 * Makefile.in: Regenerate.
645 * configure.ac: Add call to configure.host to set
647 * configure: Regenerate.
648 * configure.host: New script to determine which host-dependent
650 * libgfortran.h: Add fpe option, remove previous fpu_ options.
651 Add bitmasks for different FPE traps. Add prototype for set_fpu.
652 * runtime/environ.c: Remove environment variables to control
654 * runtime/fpu.c (set_fpe): New function for the front-end.
655 * runtime/main.c (init): Set FPU state.
656 * config: New directory to store host-dependent code.
657 * config/fpu-387.h: New file with code handling the i387 FPU.
658 * config/fpu-glibc.h: New file with code for glibc systems.
659 * config/fpu-generic.h: Fallback for the most generic host. Issue
662 2005-10-12 Janne Blomqvist <jblomqvi@cc.hut.fi>
664 * io/unix.c(fd_alloc_r_at): Remove parts of patch of 2005/10/07 that
665 cause input from the terminal to hang.
667 2005-10-11 Steven G. Kargl <kargls@comcast.net>
670 * c99_functions.c (csqrtf, csqrt): Fix choice of branch cut. Note
671 csqrt{f} were imported from glibc, and this bug is still present
672 there. glibc PR is 1146.
674 2005-10-07 Janne Blomqvist <jblomqvi@cc.hut.fi>
678 * io/io.h: Add read and write members to stream, define access
680 * io/transfer.c (read_block_direct): New function.
681 (write_block_direct): New function.
682 (unformatted_read): Change to use read_block_direct.
683 (unformatted_write): Change to use write_block_direct.
684 * io/unix.c: Remove mmap includes and defines.
687 (reset_stream): New function.
688 (do_read): New function.
689 (do_write): New function.
690 (fd_flush): Change to use do_write() instead of writen().
691 (fd_alloc_r_at): Change to use do_read().
692 (fd_seek): Change return type to try, as the prototype. Add check
693 to avoid syscall overhead if possible.
694 (fd_read): New function.
695 (fd_write): New function.
696 (fd_open): Set pointers for new functions.
697 (mem_read): New function.
698 (mem_write): New function.
699 (open_internal): Set pointers for new functions.
700 (is_seekable): Clean up comment.
702 2005-10-07 Jerry DeLisle <jvdelisle@verizon.net>
704 * io/transfer.c (write_block): Add test for end-of-file condition,
705 removed from mem_alloc_w_at. (next_record_w): Clean up checks for
706 NULL pointer returns from s_alloc_w.
707 * io/unix.c (mem_alloc_w_at): Remove call to generate_error end-of-file.
708 * io/write.c (write_float): Add checks for NULL pointer returns from
709 write_block calls. (write_integer): Same.
711 2005-10-03 Jakub Jelinek <jakub@redhat.com>
713 * runtime/memory.c (allocate_size): Malloc 1 byte if size == 0.
715 2005-10-03 Francois-Xavier Coudert <coudert@clipper.ens.fr>
719 * Makefile.am: Add generated files for large real and integers
720 kinds. Add a rule to create the kinds.inc c99_protos.inc files.
721 Use kinds.inc to preprocess Fortran generated files.
722 * libgfortran.h: Add macro definitions for GFC_INTEGER_16_HUGE,
723 GFC_REAL_10_HUGE and GFC_REAL_16_HUGE. Add types gfc_array_i16,
724 gfc_array_r10, gfc_array_r16, gfc_array_c10, gfc_array_c16,
726 * mk-kinds-h.sh: Define macros HAVE_GFC_LOGICAL_* and
727 HAVE_GFC_COMPLEX_* when these types are available.
728 * intrinsics/ishftc.c (ishftc16): New function for GFC_INTEGER_16.
729 * m4/all.m4, m4/any.m4, m4/count.m4, m4/cshift1.m4, m4/dotprod.m4,
730 m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4, m4/eoshift3.m4,
731 m4/exponent.m4, m4/fraction.m4, m4/in_pack.m4, m4/in_unpack.m4,
732 m4/matmul.m4, m4/matmull.m4, m4/maxloc0.m4, m4/maxloc1.m4,
733 m4/maxval.m4, m4/minloc0.m4, m4/minloc1.m4, m4/minval.m4, m4/mtype.m4,
734 m4/nearest.m4, m4/pow.m4, m4/product.m4, m4/reshape.m4,
735 m4/set_exponent.m4, m4/shape.m4, m4/specific.m4, m4/specific2.m4,
736 m4/sum.m4, m4/transpose.m4: Protect generated functions with
737 appropriate "#if defined (HAVE_GFC_type_kind)" preprocessor directives.
738 * Makefile.in: Regenerate.
739 * all files in generated/: Regenerate.
741 2005-10-01 Jakub Jelinek <jakub@redhat.com>
743 * runtime/memory.c (malloc_t): Remove.
744 (GFC_MALLOC_MAGIC, HEADER_SIZE, DATA_POINTER, DATA_HEADER): Remove.
745 (mem_root, runtime_cleanup, malloc_with_header): Remove.
746 (internal_malloc_size): Use just get_mem if size != 0, return NULL
748 (internal_free): Just free if non-NULL.
749 (internal_realloc_size): Remove debugging stuff.
750 (allocate_size): Use malloc directly, remove debugging stuff.
751 (deallocate): Use free directly, fix error message wording.
753 * libgfortran.h (GFC_ITOA_BUF_SIZE, GFC_XTOA_BUF_SIZE,
754 GFC_OTOA_BUF_SIZE, GFC_BTOA_BUF_SIZE): Define.
755 (gfc_itoa, xtoa): Add 2 extra arguments.
756 * runtime/environ.c: Include stdio.h.
757 (check_buffered): Use sprintf.
758 * runtime/error.c: Include assert.h.
759 (gfc_itoa, xtoa): Add 2 extra arguments, avoid using static
761 (st_printf, st_sprintf): Adjust callers.
762 * io/write.c (otoa, btoa): Add 2 extra arguments, avoid using
764 (write_int, write_decimal): Add 2 extra arguments to conv
765 function pointer, adjust caller.
766 (write_integer): Adjust gfc_itoa caller.
768 * io/unit.c (get_array_unit_len): Return 0 rather than NULL.
770 * io/read.c (read_f): Remove spurious pointer dereference.
772 2005-09-30 Janne Blomqvist <jblomqvi@cc.hut.fi>
775 * io/open.c (edit_modes): Check for correct flag.
777 2005-09-29 Jakub Jelinek <jakub@redhat.com>
779 * runtime/string.c (find_option): Change 3rd argument to
781 * libgfortran.h (find_option): Likewise.
782 * runtime/environ.c (rounding, precision, signal_choices): Constify.
783 (init_choice, show_choice): Change 2nd argument to const choice *.
784 * io/open.c (access_opt, action_opt, blank_opt, delim_opt, form_opt,
785 position_opt, status_opt, pad_opt): Constify.
786 * io/transfer.c (advance_opt): Likewise.
787 * io/inquire.c (undefined): Likewise.
788 * io/close.c (status_opt): Likewise.
789 * io/format.c (posint_required, period_required, nonneg_required,
790 unexpected_element, unexpected_end, bad_string, bad_hollerith,
791 reversion_error): Likewise.
792 * io/unix.c (yes, no, unknown): Change from const char *
795 2005-09-27 Steve Ellcey <sje@cup.hp.com>
798 * acinclude.m4 (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE): New.
799 (LIBGFOR_CHECK_FOR_BROKEN_ISNAN): New.
800 (LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): New.
801 * configure.ac (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE): Add use.
802 (LIBGFOR_CHECK_FOR_BROKEN_ISNAN): Add use.
803 (LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): Add use.
804 * configure: Regenerate.
805 * config.h.in: Regenerate.
806 * libgfortan.h (isfinite): undef if broken, set if needed.
807 (isnan): undef if broken, set if needed.
808 (fpclassify): undef if broken, set if needed.
809 * io/write.c: Remove TODO comment about working isfinite.
810 * intrinsics/c99_functions.c (round): Use isfinite instead
812 * intrinsics/c99_functions.c (roundf): Ditto.
814 2005-09-24 Janne Blomqvist <jblomqvi@cc.hut.fi>
816 * io.h: Changed prototypes of list_formatted_{read|write}.
817 * list_read.c (list_formatted_read): Renamed to
818 list_formatted_read_scalar and made static.
819 (list_formatted_read): New function.
820 * transfer.c: Prototype for transfer_array. Changed transfer
822 (unformatted_read): Add nelems argument, use it.
823 (unformatted_write): Likewise.
824 (formatted_transfer): Changed name to formatted_transfer_scalar.
825 (formatted_transfer): New function.
826 (transfer_integer): Add nelems argument to transfer call, move
827 updating item count to transfer functions.
828 (transfer_real): Likewise.
829 (transfer_logical): Likewise.
830 (transfer_character): Likewise.
831 (transfer_complex): Likewise.
832 (transfer_array): New function.
833 (data_transfer_init): Call formatted_transfer with new argument.
834 (iolength_transfer): New argument, use it.
835 * write.c (list_formatted_write): Renamed to
836 list_formatted_write_scalar, made static.
837 (list_formatted_write): New function.
839 2005-09-26 David Edelsohn <edelsohn@gnu.org>
841 * configure.ac: Add check for __clog.
842 * configure: Regenerate.
844 2005-09-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
846 * c99_protos.h: Add prototypes for C99 complex functions.
847 * libgfortran.h: Include complex.h before c99_protos.h.
848 * intrinsics/c99_functions.c: Define HAVE_ macros for the
849 fallback functions we provide.
850 (cabsf, cabs, cabsl, cargf, carg, cargl, cexpf, cexp, cexpl,
851 clogf, clog, clogl, clog10f, clog10, clog10l, cpowf, cpow, cpowl,
852 cqsrtf, csqrt, csqrtl, csinhf, csinh, csinhl, ccoshf, ccosh,
853 ccoshl, ctanhf, ctanh, ctanhl, csinf, csin, csinl, ccosf, ccos,
854 ccosl, ctanf, ctan, ctanl): New fallback functions.
855 * Makefile.am (gfor_math_trig_c, gfor_math_trig_obj,
856 gfor_specific_c, gfor_cmath_src, gfor_cmath_obj): Remove.
857 * Makefile.in: Regenerate.
858 * configure.ac: Remove checks for csin. Add checks for all C99
860 * config.h.in: Regenerate.
861 * configure: Regenerate.
862 * aclocal.m4: Regenerate.
864 2005-09-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
865 Danny Smith <dannysmith@users.sourceforge.net>
868 * intrinsics/getXid.c: Add getpid wrapper for MinGW.
869 * intrinsics/getlog.c: Add getlogin wrapper for MinGW.
870 * intrinsics/hostnm.c: Add gethostname wrapper for MinGW.
872 2005-09-24 Francois-Xavier Coudert <coudert@clipper.ens.fr>
875 * intrinsics/sleep.c: Add correct sleep macro for MinGW.
877 2005-09-24 Francois-Xavier Coudert <coudert@clipper.ens.fr>
880 * intrinsics/cpu_time.c (__cpu_time_1): Provide a MS Windows
883 2005-09-14 Jerry DeLisle <jvdelisle@verizon.net
885 PR fortran/21875 Internal Unit Array I/O, NIST
886 * libgfortran.h: Add run time error code for array stride.
887 * runtime/error.c (translate_error): Add error message for
889 * io/io.h: Add array descriptor pointer to IOPARM structure.
890 Add prtotypes for two new functions.
891 * io/transfer.c (data_transfer_init): Removed initialization and
892 moved to unit.c (get_unit)
893 * io/transfer.c (next_record_r): Include internal unit read
895 * io/transfer.c (next_record_w): Include internal unit write
896 functionality, including padding of character array records.
897 * io/unit.c (get_array_unit_len): New function to return the number
898 of records in the character array 'file' from the array descriptor.
899 * io/unit.c (get_unit): Gathered initialization code from
900 init_data_transfer for internal units and added initialization of
901 character array unit.
902 * io/unit.c (is_array_io): New function to determine if internal unit
904 * io/unix.c (mem_alloc_w_at): Add error checks for bad record length
907 2005-09-13 Richard Sandiford <richard@codesourcery.com>
910 * intrinsics/cshift0.c (cshift0): Add an extra size argument.
911 (cshift0_1, cshift0_2, cshift0_4, cshift0_8): Replace explicit
912 implementations with...
913 (DEFINE_CSHIFT): ...this new macro. Define character versions too.
914 * intrinsics/eoshift0.c (zeros): Delete.
915 (eoshift0): Add extra size and filler arguments. Use memset if no
917 (eoshift0_1, eoshift0_2, eoshift0_4, eoshift0_8): Replace explicit
918 implementations with...
919 (DEFINE_EOSHIFT): ...this new macro. Define character versions too.
920 * intrinsics/eoshift2.c (zeros): Delete.
921 (eoshift2): Add extra size and filler arguments. Use memset if no
923 (eoshift2_1, eoshift2_2, eoshift2_4, eoshift2_8): Replace explicit
924 implementations with...
925 (DEFINE_EOSHIFT): ...this new macro. Define character versions too.
926 * intrinsics/pack.c (pack_internal): New static function, reusing
927 the contents of pack and adding an extra size argument. Change
928 "mptr" rather than "m" when calculating the array size.
929 (pack): Redefine as a forwarder to pack_internal.
930 (pack_s_internal): New static function, reusing the contents of
931 pack_s and adding an extra size argument.
932 (pack_s): Redefine as a forwarder to pack_s_internal.
933 (pack_char, pack_s_char): New functions.
934 * intrinsics/reshape.c (reshape_internal): New static function,
935 reusing the contents of reshape and adding an extra size argument.
936 (reshape): Redefine as a forwarder to reshape_internal.
937 (reshape_char): New function.
938 * intrinsics/spread.c (spread_internal): New static function,
939 reusing the contents of spread and adding an extra size argument.
940 (spread): Redefine as a forwarder to spread_internal.
941 (spread_char): New function.
942 * intrinsics/transpose.c (transpose_internal): New static function,
943 reusing the contents of transpose and adding an extra size argument.
944 (transpose): Redefine as a forwarder to transpose_internal.
945 (transpose_char): New function.
946 * intrinsics/unpack.c (unpack_internal): New static function, reusing
947 the contents of unpack1 and adding extra size and fsize arguments.
948 (unpack1): Redefine as a forwarder to unpack_internal.
949 (unpack0): Call unpack_internal instead of unpack1.
950 (unpack1_char, unpack0_char): New functions.
951 * m4/cshift1.m4 (cshift1): New static function, reusing the contents
952 of cshift1_<kind> and adding an extra size argument.
953 (cshift1_<kind>): Redefine as a forwarder to cshift1.
954 (cshift1_<kind>_char): New function.
955 * m4/eoshift1.m4 (zeros): Delete.
956 (eoshift1): New static function, reusing the contents of
957 eoshift1_<kind> and adding extra size and filler arguments.
958 Fix calculation of hstride. Use memset if no bound is provided.
959 (eoshift1_<kind>): Redefine as a forwarder to eoshift1.
960 (eoshift1_<kind>_char): New function.
961 * m4/eoshift3.m4 (zeros): Delete.
962 (eoshift3): New static function, reusing the contents of
963 eoshift3_<kind> and adding extra size and filler arguments.
964 Use memset if no bound is provided.
965 (eoshift3_<kind>): Redefine as a forwarder to eoshift3.
966 (eoshift3_<kind>_char): New function.
967 * generated/cshift1_4.c, generated/cshift1_8.c,
968 * generated/eoshift1_4.c, generated/eoshift1_8.c,
969 * generated/eoshift3_4.c, generated/eoshift3_8.c: Regenerate.
971 2005-09-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
974 * io/unix.c (is_preconnected): Add function to test if a stream
975 corresponds to a preconnected unit.
976 * io/io.h: Add prototype for is_preconnected.
977 * io/transfer.c (data_transfer_init): Do not truncate
980 2005-09-10 Janne Blomqvist <jblomqvi@cc.hut.fi>
982 * io/unix.c: Remove mmap code.
984 2005-09-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
987 * io/close.c (st_close): Call library_end even in case of error.
989 2005-09-09 Thomas Koenig <Thomas.Koenig@online.de>
991 * io/io.h: Add iomsg as last field of st_parameter.
992 * runtime/error.c (generate_error): If iomsg is present, copy
995 2005-09-09 Richard Sandiford <richard@codesourcery.com>
998 * runtime/memory.c (internal_malloc_size): Return a null pointer
1000 (internal_free): Do nothing if the pointer is null.
1001 (internal_realloc_size, internal_realloc, internal_realloc64): New.
1003 2005-09-07 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1006 * acinclude.m4 (LIBGFOR_CHECK_CRLF): New check.
1007 * configure.ac: Use new check.
1008 * configure.in: Regenerate.
1009 * config.h.in: Regenerate.
1010 * configure: Regenerate.
1011 * io/transfer.c (next_record_w): Add case for CRLF as line
1013 * io/unix.c (tempfile, regular_file): Open files with
1014 O_BINARY on systems with CRLF.
1016 2005-09-07 Steve Ellcey <sje@cup.hp.com>
1019 * io/write.c (extract_int): Use memcpy to access buffer.
1020 (extract_uint): Ditto.
1021 (extract_real): Ditto.
1023 2005-09-05 Thomas Koenig <Thomas.Koenig@online.de>
1025 * io/list_read.c: Adjust size of of value to 32 (to hold
1026 kind=16 complex values).
1028 2005-09-04 Thomas Koenig <Thomas.Koenig@online.de>
1031 * io/transfer.c(data_transfer_init): Check for a too-large
1032 record number. Return if sseek failed.
1034 2005-09-03 Jakub Jelinek <jakub@redhat.com>
1036 * io/read.c (read_x): Take int argument instead of fnode * and
1037 digging the N from F->u.n.
1038 * io/io.h (read_x): Adjust prototype.
1039 * io/transfer.c (formatted_transfer): Adjust callers. Don't clobber
1042 2005-09-02 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1044 * io/unix.c (stream_ttyname): Protect use of ttyname by
1046 * configure.ac: Add check for ttyname.
1047 * config.h.in: Regenerate.
1048 * configure: Regenerate.
1050 2005-09-02 Andreas Jaeger <aj@suse.de>
1052 * libgfortran.h: Add prototype for init_compile_options.
1054 * io/io.h: Add prototype for notify_std.
1056 2005-08-31 Steve Ellcey <sje@cup.hp.com>
1058 * io/read.c (set_integer): Use memcpy to fill buffer.
1060 2005-08-31 Steve Ellcey <sje@cup.hp.com>
1063 * io/read.c (convert_real): Use memcpy to fill buffer.
1065 2005-08-29 Thomas Koenig <Thomas.Koenig@online.de>
1068 * io/lock.c(library_start): If ioparm.iostat is present, clear
1071 2005-08-27 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1073 * acinclude.m4 (LIBGFOR_CHECK_UNLINK_OPEN_FILE): Add check to see
1074 if target can unlink open files.
1075 * configure.ac: Use this new test.
1076 * config.h.in: Regenerate.
1077 * configure: Regenerate.
1078 * Makefile.in: Regenerate.
1079 * aclocal.ac: Regenerate.
1080 * io/io.h: Add prototype for unpack_filename.
1081 * io/close.c (st_close): Delete file after closing unit if
1082 HAVE_UNLINK_OPEN_FILE is not defined.
1083 * io/unix.c (unpack_filename): Unlink scratch file after opening
1084 it only if HAVE_UNLINK_OPEN_FILE is defined.
1086 2005-08-17 Kelley Cook <kcook@gcc.gnu.org>
1088 * All files: Update FSF address.
1090 2005-08-16 Thomas Koenig <Thomas.Koenig@online.de>
1093 * io/transfer.c (iolength_transfer): Remove __attribute__ ((unused))
1094 from type. Return correct length for inquire(iolength=)
1095 for complex variables.
1097 2005-08-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1098 Steven Bosscher <stevenb@suse.de>
1101 * Makefile.am: Add file runtime/compile_options.c.
1102 * Makefile.in: Regenerate.
1103 * libgfortran.h: Create structure compile_options_t. Define the
1104 compile_options variable and GFC_STD_ macros.
1105 * runtime/compile_options.c: New file.
1106 * runtime/error.c (notify_std): New function.
1107 * runtime/main.c (init): Call init_compile_options during
1109 * io/format.c: Use the new notify_std function for the $
1110 descriptor extension.
1112 2005-08-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1113 * Makefile.am: Add file intrinsics/tty.c to Makefile process.
1114 * Makefile.in: Regenerate.
1115 * io/io.h: Prototypes for new functions stream_isatty and
1117 * io/unix (stream_isatty, stream_ttyname): New functions to call
1118 isatty() and ttyname() on a given unit.
1119 * intrinsics/tty.c: New file to implement g77 intrinsics TTYNAM
1122 2005-08-08 Jerry DeLisle <jvdelisle@verizon.net>
1125 * io/transfer.c (data_transfer_init): Initialize
1126 current_unit->bytes_left for a read.
1128 2005-08-07 Janne Blomqvist <jblomqvi@cc.hut.fi>
1131 * io/backspace.c: File removed, contents moved to ...
1132 * io/endfile.c: Ditto.
1133 * io/rewind.c: Ditto.
1134 * io/file_pos.c: New file, ... here.
1135 * Makefile.am: Add file_pos.c to list, remove obsolete files.
1136 * Makefile.in: Regenerated.
1138 2005-08-07 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1140 * io/io.h: Change DEFAULT_TEMPDIR to /tmp instead of /var/tmp.
1141 * io/unix.c (tempfile): Look at the TEMP environment variable
1142 to find the temporary files directory. Whitespace correction.
1144 2005-08-06 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1146 * io/unix.c: Add O_RDWR to open() call.
1148 2005-08-04 Paul Thomas <pault@gcc.gnu.org>
1150 * transfer.c (data_transfer_init): Truncate file in
1151 sequential WRITE when last_record == 0, rather than
1152 current_record. Cures problem on RH9.
1154 2005-08-03 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1156 * libgfortran.h: When isfinite is not provided by the system,
1157 define it as a macro, so that it can accept any floating point
1160 2005-08-01 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1163 * intrinsics/flush.c (flush_i8): Add function flush_i8. Update
1166 2005-07-31 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1169 * intrinsics/abort.c (abort): Close units before aborting.
1170 Updated copyright years.
1172 2005-07-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1175 * io/write.c (write_real): Add default formats for real(10) and
1178 2005-07-30 Paul Thomas <pault@gcc.gnu.org>
1180 PR fortran/22570 and related issues.
1181 * transfer.c (formatted_transfer): Make sure that there
1182 really is data present before X- or T- editing. Move all
1183 treatment of tabbing during writes to start of next data
1184 producing format. Suppress incorrect zeroing of bytes_left
1185 in slash formating. Insert int cast for assignment of a
1186 difference of two gfc_offsets.
1188 2005-07-23 Jerry DeLisle <jvdelisle@verizon.net>
1190 * io/write.c (write_float): Revise output of IEEE exceptional
1191 values to comply with F95 and F2003 standards.
1193 2005-07-22 Jerry DeLisle <jvdelisle@verizon.net>
1196 * io/unit.c (init_units): Replace BLANK_ZERO with
1199 2005-07-22 Jerry DeLisle <jvdelisle@verizon.net>
1201 PR libfortran/21875 (FM111.f)
1202 * io/read.c (next_char): Return a ' ' character when BLANK_ZERO
1203 or BLANK_NULL are active.
1204 (read_decimal): Interpret ' ' character correctly for BZ or BN.
1205 (read_radix): Interpret ' ' character correctly for BZ or BN.
1206 (read_f): Interpret ' ' character correctly for BZ or BN.
1208 2005-07-22 Paul Thomas <pault@gcc.gnu.org>
1211 * read.c (read_x): Correct the condition for doing the
1212 x-editing during formatted input.
1213 * transfer.c (formatted_transfer): Cast offset difference
1214 as int, clean-up arithmetic with new variable, bytes_used,
1215 zero counters for FMT_SLASH,
1216 (data_transfer_init) Zero X- and T-editing counters
1218 (next_record_w) Zero X- and T-editing counters.
1221 2005-07-17 Jerry DeLisle <jvdelisle@verizon.net>
1223 * io/write.c (write_float): Fix field width checks for
1224 printing 'Infinity' or 'Inf'.
1225 (output_float): Fix typo in comment.
1227 2005-07-12 Paul Thomas <pault@gcc.gnu.org>
1230 * transfer.c (formatted_transfer): Correct the problems
1231 with X- and T-editting that caused TLs followed by TRs
1232 to overwrite data, which caused NIST FM908.FOR to fail
1234 (data_transfer_init): Zero X- and T-editting counters at
1235 the start of formatted IO.
1236 * write.c (write_x): Write specified number of skips with
1237 specified number of spaces at the end.
1239 2005-07-13 Paul Thomas <pault@gcc.gnu.org>
1241 * io/read.c (read_complex): Prevent X formatting during reads
1242 from going beyond EOR to fix NIST fm908.FOR failure.
1243 * io/list_read.c (read_complex): Allow complex data in list-
1244 directed reads to have eols either side of the comma to
1245 fix NIST FM906.FOR failure.
1247 2005-07-12 Thomas Koenig <Thomas.Koenig@online.de>
1250 * io/unix.c: Add member special_file to type unix_stream.
1251 (fd_truncate): Don't call ftruncate or chsize if
1252 s refers to a special file.
1253 (fd_to_stream): initialize s->special_file.
1255 2005-07-11 David Edelsohn <edelsohn@gnu.org>
1257 PR libgfortran/22412
1258 * io/write.c (otoa): Bias p by SCRATCH_SIZE, not
1259 sizeof (SCRATCH_SIZE).
1262 2005-07-09 Jerry DeLisle <jvdelisle@verizon.net>
1264 PR libfortran/21875 (FM111.f)
1265 * io/read.c (next_char): Return a ' ' character when BLANK_ZERO or
1266 BLANK_NULL are active.
1267 (read_decimal): Interpret ' ' character correctly for BZ or BN.
1268 (read_radix): Interpret ' ' character correctly for BZ or BN.
1269 (read_f): Interpret ' ' character correctly for BZ or BN.
1270 * gfortran.dg/test (fmt_read_bz_bn.f90): New test case.
1272 2005-07-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1273 Thomas Koenig <Thomas.Koenig@online.de>
1276 * io/write.c (extract_unit): New function; extract
1277 ints as unsigned signed int of the correct size.
1278 (write_int): Use it.
1279 * runtime/error.c: Adjust copyright years.
1280 Adjust size of buffer to maximum that can occur.
1282 2005-07-07 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1284 * libgfortran.h (GFC_ARRAY_DESCRIPTOR): Replace 'type *base' by
1286 * intrinsics/cshift0.c, intrinsics/eoshift0.c,
1287 intrinsics/eoshift2.c,intrinsics/pack_generic.c,
1288 intrinsics/reshape_generic.c, intrinsics/spread_generic.c,
1289 intrinsics/transpose_generic.c, intrinsics/unpack_generic,
1290 m4/cshift1.m4, m4/eoshift1.m4, m4/eoshift3.m4, m4/iforeach.m4,
1291 m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4, m4/reshape.m4,
1292 m4,transpose.m4: Set renamed field 'offset' to zero instead of
1294 * generated/all_l4.c, generated/all_l8.c,
1295 generated/any_l4.c, generated/any_l8.c, generated/count_4_l4.c,
1296 generated/count_4_l8.c, generated/count_8_l4.c,
1297 generated/count_8_l8.c, generated/chift1_4.c,
1298 generated/cshift1_8.c, generated/eoshift1_4.c,
1299 generated/eoshift1_8.c, generated/eoshift3_4.c,
1300 generated/eoshift3_8.c, generated/matmul_c4.c,
1301 generated/matmul_c8.c, generated/matmul_i4.c, matmul_i8.c,
1302 generated/matmul_l4.c, generated/matmul_l8.c,
1303 generated/matmul_r4.c, generated/matmul_r8.c,
1304 generated/maxloc0_4_i4.c, generated/maxloc0_4_i8.c,
1305 generated/maxloc0_4_r4.c, generated/maxloc0_4_r8.c,
1306 generated/maxloc0_8_i4.c, generated/maxloc0_8_i8.c,
1307 generated/maxloc0_8_r4.c, generated/maxloc0_8_r8.c,
1308 generated/maxloc1_4_i4.c, generated/maxloc1_4_i8.c,
1309 generated/maxloc1_4_r4.c, generated/maxloc1_4_r8.c,
1310 generated/maxloc1_8_i4.c, generated/maxloc1_8_i8.c,
1311 generated/maxloc1_8_r4.c, generated/maxloc1_8_r8.c,
1312 generated/maxval_i4.c, generated/maxval_i8.c,
1313 generated/maxval_r4.c, generated/maxval_r8.c,
1314 generated/minloc0_4_i4.c, generated/minloc0_4_i8.c,
1315 generated/minloc0_4_r4.c, generated/minloc0_4_r8.c,
1316 generated/minloc0_8_i4.c, generated/minloc0_8_i8.c,
1317 generated/minloc0_8_r4.c, generated/minloc0_8_r8.c,
1318 generated/minloc1_4_i4.c, generated/minloc1_4_i8.c,
1319 generated/minloc1_4_r4.c, generated/minloc1_4_r8.c,
1320 generated/minloc1_8_i4.c, generated/minloc1_8_i8.c,
1321 generated/minloc1_8_r4.c, generated/minloc1_8_r8.c,
1322 generated/minval_i4.c, generated/minval_i8.c,
1323 generated/minval_r4.c, generated/minval_r8.c,
1324 generated/product_c4.c, generated/product_c8.c,
1325 generated/product_i4.c, generated/product_i8.c,
1326 generated/product_r4.c, generated/product_r8.c,
1327 generated/reshape_c4.c, generated/reshape_c8.c,
1328 generated/reshape_i4.c, generated/reshape_i8.c,
1329 generated/sum_c4.c, generated/sum_c8.c, generated/sum_i4.c,
1330 generated/sum_i8.c, generated/sum_r4.c, generated/sum_r8.c,
1331 generated/transpose_c4.c, generated/transpose_c8.c,
1332 generated/transpose_i4.c, generated/transpose_i8.c: Regenerate:
1334 2005-07-07 Thomas Koenig <Thomas.Koenig@online.de>
1337 * intrinsics/eoshift0.c: If abs(shift) > len, fill the
1338 the whole array with the boundary value, but don't overrun it.
1339 * intrinsics/eoshift2.c: Likewise.
1340 * m4/eoshift1.m4: Likewise.
1341 * m4/eoshift3.m4: Likewise.
1342 * generated/eoshift1_4.c: Regenerated.
1343 * generated/eoshift1_8.c: Regenerated.
1344 * generated/eoshift3_4.c: Regenerated.
1345 * generated/eoshift3_8.c: Regenerated.
1347 2005-07-07 Feng Wang <fengwang@nudt.edu.cn>
1350 * io/transfer.c (formatted_transfer): Enable FMT_A on other types to
1351 support Hollerith constants.
1353 2005-07-01 Andreas Jaeger <aj@suse.de>
1355 * intrinsics/unpack_generic.c: Remove const from parameter.
1357 * io/transfer.c (formatted_transfer): Remove unused variable.
1359 2005-06-28 Thomas Koenig <Thomas.Koenig@online.de>
1362 * m4/eoshift1.m4: Correct bstride (it needs to be multiplied
1363 by size since it's a char pointer).
1364 * m4/eoshift1_4.c: Regenerated.
1365 * m4/eoshift1_8.c: Regenerated.
1367 2005-06-28 Thomas Koenig <Thomas.Koenig@online.de>
1370 * m4/eoshift3.m4: Correct bstride (it needs to be multiplied
1371 by size since it's a char pointer).
1372 * m4/eoshift3_4.c: Regenerated.
1373 * m4/eoshift3_8.c: Regenerated.
1375 2005-06-28 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1378 * io/transfer.c (formatted_transfer): Do not iterate on the
1379 repeat count of a FMT_SLASH, since this is already done in
1382 2005-06-25 Thomas Koenig <Thomas.Koenig@online.de>
1385 * m4/cshift1.m4: Remove const from argument ret.
1386 Populate return array descriptor if ret->data is NULL.
1387 * m4/eoshift1.m4: Likewise.
1388 * m4/eoshift3.m4: Likewise.
1389 * generated/cshift1_4.c: Regenerated.
1390 * generated/cshift1_8.c: Regenerated.
1391 * generated/eoshift1_4.c: Regenerated.
1392 * generated/eoshift1_8.c: Regenerated.
1393 * generated/eoshift3_4.c: Regenerated.
1394 * generated/eoshift3_8.c: Regenerated.
1396 2005-06-24 Jerry DeLisle <jvdelisle@verizon.net>
1399 * Makefile.am: Include intrinsics/hyper.c.
1400 * c99_protos.h: Add prototypes for single precision versions of
1401 acosh, asinh, and atanh for platforms that do not have these.
1402 * config.h.in: Add #undef for wrappers.
1403 * configure.ac: Add checks for single precision versions.
1404 * aclocal.m4: Regenerated.
1405 * Makefile.in: Regenerated.
1406 * configure: Regenerated.
1407 * intrinsics/hyper.c: New file, adds new wrapper functions.
1409 2005-06-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1411 * intrinsics/c99_functions.c (log10l): New log10l function for
1412 systems where this is not available.
1413 * c99_protos.h: Prototype for log10l function.
1414 * libgfortran.h: Use generated kinds.h to define GFC_INTEGER_*,
1415 GFC_UINTEGER_*, GFC_LOGICAL_*, GFC_REAL_*, GFC_COMPLEX_*. Update
1416 prototypes for gfc_itoa and xtoa.
1417 * io/io.h: Update prototypes for set_integer and max_value.
1418 * io/list_read.c (convert_integer): Use new
1419 GFC_(INTEGER|REAL)_LARGEST type.
1420 * io/read.c (set_integer): Likewise.
1421 (max_value): Likewise.
1422 (convert_real): Likewise.
1424 (next_char): Likewise.
1425 (read_decimal): Likewise.
1426 (read_radix): Likewise.
1428 * io/write.c (extract_int): Use new GFC_INTEGER_LARGEST type.
1429 (extract_real): Use new GFC_REAL_LARGEST type.
1430 (calculate_exp): Likewise.
1431 (calculate_G_format): Likewise.
1432 (output_float): Likewise. Use log10l for long double values.
1433 Add comment for sprintf format. Use GFC_REAL_LARGEST_FORMAT.
1434 (write_l): Use new GFC_INTEGER_LARGEST type.
1435 (write_float): Use new GFC_REAL_LARGEST type.
1436 (write_int): Remove useless special case for (len < 8).
1437 (write_decimal): Use GFC_INTEGER_LARGEST.
1438 (otoa): Use GFC_UINTEGER_LARGEST as argument.
1439 (btoa): Use GFC_UINTEGER_LARGEST as argument.
1440 * runtime/error.c (gfc_itoa): Use GFC_INTEGER_LARGEST as
1442 (xtoa): Use GFC_UINTEGER_LARGEST as argument.
1443 * Makefile.am: Use mk-kinds-h.sh to generate header kinds.h
1444 with all Fortran kinds available.
1445 * configure.ac: Check for strtold and log10l.
1446 * Makefile.in: Regenerate.
1447 * aclocal.m4: Regenerate.
1448 * configure: Regenerate.
1449 * config.h.in: Regenerate.
1450 * mk-kinds-h.sh: Configuration script for available integer
1454 2005-06-18 Janne Blomqvist <jblomqvi@cc.hut.fi>
1456 * unix.c (stream_at_bof): Don't assume that all non-mmapped files
1458 (stream_at_eof): Likewise.
1460 2005-06-18 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1463 * io/read.c (convert_real): strtod can set errno to EINVAL on an
1464 empty string, but we shouldn't have an error in that case.
1466 2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1469 * io/list_read.c (eat_separator): No need to call next_record,
1470 even in non-namelist_mode.
1472 2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1474 * io/transfer.c (formatted_transfer): Fix typo in error message.
1476 2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1479 * io/transfer.c (read_sf): Correct updating of bytes_left field.
1480 (formatted_transfer): Correct updating of bytes_left field and
1481 reformatting code (comments and whitespace).
1482 * io/unix.c (move_pos_offset): "active" field should not be
1483 changed here. Whitespace corrections.
1485 2005-06-15 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1488 * intrinsics/c99_functions.c (scalbn): Provide fallback
1489 implementation for scalbn.
1490 * c99_protos.h: Prototype for scalbn.
1491 * configure.ac: Add check for scalbn.
1492 * configure: Regenerate.
1493 * config.h.in: Regenerate.
1495 2005-06-14 Thomas Koenig <Thomas.Koenig@online.de>
1497 * intrinsics/eoshift0.c: Removed prototype for eoshift0.
1498 * intrinsics/eoshift2.c: Removed prototype for eoshift2.
1500 2005-06-14 Tom Tromey <tromey@redhat.com>
1503 * configure, aclocal.m4, Makefile.in: Rebuilt.
1505 2005-06-12 Thomas Koenig <Thomas.Koenig@online.de>
1508 * intrinsics/eoshift0.c: Add prototype for eoshift0.
1509 * intrinsics/eoshift2.c: Add prototype for eoshift2.
1511 2005-06-12 Steven G. Kargl <kargls@comcast.net>
1512 Thomas Koenig <Thomas.Koenig@online.de>
1514 PR libfortran/PR21797
1515 * m4/cexp.m4 (csqrt`'q): Add type qualifyer to
1517 * generated/exp_c4.c: Regenerated.
1519 2005-06-12 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1522 * io/read.c (read_f): Take care of spaces after initial sign.
1524 2005-06-11 Thomas Koenig <Thomas.Koenig@onlinde.de>
1527 * Makefile.am: Add in_pack_c4.c, in_pack_c8.c, in_unpack_c4.c
1529 * Makefile.in: Regenerate.
1530 * libgfortran.h: Declare internal_pack_c4, internal_pack_c8,
1531 internal_unpack_c4 and internal_unpack_c8.
1532 * m4/in_pack.m4: Use rtype_ccode insteald of rtype_kind
1534 Use sizeof (rtype_name) as size for memory allocation.
1535 * m4/in_unpack.m4: Use rtype_ccode insteald of rtype_kind
1537 Use sizeof (rtype_name) for calculation of sizes for memcpy.
1538 * runtime/in_pack_generic.c: For real, integer and logical
1539 call internal_pack_4 if size==4 and internal_pack_8 if
1541 For complex, call internal_pack_c4 if size==8 and
1542 internal_pack_c8 if size==16.
1543 * runtime/in_unpack_generic.c: For real, integer and logical
1544 call internal_unpack_4 if size==4 and internal_unpack_8 if
1546 For complex, call internal_unpack_c4 if size==8 and
1547 internal_unpack_c8 if size==16.
1548 * generated/in_pack_i4.c: Regenerated.
1549 * generated/in_pack_i8.c: Regenerated.
1550 * generated/in_unpack_i4.c: Regenerated.
1551 * generated/in_unpack_i8.c: Regenerated.
1552 * generated/in_pack_c4.c: New file.
1553 * generated/in_pack_c8.c: New file.
1554 * generated/in_unpack_c4.c: New file.
1555 * generated/in_unpack_c8.c: New file.
1557 2005-06-09 Thomas Koenig <Thomas.Koenig@online.de>
1560 * m4/reshape.m4: Use sizeof (rtype_name) for sizes to be passed
1562 * generated/reshape_c4.c: Regenerated.
1563 * generated/reshape_c8.c: Regenerated.
1564 * generated/reshape_i4.c: Regenerated.
1565 * generated/reshape_i8.c: Regenerated.
1567 2005-06-07 Thomas Koenig <Thomas.Koenig@online.de>
1570 * m4/matmul.m4: Correct zeroing of result for non-packed
1571 arrays with lowest stride is one.
1572 * generated/matmul_c4.c: Regenerated.
1573 * generated/matmul_c8.c: Regenerated.
1574 * generated/matmul_i4.c: Regenerated.
1575 * generated/matmul_i8.c: Regenerated.
1576 * generated/matmul_r4.c: Regenerated.
1577 * generated/matmul_r8.c: Regenerated.
1579 2005-05-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1582 * io/unix.c (fd_close): Add test so that we don't close()
1585 2005-05-29 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1588 * io/format.c (parse_format_list): Set repeat count of $ format
1590 * io/transfer.c (read_sf): Add g.seen_dollar to the test
1591 concerning advancing I/O.
1592 (data_transfer_init): Likewise.
1593 (finalize_transfer): Likewise.
1595 2005-05-27 Thomas Koenig <Thomas.Koenig@online.de>
1597 * runtime/in_pack_generic.c: Adjust copyright years.
1598 (in_pack_generic): Change dimension of auxiliary arrays from
1599 GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
1600 * runtime/in_unpack_generic.c: Adjust copyright years.
1601 (in_unpack_generic): Change dimension of auxiliary arrays from
1602 GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
1604 2005-05-26 Thomas Koenig <Thomas.Koenig@online.de>
1607 * intrinsics/unpack_generic.c: Fix name of routine
1608 on top. Update copyright years.
1609 (unpack1): Remove const from return array descriptor.
1610 rs: New variable, for calculating return sizes.
1611 Populate return array descriptor if ret->data is NULL.
1613 2005-05-22 Peter Wainwright <prw@ceiriog1.demon.co.uk>
1616 * io/write.c (output_float): Rework logic to avoid call to log10
1617 with argument equal to zero.
1619 2005-05-21 Eric Botcazou <ebotcazou@libertysurf.fr>
1621 * configure.ac: Check for trunc and truncf in libm.
1622 * configure: Regenerate.
1623 * config.h.in: Likewise.
1624 * intrinsics/c99_functions.c (trunc, truncf): New functions.
1625 * c99_protos.h (trunc, truncf): Declare them.
1627 2005-05-18 Thomas Koenig <Thomas.Koenig@online.de>
1630 * Makefile.am: Really commit.
1631 * Makefile.in: Really commit.
1633 2005-05-18 Thomas Koenig <Thomas.Koenig@online.de>
1636 * Makefile.am: Add generated/reshape_c4.c and
1637 generated/reshape_c8.c.
1638 * Makefile.in: Regenerated.
1639 * m4/iparm.m4: Define rtype_ccode to be c4 or c8 for
1640 complex types, 4 or 8 otherwise.
1641 * m4/reshape.m4: Use rtype_ccode instead of rtype_kind
1643 * generated/reshape_c4.c: New file.
1644 * generated/reshape_c8.c: New file.
1646 2005-05-16 Andreas Jaeger <aj@suse.de>
1648 * configure.ac: Add additional warning flags.
1649 * configure: Regenerate.
1651 * io/write.c (calculate_G_format): Remove unused parameter.
1652 (output_float): Remove unused parameter.
1653 (write_float): Change callers.
1654 (nml_write_obj): Avoid signed warning.
1655 Make variable const to support -Wwrite-strings.
1657 * io/unix.c (fd_alloc, mmap_open, mmap_sfree, mem_sfree,
1658 mem_truncate): Mark argument as unused.
1660 * io/unit.c (get_unit): Mark argument as unused.
1661 (init_units): Avoid warning about signed comparision.
1663 * io/transfer.c (next_record_r): Remove unused parameter.
1664 (next_record_w): Remove unused parameter.
1665 (next_record): Change callers.
1666 (iolength_transfer): Mark arguments as unused.
1668 * io/open.c: Add initializer.
1670 * io/list_read.c (read_character): Mark argument as unused.
1671 (nml_match_name): Add const to make compile with -Wwrite-strings.
1673 * io/format.c: Add initializer.
1675 2005-05-15 Andreas Jaeger <aj@suse.de>
1677 * m4/eoshift1.m4: Initialize variables to avoid warnings.
1678 * m4/eoshift3.m4: Initialize variables to avoid warnings.
1679 * generated/eoshift1_4.c, generated/eoshift1_8.c,
1680 generated/eoshift3_4.c, generated/eoshift3_8.c: Regenerated.
1682 * intrinsics/spread_generic.c (spread): Initialize variables to
1685 * intrinsics/eoshift0.c (eoshift0): Initialize variables to avoid
1687 * intrinsics/eoshift2.c (eoshift2): Initialize variables to avoid
1690 * io/list_read.c (nml_get_obj_data): Initialize variables to avoid
1693 * intrinsics/pack_generic.c (pack): Remove unneeded calculation.
1695 * m4/matmull.m4 (matmul_): Remove unneeded calculations, fix
1696 pointer cast to avoid warning.
1697 * generated/matmul_l4.c: Regenerated.
1698 * generated/matmul_l8.c: Regenerated.
1700 * Makefile.am: Remove AM_CFLAGS here.
1701 * configure.ac: Define AM_CFLAGS and AM_FCFLAGS so that warnings
1702 are set. Set additionally -Wstrict-prototypes for CFLAGS.
1703 * Makefile.in: Regenerated.
1704 * aclocal.m4: Regenerated.
1705 * configure: Regenerated.
1707 * intrinsics/system_clock.c (system_clock_4, system_clock_8): Add
1708 missing returns, reformat a bit.
1710 * io/write.c (nml_write_obj): Use %d again - and cast to int,
1711 st_sprintf does not handle %ld.
1713 * io/unit.c (is_internal_unit): Add void as parameter list.
1715 * io/transfer.c: Move prototype declarations before the functions.
1717 * runtime/normalize.c (almostone_r4, almostone_r8): Fix parameter
1720 * intrinsics/random.c (KISS_DEFAULT_SEED): Remove extra semicolon.
1722 * io/transfer.c: Do not use empty initializers for global objects.
1723 Add missing initializers.
1725 * io/lock.c: Do not use empty initializers for global objects.
1727 * io/close.c: Add missing initializers.
1729 * runtime/environ.c: Add missing initializers. Do not use empty
1730 initializers for global object.
1731 (init_string): Mark argument as unused.
1733 * runtime/main.c (cleanup): Fix parameter list.
1735 * io/io.h: Fix parameter lists.
1737 * m4/transpose.m4, m4/matmul.m4: Fix pointer cast to avoid
1740 * generated/transpose_c4.c, generated/transpose_c8.c,
1741 generated/transpose_i4.c, generated/transpose_i8.c,
1742 generated/matmul_c4.c, generated/matmul_c8.c,
1743 generated/matmul_i4.c, generated/matmul_i8.c,
1744 generated/matmul_r4.c, generated/matmul_r8.c: Regenerated.
1746 * io/write.c (nml_write_obj): Fix 64-bit problem.
1748 * io/list_read.c (nml_get_obj_data): Add missing braces around
1749 initializer to avoid warnings.
1751 * intrinsics/etime.c (etime_sub): Remove unused variable.
1753 * intrinsics/chdir.c, intrinsics/getlog.c, intrinsics/link.c,
1754 intrinsics/symlnk.c, intrinsics/perror.c: Include <string.h> for
1757 * runtime/string.c (compare0): Remove unused variable.
1758 * io/unit.c (init_units): Remove unused variables.
1759 * intrinsics/getcwd.c (getcwd_i4_sub): Remove unused variable.
1760 * intrinsics/unlink.c (unlink_i4_sub): Remove unused variable.
1761 * intrinsics/stat.c (stat_i4_sub, fstat_i8_sub, fstat_i4_sub,
1762 stat_i8_sub): Remove unused variable.
1764 2005-05-12 Thomas Koenig <Thomas.Koenig@online.de>
1767 * runtime/memory.c: Don't define GFC_CLEAR_MEMORY (it's a
1769 * io/open.c (new_unit): Zero freshly allocated memory for
1771 * io/unit.c (init_units): Zero freshly allocated memory for
1772 STDIN, STDOUT and STDERR.
1773 * io/unix.c (open_internal): Zero freshly allocated memory
1775 (fd_to_stream): Likewise.
1777 2005-05-11 Bud Davis <bdavis@gfortran.org>
1780 * io/unix.c (fd_truncate): update positions when ftruncate
1781 fails (like writing to /dev/null).
1783 2005-05-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1786 * open.c (new_unit): Take care of the case where POSITION_APPEND
1787 is specified (sseek to the end, and set u>-endfile).
1789 2005-05-10 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1792 * Makefile.am (gfor_specific_src): Add 'intrinsics/f2c_intrinsics.F90'
1794 * Makefile.in: Regenerate.
1795 * intrinsics/f2c_specific.F90: New file.
1797 2005-05-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1800 * io/unix.c (fd_to_stream): Add an avoid_mmap argument indicating
1801 we don't we to mmap this stream. Use fd_open instead of mmap_open
1803 (open_external): Call fd_to_stream with avoid_mmap = 0.
1804 (input_stream): Call fd_to_stream with avoid_mmap = 1.
1805 (output_stream): Likewise.
1806 (error_stream): Likewise.
1808 2005-05-09 Mike Stump <mrs@apple.com>
1810 * configure: Regenerate.
1812 2005-05-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1815 * io/read.c (read_f): Accept 'e', 'E', 'd' and 'D' as first
1816 non-blank characters of a real number.
1818 2005-05-04 Thomas Koenig <Thomas.Koenig@online.de>
1821 * m4/cshift1.m4: Change dimension of auxiliary arrays from
1822 GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
1823 * m4/eoshift1.m4: Likewise.
1824 * m4/eoshift3.m4: Likewise.
1825 * m4/ifunction.m4: Likewise.
1826 * m4/in_pack.m4: Likewise.
1827 * m4/in_unpack.m4: Likewise.
1828 * intrinsics/cshift0.c: Likewise.
1829 * intrinsics/eoshift0.c: Likewise.
1830 * intrinsics/eoshift2.c: Likewise.
1831 * intrinsics/random.c: Likewise.
1832 * intrinsics/spread_generic.c: Likewise.
1833 * intrinsics/stat.c: Likewise.
1834 * generated/all_l4.c: Regenerated.
1835 * generated/all_l8.c: Regenerated.
1836 * generated/any_l4.c: Regenerated.
1837 * generated/any_l8.c: Regenerated.
1838 * generated/count_4_l4.c: Regenerated.
1839 * generated/count_4_l8.c: Regenerated.
1840 * generated/count_8_l4.c: Regenerated.
1841 * generated/count_8_l8.c: Regenerated.
1842 * generated/cshift1_4.c: Regenerated.
1843 * generated/cshift1_8.c: Regenerated.
1844 * generated/eoshift1_4.c: Regenerated.
1845 * generated/eoshift1_8.c: Regenerated.
1846 * generated/eoshift3_4.c: Regenerated.
1847 * generated/eoshift3_8.c: Regenerated.
1848 * generated/in_pack_i4.c: Regenerated.
1849 * generated/in_pack_i8.c: Regenerated.
1850 * generated/in_unpack_i4.c: Regenerated.
1851 * generated/in_unpack_i8.c: Regenerated.
1852 * generated/maxloc0_4_i4.c: Regenerated.
1853 * generated/maxloc0_4_i8.c: Regenerated.
1854 * generated/maxloc0_4_r4.c: Regenerated.
1855 * generated/maxloc0_4_r8.c: Regenerated.
1856 * generated/maxloc0_8_i4.c: Regenerated.
1857 * generated/maxloc0_8_i8.c: Regenerated.
1858 * generated/maxloc0_8_r4.c: Regenerated.
1859 * generated/maxloc0_8_r8.c: Regenerated.
1860 * generated/maxloc1_4_i4.c: Regenerated.
1861 * generated/maxloc1_4_i8.c: Regenerated.
1862 * generated/maxloc1_4_r4.c: Regenerated.
1863 * generated/maxloc1_4_r8.c: Regenerated.
1864 * generated/maxloc1_8_i4.c: Regenerated.
1865 * generated/maxloc1_8_i8.c: Regenerated.
1866 * generated/maxloc1_8_r4.c: Regenerated.
1867 * generated/maxloc1_8_r8.c: Regenerated.
1868 * generated/maxval_i4.c: Regenerated.
1869 * generated/maxval_i8.c: Regenerated.
1870 * generated/maxval_r4.c: Regenerated.
1871 * generated/maxval_r8.c: Regenerated.
1872 * generated/minloc0_4_i4.c: Regenerated.
1873 * generated/minloc0_4_i8.c: Regenerated.
1874 * generated/minloc0_4_r4.c: Regenerated.
1875 * generated/minloc0_4_r8.c: Regenerated.
1876 * generated/minloc0_8_i4.c: Regenerated.
1877 * generated/minloc0_8_i8.c: Regenerated.
1878 * generated/minloc0_8_r4.c: Regenerated.
1879 * generated/minloc0_8_r8.c: Regenerated.
1880 * generated/minloc1_4_i4.c: Regenerated.
1881 * generated/minloc1_4_i8.c: Regenerated.
1882 * generated/minloc1_4_r4.c: Regenerated.
1883 * generated/minloc1_4_r8.c: Regenerated.
1884 * generated/minloc1_8_i4.c: Regenerated.
1885 * generated/minloc1_8_i8.c: Regenerated.
1886 * generated/minloc1_8_r4.c: Regenerated.
1887 * generated/minloc1_8_r8.c: Regenerated.
1888 * generated/minval_i4.c: Regenerated.
1889 * generated/minval_i8.c: Regenerated.
1890 * generated/minval_r4.c: Regenerated.
1891 * generated/minval_r8.c: Regenerated.
1892 * generated/product_c4.c: Regenerated.
1893 * generated/product_c8.c: Regenerated.
1894 * generated/product_i4.c: Regenerated.
1895 * generated/product_i8.c: Regenerated.
1896 * generated/product_r4.c: Regenerated.
1897 * generated/product_r8.c: Regenerated.
1898 * generated/sum_c4.c: Regenerated.
1899 * generated/sum_c8.c: Regenerated.
1900 * generated/sum_i4.c: Regenerated.
1901 * generated/sum_i8.c: Regenerated.
1902 * generated/sum_r4.c: Regenerated.
1903 * generated/sum_r8.c: Regenerated.
1905 2005-04-30 Thomas Koenig <Thomas.Koenig@online.de>
1908 libgfortran.h: Change typedef of index_type from size_t
1911 2005-04-30 Paul Thomas <pault@gcc.gnu.org>
1914 * generated/matmul_r8.c: Remove incorrect assertions.
1915 * generated/matmul_c4.c: Regenerate
1916 * generated/matmul_c8.c: Regenerate
1917 * generated/matmul_i4.c: Regenerate
1918 * generated/matmul_i8.c: Regenerate
1919 * generated/matmul_r4.c: Regenerate
1920 * generated/matmul_r8.c: Regenerate
1922 2005-04-29 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1924 * configure.ac: Check for ftruncate and chsize.
1925 * io/unix.c (fd_truncate): Provide chsize as alternative to
1927 * config.h.in: Regenerate.
1928 * configure: Regenerate.
1930 2004-04-29 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1932 * intrinsics/rename.c: Add missing #includes.
1934 2004-04-28 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1936 * AUTHORS, COPYING, INSTALL, NEWS, README: Remove.
1938 2005-04-26 David Edelsohn <edelsohn@gnu.org>
1941 * io/rewind.c (st_rewind): Flush the stream when resetting the mode
1942 from WRITING to READING.
1944 2005-04-22 Paul Thomas <pault@gcc.gnu.org>
1945 Jerry DeLisle <jvdelisle@verizon.net>
1947 * io/write.c (nml_write_obj): Provide 1 more byte for ext_name.
1948 * io/list_read.c (nml_get_obj_data): Put extra brackets in get_mem
1949 call for ext_name. These fix the bug reported by Jerry DeLisle to
1950 the fortran list and are based on his suggested fix.
1952 2005-04-22 Thomas Koenig <Thomas.Koenig@online.de>
1957 * m4/reshape.m4 (reshape_`'rtype_kind): rs, rex: New
1958 variables, to be used in calculation of return array sizes.
1959 Populate return array descriptor if ret->data is NULL.
1960 Fix condition for early return (it used to test something
1961 undefined if order was used).
1962 Remove duplicate check wether pad is used.
1963 * intrinsics/reshape_generic.c (reshape_generic): Likewise.
1964 Fix a few places where the wrong variables were set.
1965 * generated/reshape_i4.c: Regenerated.
1966 * generated/reshape_i8.c: Regenerated.
1968 2005-04-18 Paul Thomas <pault@gcc.gnu.org>
1970 * io/list_read.c (nml_touch_nodes, nml_read_obj,
1971 nml_get_obj_data): Fix memory leaks in code for derived types.
1973 2005-04-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1976 * io/inquire.c (inquire_via_unit): Check for the gfc_unit being
1977 NULL when setting ioparm.sequential.
1979 2005-04-17 Thomas Koenig <Thomas.Koenig@online.de>
1982 * m4/reshape.m4 (reshape_`'rtype_kind): Change dimension
1983 of auxiliary arrays from GFC_MAX_DIMENSIONS - 1 to
1985 * intrinsics/reshape_generic.c (reshape_generic): Likewise.
1986 * generated/reshape_i4.c: Regenerated.
1987 * generated/reshape_i8.c: Regenerated.
1989 2005-04-17 Paul Thomas <pault@gcc.gnu.org>
1991 * io/list_read.c (eat_separator): at_eol = 1 replaced
1992 (zapped at some time?).
1994 2005-04-17 Paul Thomas <pault@gcc.gnu.org>
1996 PR libgfortran/12884
1997 PR libgfortran/17285
1998 PR libgfortran/18122
1999 PR libgfortran/18210
2000 PR libgfortran/18392
2001 PR libgfortran/18591
2002 PR libgfortran/18879
2003 * io/io.h (nml_ls): Declare.
2004 (namelist_info): Modify for arrays.
2005 * io/list_read.c (namelist_read): Reduced to call to new functions.
2006 (match_namelist_name): Simplified.
2007 (nml_query): Handles stdin queries ? and =?. New function.
2008 (nml_get_obj_data): Parses object name. New function.
2009 (touch_nml_nodes): Marks objects for read. New function.
2010 (untouch_nml_nodes): Resets objects. New function.
2011 (parse_qualifier): Parses and checks qualifiers. New function
2012 (nml_read_object): Reads and stores object data. New function.
2013 (eat_separator): No new_record on '/' in namelist.
2014 (finish_separator): No new_record on '/' in namelist.
2015 (read_logical): Error return for namelist.
2016 (read_integer): Error return for namelist.
2017 (read_complex): Error return for namelist.
2018 (read_real): Error return for namelist.
2019 * io/lock.c (library_end): Free extended namelist_info types.
2020 * io/transfer.c (st_set_nml_var): Modified for arrays.
2021 (st_set_nml_var_dim): Dimension descriptors. New function.
2022 * io/write.c (namelist_write): Reduced to call to new functions.
2023 (nml_write_obj): Writes output for object. New function.
2024 (write_integer): Suppress leading blanks for repeat counts.
2025 (write_int): Suppress leading blanks for repeat counts.
2026 (write_float): Suppress leading blanks for repeat counts.
2027 (output_float): Suppress leading blanks for repeat counts.
2029 2005-04-15 Thomas Koenig <Thomas.Koenig@online.de>
2032 * intrinsics/spread_generic.c (spread): Remove const from
2033 return array descriptor.
2034 New variables: rrank (rank of return array), rs (for
2035 calculating the size of the return array), srank (rank
2036 of the source array).
2037 Generate runtime error if the dim= argument is larger than
2038 the rank of the return array.
2039 Generate runtime error if the needed rank of the return
2040 array is larger than 7.
2041 If ret->data is null, populate the return array descriptor
2042 and initialize the variables for the actual operation.
2043 Otherwise, set ret->dim[0].stride to one if it is zero.
2044 Change second, independent use of variable dim to srank.
2046 2005-04-12 Mike Stump <mrs@apple.com>
2048 * configure: Regenerate.
2050 2005-04-13 Thomas Koenig <Thomas.Koenig@online.de>
2053 * m4/iforeach.c (name`'rtype_qual`_'atype_code): Add TODO
2054 that setting correct strides is a front end job.
2055 (`m'name`'rtype_qual`_'atype_code): Likewise. If mask has
2056 a lowest stride of 0, adjust to 1.
2057 * m4/ifunction.c (name`'rtype_qual`_'atype_code): Add TODO
2058 that setting correct strides is a front end job.
2059 (`m'name`'rtype_qual`_'atype_code): Likewise. If mask has
2060 a lowest stride of 0, adjust to 1.
2061 * maxloc0_4_i4.c: Regenerated
2062 * maxloc0_4_i8.c: Regenerated
2063 * maxloc0_4_r4.c: Regenerated
2064 * maxloc0_4_r8.c: Regenerated
2065 * maxloc0_8_i4.c: Regenerated
2066 * maxloc0_8_i8.c: Regenerated
2067 * maxloc0_8_r4.c: Regenerated
2068 * maxloc0_8_r8.c: Regenerated
2069 * maxloc1_4_i4.c: Regenerated
2070 * maxloc1_4_i8.c: Regenerated
2071 * maxloc1_4_r4.c: Regenerated
2072 * maxloc1_4_r8.c: Regenerated
2073 * maxloc1_8_i4.c: Regenerated
2074 * maxloc1_8_i8.c: Regenerated
2075 * maxloc1_8_r4.c: Regenerated
2076 * maxloc1_8_r8.c: Regenerated
2077 * maxval_i4.c: Regenerated
2078 * maxval_i8.c: Regenerated
2079 * maxval_r4.c: Regenerated
2080 * maxval_r8.c: Regenerated
2081 * minloc0_4_i4.c: Regenerated
2082 * minloc0_4_i8.c: Regenerated
2083 * minloc0_4_r4.c: Regenerated
2084 * minloc0_4_r8.c: Regenerated
2085 * minloc0_8_i4.c: Regenerated
2086 * minloc0_8_i8.c: Regenerated
2087 * minloc0_8_r4.c: Regenerated
2088 * minloc0_8_r8.c: Regenerated
2089 * minloc1_4_i4.c: Regenerated
2090 * minloc1_4_i8.c: Regenerated
2091 * minloc1_4_r4.c: Regenerated
2092 * minloc1_4_r8.c: Regenerated
2093 * minloc1_8_i4.c: Regenerated
2094 * minloc1_8_i8.c: Regenerated
2095 * minloc1_8_r4.c: Regenerated
2096 * minloc1_8_r8.c: Regenerated
2097 * minval_i4.c: Regenerated
2098 * minval_i8.c: Regenerated
2099 * minval_r4.c: Regenerated
2100 * minval_r8.c: Regenerated
2101 * product_c4.c: Regenerated
2102 * product_c8.c: Regenerated
2103 * product_i4.c: Regenerated
2104 * product_i8.c: Regenerated
2105 * product_r4.c: Regenerated
2106 * product_r8.c: Regenerated
2107 * sum_c4.c: Regenerated
2108 * sum_c8.c: Regenerated
2109 * sum_i4.c: Regenerated
2110 * sum_i8.c: Regenerated
2111 * sum_r4.c: Regenerated
2112 * sum_r8.c: Regenerated
2114 2005-04-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2117 * runtime/environ.c (init_unsigned_integer): Function for
2118 environment variables we want to be positive.
2119 (init_integer): Function to allow negative environment
2120 variables (e.g. for GFORTRAN_STDIN_UNIT).
2122 2005-04-10 Thomas Koenig <Thomas.Koenig@online.de>
2132 * io/transfer.c (top level): eor_condition: New static variable.
2133 (read_sf): Remove unnecessary zeroing of buffer (there is enough
2134 information in its length).
2135 Return a string of length 0 (to be padded by caller) if EOR was
2137 Remove erroneous special casing of EOR for standard input.
2138 Set eor_condition for non-advancing I/O if an end of line was
2140 Increment ioparm.size if necessary.
2141 (formatted_transfer): Skip the function if there is an EOR condition.
2142 (data_transfer_init): Initialize eor_condition to zero (false).
2143 (next_record_r): Clear sf_seen_eor if a \n has been seen already.
2144 (finalize_transfer): If there is an EOR condition, raise the error.
2146 2005-04-09 Bud Davis <bdavis@gfortran.org>
2147 Steven G. Kargl <kargls@comcast.net>
2150 * io/transfer.c (data_transfer_init): truncate an existing
2151 file on the first write.
2153 2005-04-09 Thomas Koenig <Thomas.Koenig@online.de>
2157 * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): ditto.
2158 If retarray->data is NULL (i.e. the front end does not
2159 know the rank and dimenson of the array), fill in its
2160 properties and allocate memory.
2161 Change the assertions about rank and dimension of retarray into
2162 runtime errors and only check them for retarray->data != NULL.
2163 Do the same for correcting the stride from 0 to 1 in retarray.
2164 (`m'name`'rtype_qual`_'atype_code): Likewise.
2165 * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Likewise.
2166 Change assertion about rank of array to runtime error.
2167 (`m'name`'rtype_qual`_'atype_code): Likewise.
2168 * generated/all_l4.c: Regenerated.
2169 * generated/all_l8.c: Regenerated.
2170 * generated/any_l4.c: Regenerated.
2171 * generated/any_l8.c: Regenerated.
2172 * generated/count_4_l4.c: Regenerated.
2173 * generated/count_4_l8.c: Regenerated.
2174 * generated/count_8_l4.c: Regenerated.
2175 * generated/count_8_l8.c: Regenerated.
2176 * generated/maxloc0_4_i4.c: Regenerated.
2177 * generated/maxloc0_4_i8.c: Regenerated.
2178 * generated/maxloc0_4_r4.c: Regenerated.
2179 * generated/maxloc0_4_r8.c: Regenerated.
2180 * generated/maxloc0_8_i4.c: Regenerated.
2181 * generated/maxloc0_8_i8.c: Regenerated.
2182 * generated/maxloc0_8_r4.c: Regenerated.
2183 * generated/maxloc0_8_r8.c: Regenerated.
2184 * generated/maxloc1_4_i4.c: Regenerated.
2185 * generated/maxloc1_4_i8.c: Regenerated.
2186 * generated/maxloc1_4_r4.c: Regenerated.
2187 * generated/maxloc1_4_r8.c: Regenerated.
2188 * generated/maxloc1_8_i4.c: Regenerated.
2189 * generated/maxloc1_8_i8.c: Regenerated.
2190 * generated/maxloc1_8_r4.c: Regenerated.
2191 * generated/maxloc1_8_r8.c: Regenerated.
2192 * generated/maxval_i4.c: Regenerated.
2193 * generated/maxval_i8.c: Regenerated.
2194 * generated/maxval_r4.c: Regenerated.
2195 * generated/maxval_r8.c: Regenerated.
2196 * generated/minloc0_4_i4.c: Regenerated.
2197 * generated/minloc0_4_i8.c: Regenerated.
2198 * generated/minloc0_4_r4.c: Regenerated.
2199 * generated/minloc0_4_r8.c: Regenerated.
2200 * generated/minloc0_8_i4.c: Regenerated.
2201 * generated/minloc0_8_i8.c: Regenerated.
2202 * generated/minloc0_8_r4.c: Regenerated.
2203 * generated/minloc0_8_r8.c: Regenerated.
2204 * generated/minloc1_4_i4.c: Regenerated.
2205 * generated/minloc1_4_i8.c: Regenerated.
2206 * generated/minloc1_4_r4.c: Regenerated.
2207 * generated/minloc1_4_r8.c: Regenerated.
2208 * generated/minloc1_8_i4.c: Regenerated.
2209 * generated/minloc1_8_i8.c: Regenerated.
2210 * generated/minloc1_8_r4.c: Regenerated.
2211 * generated/minloc1_8_r8.c: Regenerated.
2212 * generated/minval_i4.c: Regenerated.
2213 * generated/minval_i8.c: Regenerated.
2214 * generated/minval_r4.c: Regenerated.
2215 * generated/minval_r8.c: Regenerated.
2216 * generated/product_c4.c: Regenerated.
2217 * generated/product_c8.c: Regenerated.
2218 * generated/product_i4.c: Regenerated.
2219 * generated/product_i8.c: Regenerated.
2220 * generated/product_r4.c: Regenerated.
2221 * generated/product_r8.c: Regenerated.
2222 * generated/sum_c4.c: Regenerated.
2223 * generated/sum_c8.c: Regenerated.
2224 * generated/sum_i4.c: Regenerated.
2225 * generated/sum_i8.c: Regenerated.
2226 * generated/sum_r4.c: Regenerated.
2227 * generated/sum_r8.c: Regenerated.
2229 2005-04-09 Thomas Koenig <Thomas.Koenig@online.de>
2232 * runtime/string.c (compare0): Use fstrlen() to
2233 strip trailing blanks from option string.
2235 2005-04-09 Andrew Pinski <pinskia@physics.uc.edu>
2238 * format.c (parse_format_list): Allow an optional comma
2239 between descriptors.
2241 2005-04-08 Eric Botcazou <ebotcazou@libertysurf.fr>
2243 * io/backspace.c (unformatted_backspace): Do not dereference
2244 the pointer to the stream.
2246 2005-04-07 Andrew Pinski <pinskia@physics.uc.edu>
2249 * configure.ac (extra_ldflags_libgfortran): Set for *-darwin* to
2250 "-Wl,-single_module".
2251 * configure: Regenerate.
2252 * Makefile.am (libgfortran_la_LDFLAGS): Add extra_ldflags_libgfortran.
2253 * Makefile.in: Regenerate.
2255 2005-04-05 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2258 * write.c (write_float): A G edit descriptor may locally change
2259 the scale factor, but it needs to be restored afterwards.
2261 2005-04-03 Dale Ranta <dir@lanl.gov>
2262 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2268 * io/backspace.c (unformatted_backspace): Fix error in arithmetic.
2269 (st_backspace): When in WRITING mode, we flush and falling back
2270 into READING mode. In all cases, correctly position the stream.
2272 2005-03-31 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2275 * io/inquire.c (inquire_via_unit): Non-opened units should still be
2276 reported by an INQUIRE statement as existing.
2277 * io/transfer.c (data_transfer_init): Never accept negative units.
2279 2005-03-29 Dale Ranta <dir@lanl.gov>
2280 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2283 * io/open.c (st_open): call library_end() before returning even if
2286 2005-03-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2289 * list_read.c (next_char, eat_separator, finish_separator, read_real)
2290 (namelist_read): Add support for '\r' as well as '\n' as EOL
2294 * list_read.c (read_sf): Add a '\r' in a test to support DOS
2295 line-endings when line length is exceeded.
2297 2005-03-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2300 * io/format.c (parse_format_list): format node for colon edit
2301 descriptor needs a repeat counter set to 1.
2303 2005-02-24 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2305 * config.h.in: Regenerate.
2307 2005-02-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2310 * write.c (output_float): Handling the "F0.d" format similarly as
2311 commercial compilers.
2313 2005-03-22 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2315 * Makefile.am: Added new files.
2316 * Makefile.in: Regenerate.
2317 * aclocal.m4: Regenerate.
2318 * configure.ac: add checks for signal.h headers file, as well as
2319 following functions: chdir, strerror, getlogin, gethostname, kill,
2320 link, symlink, perror, sleep, time.
2321 * configure: Regenerate.
2322 * intrinsics/chdir.c, intrinsics/gerror.c, intrinsics/getlog.c,
2323 intrinsics/hostnm.c, intrinsics/ierrno.c, intrinsics/kill.c,
2324 intrinsics/link.c, intrinsics/perror.c, intrinsics/rename.c,
2325 intrinsics/sleep.c, intrinsics/symlnk.c, intrinsics/time.c: Newly
2326 implementend g77 intrinsics.
2328 2005-03-21 Zack Weinberg <zack@codesourcery.com>
2330 * configure.ac: Do not invoke TL_AC_GCC_VERSION.
2331 In all substitutions, leave gcc_version to be expanded by the Makefile.
2332 * aclocal.m4, configure: Regenerate.
2333 * Makefile.am: Set gcc_version.
2334 * Makefile.in: Regenerate.
2336 2005-03-16 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2339 * open.c (new_unit): set record length to max_offset rather than
2340 using a hard-coded limit (which was too low).
2342 2005-03-16 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2345 * write.c (output_float): special check when writing 0.0 with
2348 2005-03-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2351 * write.c (output_float): Adds a nzero_real variable to store
2352 the number of leading zeros whatever the format width is. Corrects
2353 the rounding of numbers less than 10^(-width). Fixes typo in an
2354 error message. Updates copyright years
2356 2005-02-27 Toon Moene <toon@moene.indiv.nluug.nl>
2358 * runtime/environ.c: Update copyright years.
2360 2005-02-27 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
2362 * io/write.c: Update copyright years.
2364 2005-02-27 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2367 * io/write.c (output_float): Added special check for value 0.0 in
2370 2004-02-27 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
2372 * io/write.c (output_float): Fix typo in condition.
2374 2005-02-25 Peter O'Gorman <peter@pogma.com>
2375 Toon Moene <toon@moene.indiv.nluug.nl>
2377 PR libgfortran/17748
2378 * runtime/environ.c: Remove references to environ.
2379 (show_variables): remove GFORTRAN_UNBUFFERED_* and
2380 GFORTRAN_NAME_* because they require environ.
2381 (pattern_scan): Remove function.
2383 2004-02-22 Paul Thomas <paulthomas2@wannado.fr>
2384 Bud Davis <bdavis@gfortran.org>
2386 * io/list_read.c (read_real): Handle separators properly
2387 in list directed read.
2389 2004-02-21 Bud Davis <bdavis@gfortran.org>
2392 * io/transfer.c (write_constant_string): accept an 'h' as
2393 the start of a hollerith format string.
2395 2005-02-21 Eric Botcazou <ebotcazou@libertysurf.fr>
2398 * intrinsics/c99_functions.c (nextafterf): Special-case infinite
2401 2005-02-21 Steven G. Kargl <kargls@comcast.net>
2403 * io/write.c (output_float): Typo in error meesage.
2405 2005-02-20 Steven G. Kargl <kargls@comcast.net>
2408 * intrinsic/args.c (iargc): Off by 1.
2410 2005-02-19 Steven G. Kargl <kargls@comcast.net>
2412 * intrinsic/date_and_time.c: Fix conformance problems.
2414 2005-02-01 Paul Thomas <paulthomas2@wanadoo.fr>
2416 PR libgfortran/19363
2417 PR libgfortran/19691
2418 * libgfortran.h (isfinite): Work around broken isfinite(x) in Cygwin.
2420 2005-01-30 Bud Davis <bdavis@gfortran.org>
2423 * io/inquire.c (inquire_via_unit): Use correct variable for
2426 2005-01-29 Thomas Koenig <Thomas.Koenig@online.de>
2429 * io/transfer.c (data_transfer_init): eor requires advance="NO".
2431 2005-01-25 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
2434 * io/read.c (read_f): Don't free uninitialized pointer.
2436 2005-01-23 James A. Morrison <phython@gcc.gnu.org>
2437 Paul Brook <paul@codesourcery.com>
2440 * Makefile.am: Add transpose_c4.c and transpose_c8.c.
2441 * intrinsics/cshift0.c: Use separate optimized loops for complex types.
2442 * m4/transpose.m4: Include type letter in function name.
2443 * Makefile.in: Regenerate.
2444 * generated/transpose_*.c: Regenerate.
2446 2005-01-22 Thomas Koenig <Thomas.Koenig@online.de>
2449 * io/transfer.c (finalize_transfer): Don't do anything if
2450 there is an error condition.
2452 2005-01-22 David Edelsohn <edelsohn@gnu.org>
2454 PR libgfortran/19052
2455 * libgfortran.h (options_t): Add stderr_unit.
2456 * io/io.h (error_stream): Declare.
2457 * io/open.c (new_unit): Do not terminate abnormally if opening
2458 file preconnected to stdin, stdout, or stderr.
2459 * io/unit.c (init_units): Initialize stderr_unit.
2460 * io/unix.c (error_stream): New function.
2461 * runtime/environ.c (GFORTRAN_STDERR_UNIT): New environment variable.
2463 2005-01-22 Thomas Koenig <Thomas.Koenig@online.de>
2466 * io/unix.c (regular_file): No need to change flags->action
2467 if an error occurs. Document this.
2468 No need to call stat() for STATUS_OLD, open() will
2470 For ACTION_UNSPECIFIED, try open for read-write, then for
2471 read-only if open fails with EACCES, then for write-only
2472 if that fails with EACCES again.
2473 * io/unix.c (open_external): Document changed behavior of
2476 2005-01-22 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
2479 * io/io.h (st_parameter): Use 'GFC_INTEGER_4' instead of 'int',
2480 use CHARACTER macro for definition of string valued paramters.
2482 2005-01-22 Bud Davis <bdavis9659@comcast.net>
2485 * io/inquire.c(inquire_via_unit): implement POSITION=.
2486 * io/transfer.c(next_record): update position for
2488 * io/rewind.c(st_rewind): update position for
2491 2005-01-16 Bud Davis <bdavis9659@comcast.net>
2494 * io/transfer.c (us_read): no bytes available is not a
2497 2005-01-15 Bud Davis <bdavis9659@comcast.net>
2500 * io/transfer.c (st_write_done): only truncate when it
2503 2005-01-12 Toon Moene <toon@moene.indiv.nluug.nl>
2506 c99_protos.h: License changed to GPL+exception.
2507 libgfortran.h: Ditto.
2508 intrinsics/abort.c: Ditto.
2509 intrinsics/args.c: Ditto.
2510 intrinsics/associated.c: Ditto.
2511 intrinsics/bessel.c: Ditto.
2512 intrinsics/c99_functions.c: Ditto.
2513 intrinsics/cpu_time.c: Ditto.
2514 intrinsics/cshift0.c: Ditto.
2515 intrinsics/date_and_time.c: Ditto.
2516 intrinsics/env.c: Ditto.
2517 intrinsics/eoshift0.c: Ditto.
2518 intrinsics/eoshift2.c: Ditto.
2519 intrinsics/erf.c: Ditto.
2520 intrinsics/etime.c: Ditto.
2521 intrinsics/exit.c: Ditto.
2522 intrinsics/flush.c: Ditto.
2523 intrinsics/fnum.c: Ditto.
2524 intrinsics/getXid.c: Ditto.
2525 intrinsics/getcwd.c: Ditto.
2526 intrinsics/ishftc.c: Ditto.
2527 intrinsics/mvbits.c: Ditto.
2528 intrinsics/pack_generic.c: Ditto.
2529 intrinsics/rand.c: Ditto.
2530 intrinsics/random.c: Ditto.
2531 intrinsics/reshape_generic.c: Ditto.
2532 intrinsics/reshape_packed.c: Ditto.
2533 intrinsics/size.c: Ditto.
2534 intrinsics/spread_generic.c: Ditto.
2535 intrinsics/stat.c: Ditto.
2536 intrinsics/string_intrinsics.c: Ditto.
2537 intrinsics/system.c: Ditto.
2538 intrinsics/system_clock.c: Ditto.
2539 intrinsics/transpose_generic.c: Ditto.
2540 intrinsics/umask.c: Ditto.
2541 intrinsics/unlink.c: Ditto.
2542 intrinsics/unpack_generic.c: Ditto.
2543 io/backspace.c: Ditto.
2545 io/endfile.c: Ditto.
2547 io/inquire.c: Ditto.
2549 io/list_read.c: Ditto.
2554 io/transfer.c: Ditto.
2563 m4/cshift1.m4: Ditto.
2565 m4/dotprod.m4: Ditto.
2566 m4/dotprodc.m4: Ditto.
2567 m4/dotprodl.m4: Ditto.
2568 m4/eoshift1.m4: Ditto.
2569 m4/eoshift3.m4: Ditto.
2570 m4/exponent.m4: Ditto.
2571 m4/fraction.m4: Ditto.
2573 m4/iforeach.m4: Ditto.
2574 m4/ifunction.m4: Ditto.
2575 m4/in_pack.m4: Ditto.
2576 m4/in_unpack.m4: Ditto.
2578 m4/matmul.m4: Ditto.
2579 m4/matmull.m4: Ditto.
2580 m4/maxloc0.m4: Ditto.
2581 m4/maxloc1.m4: Ditto.
2582 m4/maxval.m4: Ditto.
2583 m4/minloc0.m4: Ditto.
2584 m4/minloc1.m4: Ditto.
2585 m4/minval.m4: Ditto.
2587 m4/nearest.m4: Ditto.
2589 m4/product.m4: Ditto.
2590 m4/reshape.m4: Ditto.
2591 m4/set_exponent.m4: Ditto.
2593 m4/specific.m4: Ditto.
2594 m4/specific2.m4: Ditto.
2596 m4/transpose.m4: Ditto.
2598 runtime/environ.c: Ditto.
2599 runtime/error.c: Ditto.
2600 runtime/in_pack_generic.c: Ditto.
2601 runtime/in_unpack_generic.c: Ditto.
2602 runtime/main.c: Ditto.
2603 runtime/memory.c: Ditto.
2604 runtime/normalize.c: Ditto.
2605 runtime/pause.c: Ditto.
2606 runtime/select.c: Ditto.
2607 runtime/stop.c: Ditto.
2608 runtime/string.c: Ditto.
2609 generated/_abs_c4.f90: Regenerated.
2610 generated/_abs_c8.f90: Regenerated.
2611 generated/_abs_i4.f90: Regenerated.
2612 generated/_abs_i8.f90: Regenerated.
2613 generated/_abs_r4.f90: Regenerated.
2614 generated/_abs_r8.f90: Regenerated.
2615 generated/_acos_r4.f90: Regenerated.
2616 generated/_acos_r8.f90: Regenerated.
2617 generated/_aint_r4.f90: Regenerated.
2618 generated/_aint_r8.f90: Regenerated.
2619 generated/_anint_r4.f90: Regenerated.
2620 generated/_anint_r8.f90: Regenerated.
2621 generated/_asin_r4.f90: Regenerated.
2622 generated/_asin_r8.f90: Regenerated.
2623 generated/_atan2_r4.f90: Regenerated.
2624 generated/_atan2_r8.f90: Regenerated.
2625 generated/_atan_r4.f90: Regenerated.
2626 generated/_atan_r8.f90: Regenerated.
2627 generated/_conjg_c4.f90: Regenerated.
2628 generated/_conjg_c8.f90: Regenerated.
2629 generated/_cos_c4.f90: Regenerated.
2630 generated/_cos_c8.f90: Regenerated.
2631 generated/_cos_r4.f90: Regenerated.
2632 generated/_cos_r8.f90: Regenerated.
2633 generated/_cosh_r4.f90: Regenerated.
2634 generated/_cosh_r8.f90: Regenerated.
2635 generated/_dim_i4.f90: Regenerated.
2636 generated/_dim_i8.f90: Regenerated.
2637 generated/_dim_r4.f90: Regenerated.
2638 generated/_dim_r8.f90: Regenerated.
2639 generated/_exp_c4.f90: Regenerated.
2640 generated/_exp_c8.f90: Regenerated.
2641 generated/_exp_r4.f90: Regenerated.
2642 generated/_exp_r8.f90: Regenerated.
2643 generated/_log10_r4.f90: Regenerated.
2644 generated/_log10_r8.f90: Regenerated.
2645 generated/_log_c4.f90: Regenerated.
2646 generated/_log_c8.f90: Regenerated.
2647 generated/_log_r4.f90: Regenerated.
2648 generated/_log_r8.f90: Regenerated.
2649 generated/_mod_i4.f90: Regenerated.
2650 generated/_mod_i8.f90: Regenerated.
2651 generated/_mod_r4.f90: Regenerated.
2652 generated/_mod_r8.f90: Regenerated.
2653 generated/_sign_i4.f90: Regenerated.
2654 generated/_sign_i8.f90: Regenerated.
2655 generated/_sign_r4.f90: Regenerated.
2656 generated/_sign_r8.f90: Regenerated.
2657 generated/_sin_c4.f90: Regenerated.
2658 generated/_sin_c8.f90: Regenerated.
2659 generated/_sin_r4.f90: Regenerated.
2660 generated/_sin_r8.f90: Regenerated.
2661 generated/_sinh_r4.f90: Regenerated.
2662 generated/_sinh_r8.f90: Regenerated.
2663 generated/_sqrt_c4.f90: Regenerated.
2664 generated/_sqrt_c8.f90: Regenerated.
2665 generated/_sqrt_r4.f90: Regenerated.
2666 generated/_sqrt_r8.f90: Regenerated.
2667 generated/_tan_r4.f90: Regenerated.
2668 generated/_tan_r8.f90: Regenerated.
2669 generated/_tanh_r4.f90: Regenerated.
2670 generated/_tanh_r8.f90: Regenerated.
2671 generated/all_l4.c: Regenerated.
2672 generated/all_l8.c: Regenerated.
2673 generated/any_l4.c: Regenerated.
2674 generated/any_l8.c: Regenerated.
2675 generated/count_4_l4.c: Regenerated.
2676 generated/count_4_l8.c: Regenerated.
2677 generated/count_8_l4.c: Regenerated.
2678 generated/count_8_l8.c: Regenerated.
2679 generated/cshift1_4.c: Regenerated.
2680 generated/cshift1_8.c: Regenerated.
2681 generated/dotprod_c4.c: Regenerated.
2682 generated/dotprod_c8.c: Regenerated.
2683 generated/dotprod_i4.c: Regenerated.
2684 generated/dotprod_i8.c: Regenerated.
2685 generated/dotprod_l4.c: Regenerated.
2686 generated/dotprod_l8.c: Regenerated.
2687 generated/dotprod_r4.c: Regenerated.
2688 generated/dotprod_r8.c: Regenerated.
2689 generated/eoshift1_4.c: Regenerated.
2690 generated/eoshift1_8.c: Regenerated.
2691 generated/eoshift3_4.c: Regenerated.
2692 generated/eoshift3_8.c: Regenerated.
2693 generated/exp_c4.c: Regenerated.
2694 generated/exp_c8.c: Regenerated.
2695 generated/exponent_r4.c: Regenerated.
2696 generated/exponent_r8.c: Regenerated.
2697 generated/fraction_r4.c: Regenerated.
2698 generated/fraction_r8.c: Regenerated.
2699 generated/hyp_c4.c: Regenerated.
2700 generated/hyp_c8.c: Regenerated.
2701 generated/in_pack_i4.c: Regenerated.
2702 generated/in_pack_i8.c: Regenerated.
2703 generated/in_unpack_i4.c: Regenerated.
2704 generated/in_unpack_i8.c: Regenerated.
2705 generated/matmul_c4.c: Regenerated.
2706 generated/matmul_c8.c: Regenerated.
2707 generated/matmul_i4.c: Regenerated.
2708 generated/matmul_i8.c: Regenerated.
2709 generated/matmul_l4.c: Regenerated.
2710 generated/matmul_l8.c: Regenerated.
2711 generated/matmul_r4.c: Regenerated.
2712 generated/matmul_r8.c: Regenerated.
2713 generated/maxloc0_4_i4.c: Regenerated.
2714 generated/maxloc0_4_i8.c: Regenerated.
2715 generated/maxloc0_4_r4.c: Regenerated.
2716 generated/maxloc0_4_r8.c: Regenerated.
2717 generated/maxloc0_8_i4.c: Regenerated.
2718 generated/maxloc0_8_i8.c: Regenerated.
2719 generated/maxloc0_8_r4.c: Regenerated.
2720 generated/maxloc0_8_r8.c: Regenerated.
2721 generated/maxloc1_4_i4.c: Regenerated.
2722 generated/maxloc1_4_i8.c: Regenerated.
2723 generated/maxloc1_4_r4.c: Regenerated.
2724 generated/maxloc1_4_r8.c: Regenerated.
2725 generated/maxloc1_8_i4.c: Regenerated.
2726 generated/maxloc1_8_i8.c: Regenerated.
2727 generated/maxloc1_8_r4.c: Regenerated.
2728 generated/maxloc1_8_r8.c: Regenerated.
2729 generated/maxval_i4.c: Regenerated.
2730 generated/maxval_i8.c: Regenerated.
2731 generated/maxval_r4.c: Regenerated.
2732 generated/maxval_r8.c: Regenerated.
2733 generated/minloc0_4_i4.c: Regenerated.
2734 generated/minloc0_4_i8.c: Regenerated.
2735 generated/minloc0_4_r4.c: Regenerated.
2736 generated/minloc0_4_r8.c: Regenerated.
2737 generated/minloc0_8_i4.c: Regenerated.
2738 generated/minloc0_8_i8.c: Regenerated.
2739 generated/minloc0_8_r4.c: Regenerated.
2740 generated/minloc0_8_r8.c: Regenerated.
2741 generated/minloc1_4_i4.c: Regenerated.
2742 generated/minloc1_4_i8.c: Regenerated.
2743 generated/minloc1_4_r4.c: Regenerated.
2744 generated/minloc1_4_r8.c: Regenerated.
2745 generated/minloc1_8_i4.c: Regenerated.
2746 generated/minloc1_8_i8.c: Regenerated.
2747 generated/minloc1_8_r4.c: Regenerated.
2748 generated/minloc1_8_r8.c: Regenerated.
2749 generated/minval_i4.c: Regenerated.
2750 generated/minval_i8.c: Regenerated.
2751 generated/minval_r4.c: Regenerated.
2752 generated/minval_r8.c: Regenerated.
2753 generated/nearest_r4.c: Regenerated.
2754 generated/nearest_r8.c: Regenerated.
2755 generated/pow_c4_i4.c: Regenerated.
2756 generated/pow_c4_i8.c: Regenerated.
2757 generated/pow_c8_i4.c: Regenerated.
2758 generated/pow_c8_i8.c: Regenerated.
2759 generated/pow_i4_i4.c: Regenerated.
2760 generated/pow_i4_i8.c: Regenerated.
2761 generated/pow_i8_i4.c: Regenerated.
2762 generated/pow_i8_i8.c: Regenerated.
2763 generated/pow_r4_i4.c: Regenerated.
2764 generated/pow_r4_i8.c: Regenerated.
2765 generated/pow_r8_i4.c: Regenerated.
2766 generated/pow_r8_i8.c: Regenerated.
2767 generated/product_c4.c: Regenerated.
2768 generated/product_c8.c: Regenerated.
2769 generated/product_i4.c: Regenerated.
2770 generated/product_i8.c: Regenerated.
2771 generated/product_r4.c: Regenerated.
2772 generated/product_r8.c: Regenerated.
2773 generated/reshape_i4.c: Regenerated.
2774 generated/reshape_i8.c: Regenerated.
2775 generated/set_exponent_r4.c: Regenerated.
2776 generated/set_exponent_r8.c: Regenerated.
2777 generated/shape_i4.c: Regenerated.
2778 generated/shape_i8.c: Regenerated.
2779 generated/sum_c4.c: Regenerated.
2780 generated/sum_c8.c: Regenerated.
2781 generated/sum_i4.c: Regenerated.
2782 generated/sum_i8.c: Regenerated.
2783 generated/sum_r4.c: Regenerated.
2784 generated/sum_r8.c: Regenerated.
2785 generated/transpose_i4.c: Regenerated.
2786 generated/transpose_i8.c: Regenerated.
2787 generated/trig_c4.c: Regenerated.
2788 generated/trig_c8.c: Regenerated.
2790 2005-01-07 Bud Davis <bdavis9659@comcast.net>
2793 * transfer.c (next_record_r): always skip the
2794 eol search if it was found during sf_read.
2796 2004-12-27 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2798 * libgfortran/libgfortran.h (GFC_UINTEGER_1, GFC_UINTEGER_2):
2800 * intrinsics/ishftc.c: Update copyright years.
2801 (ishftc8): Change 'shift' and 'size' to GFC_INTEGER_4.
2802 * intrinsics/mvbits.c: Correct non-ASCII character in my name.
2803 Add implementations for GFC_INTEGER_1 and GFC_INTEGER_2.
2805 2004-12-23 Bud Davis <bdavis9659@comcast.net>
2808 * io/tranfer.c (formatted_transfer): moved check for
2809 format reversion inside the processing loop.
2811 2004-12-19 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2814 * libgfortran.h (itoa): Rename to gfc_itoa.
2815 * io/write.c (itoa): Same.
2816 * runtime/environ.c (itoa): Same.
2817 * runtime/error.c (itoa): Same.
2819 2004-12-15 Bud Davis <bdavis9659@comcast.net>
2820 Steven G. Kargl <kargls@comcast.net>
2823 * io/list_read.c (read_real): do not push back a comma when
2824 it delimits a real value without a decimal point
2826 2004-12-14 Steve Ellcey <sje@cup.hp.com>
2828 * libgfortran/io/transfer.c (us_read): Use memcpy/memset
2829 instead of assignment to fill unaligned buffer.
2831 (next_record_w): Ditto.
2833 2004-12-14 Steven G. Kargl <kargls@comcast.net>
2836 * gfortran.h: typedef GFC_INTEGER_1 and GFC_INTEGER_2
2837 * intrinsics/cshift0.c (cshift0_1,cshift0_2): New functions.
2838 * intrinsics/eoshift0.c (eoshift0_1,eoshift0_2): New functions.
2839 * intrinsics/eoshift2.c (eoshift2_1,eoshift2_2): New functions.
2841 2004-12-13 David Edelsohn <edelsohn@gnu.org>
2843 * io/transfer.c (read_sf): Change bitwise "and" to logical "and".
2845 2004-12-12 Richard Henderson <rth@redhat.com>
2847 * intrinsics/cshift0.c, intrinsics/eoshift0.c, intrinsics/eoshift2.c,
2848 intrinsics/pack_generic.c, intrinsics/reshape_generic.c,
2849 intrinsics/spread_generic.c, intrinsics/transpose_generic.c,
2850 intrinsics/unpack_generic.c, m4/cshift1.m4, m4/dotprod.m4,
2851 m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4, m4/eoshift3.m4,
2852 m4/iforeach.m4, m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4,
2853 m4/reshape.m4, m4/shape.m4, m4/transpose.m4: Use standard prefix
2855 * generated/*: Rebuild.
2857 2004-12-12 Richard Henderson <rth@redhat.com>
2859 * acinclude.m4 (LIBGFOR_CHECK_ATTRIBUTE_VISIBILITY): New.
2860 (LIBGFOR_CHECK_ATTRIBUTE_DLLEXPORT): New.
2861 (LIBGFOR_CHECK_ATTRIBUTE_ALIAS): New.
2862 * configure.ac: Use them.
2863 * configure, config.h.in, aclocal.m4: Rebuild.
2864 * libgfortran.h (prefix): Remove.
2865 (PREFIX, IPREFIX): New.
2866 (sym_rename, sym_rename1, sym_rename2): New.
2867 (internal_proto, export_proto, export_proto_np): New.
2868 (iexport_proto, iexport): New.
2869 (iexport_data_proto, iexport_data): New.
2870 * intrinsics/abort.c, intrinsics/args.c, intrinsics/associated.c,
2871 intrinsics/cpu_time.c, intrinsics/cshift0.c,
2872 intrinsics/date_and_time.c, intrinsics/env.c, intrinsics/eoshift0.c,
2873 intrinsics/eoshift2.c, intrinsics/etime.c, intrinsics/exit.c,
2874 intrinsics/flush.c, intrinsics/fnum.c, intrinsics/getXid.c,
2875 intrinsics/getcwd.c, intrinsics/ishftc.c, intrinsics/mvbits.c,
2876 intrinsics/pack_generic.c, intrinsics/rand.c, intrinsics/random.c,
2877 intrinsics/reshape_generic.c, intrinsics/size.c,
2878 intrinsics/spread_generic.c, intrinsics/stat.c,
2879 intrinsics/string_intrinsics.c, intrinsics/system.c,
2880 intrinsics/system_clock.c, intrinsics/transpose_generic.c,
2881 intrinsics/umask.c, intrinsics/unlink.c, intrinsics/unpack_generic.c,
2882 io/backspace.c, io/close.c, io/endfile.c, io/inquire.c, io/io.h,
2883 io/open.c, io/rewind.c, io/transfer.c, libgfortran.h, m4/cshift1.m4,
2884 m4/dotprod.m4, m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4,
2885 m4/eoshift3.m4, m4/exponent.m4, m4/fraction.m4, m4/iforeach.m4,
2886 m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4, m4/nearest.m4,
2887 m4/pow.m4, m4/reshape.m4, m4/set_exponent.m4, m4/shape.m4,
2888 m4/transpose.m4, runtime/environ.c, runtime/error.c,
2889 runtime/in_pack_generic.c, runtime/in_unpack_generic.c,
2890 runtime/main.c, runtime/memory.c, runtime/pause.c, runtime/select.c,
2891 runtime/stop.c: Use them to mark symbols internal or external.
2892 * generated/*: Rebuild.
2894 2004-12-09 David Edelsohn <edelsohn@gnu.org>
2897 Revert 2004-12-07 change.
2898 * Makefile.am (AM_MAKEFLAGS): Delete.
2899 * Makefile.in: Regenerate.
2901 2004-12-07 Steve Ellcey <sje@cup.hp.com>
2903 * libgfortran/Makefile.am (AM_MAKEFLAGS): New.
2904 * libgfortran/Makefile.in: Regenerate
2906 2004-12-07 Steve Ellcey <sje@cup.hp.com>
2908 * io/io.h (open_external): Change prototype.
2909 * io/unix.c (regular_file): Change prototype and set flags->action if
2911 (open_external): Ditto.
2912 * io/open.c (new_unit): Let open_external set flags->action.
2914 2004-12-07 Eric Botcazou <ebotcazou@libertysurf.fr>
2916 * configure.ac: Check for ieeefp.h. Check for fabsf in libm.
2917 * configure: Regenerate.
2918 * config.h.in: Likewise.
2919 * c99_protos.h: New file.
2920 * libgfortran.h: Include c99_protos.h and conditionally ieeefp.h.
2921 * intrinsics/c99_functions.c (fabsf): New function.
2923 2004-12-06 Richard Henderson <rth@redhat.com>
2925 * intrinsics/cshift0.c, intrinsics/eoshift0.c, intrinsics/eoshift2.c,
2926 intrinsics/pack_generic.c, intrinsics/string_intrinsics.c,
2927 intrinsics/transpose_generic.c, m4/ifunction.m4, m4/matmul.m4,
2928 m4/matmull.m4, m4/transpose.m4: Use internal_malloc_size instead
2930 * generated/*: Rebuild.
2932 2004-12-06 Richard Henderson <rth@redhat.com>
2934 * intrinsics/c99_functions.c, intrinsics/eoshift0.c,
2935 intrinsics/eoshift2.c, intrinsics/exit.c, intrinsics/flush.c,
2936 intrinsics/ishftc.c, intrinsics/mvbits.c, intrinsics/pack_generic.c,
2937 intrinsics/random.c, intrinsics/reshape_generic.c, intrinsics/size.c,
2938 intrinsics/spread_generic.c, intrinsics/stat.c,
2939 intrinsics/string_intrinsics.c, intrinsics/system_clock.c,
2940 intrinsics/transpose_generic.c, intrinsics/unlink.c,
2941 intrinsics/unpack_generic.c, io/backspace.c, io/format.c,
2942 io/list_read.c, io/lock.c, io/open.c, io/transfer.c, io/unix.c,
2943 io/write.c, runtime/environ.c, runtime/error.c,
2944 runtime/in_pack_generic.c, runtime/in_unpack_generic.c, runtime/main.c,
2945 runtime/memory.c, runtime/pause.c, runtime/stop.c,
2946 runtime/string.c: Whitespace fixes.
2948 2004-12-06 Richard Henderson <rth@redhat.com>
2950 * Makefile.am: Generate all m4 output under $(srcdir).
2951 * Makefile.in: Regenerate.
2953 2004-12-02 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2956 * io/transfer.c (unformatted_read, unformatted_write): width of
2957 a COMPLEX is twice its kind.
2959 2004-12-02 Richard Sandiford <rsandifo@redhat.com>
2961 * configure.ac: Use TL_AC_GCC_VERSION to set gcc_version.
2962 * configure, aclocal.m4, Makefile.in: Regenerate.
2964 2004-12-02 Bud Davis <bdavis9659@comcast.net>
2967 * io/unix.c (fd_alloc_w_at): Update file_length when extending.
2968 * io/backspace.c (formatted_backspace): Reset endfile after backspace.
2970 2004-12-02 Bud Davis <bdavis9659@comcast.net>
2972 * io/inquire.c (inquire_via_unit): do not allow a direct access
2973 file to be opened for sequential I/O.
2975 2004-12-02 Steven G. Kargl <kargls@comcast.net>
2976 Paul Brook <paul@codesourcery.com>
2978 * intrinsics/flush.c: New file.
2979 * intrinsics/fnum.c: ditto
2980 * intrinsics/stat.c: ditto
2981 * io/io.h (unit_to_fd): Add prototype.
2982 * io/unix.c (unit_to_fd): New function.
2983 * configure.ac: Add test for members of struct stat. Check for
2984 sys/types.h and sys/stat.h
2985 * Makefile.am: Add intrinsics/{flush.c,fnum.c,stat.c}
2986 * configure.in: Regenerate.
2987 * config.h.in: Regenerate.
2988 * Makefile.in: Regenerate.
2990 2004-12-01 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2992 * Makefile.am (AM_CPPFLAGS): Use -iquote instead of -I.
2994 2004-11-28 Bud Davis <bdavis9659@comcast.net>
2996 * io/unix.c (mmap_alloc_w_a): check for a write to a location
2997 less than the mapped area.
2999 2004-11-27 Bud Davis <bdavis9659@comcast.net>
3002 * io/endfile.c (st_endfile): flush the stream before truncating.
3004 2004-11-24 Kelley Cook <kcook@gcc.gnu.org>
3006 * configure: Regenerate for libtool change.
3008 2004-11-22 Steven Bosscher <stevenb@suse.de>
3011 * configure.ac: Check for finite in libm.
3012 * libgfortran.h: Define isfinite macro if not defined.
3013 * intrinsics/c99_functions.c: Use defined(fpclassify) instead of
3015 * io/write.c (write_float): Use isfinite instead of finite.
3016 * configure, config.h.in: Rebuilt.
3018 2004-11-20 Roger Sayle <roger@eyesopen.com>
3020 * io/write.c (write_float, list_formatted_write): Fix indentation.
3022 2004-11-20 Eric Botcazou <ebotcazou@libertysurf.fr>
3025 * acinclude.m4 (LIBGFOR_TARGET_ILP32): New check.
3026 * configure.ac: Include LIBGFOR_TARGET_ILP32.
3027 * configure: Regenerate.
3028 * config.h.in: Likewise.
3029 * libgfortran.h: Provide default definitions for C99 types
3030 on ILP32 targets that don't have them.
3033 * configure.ac: Check for snprintf.
3034 * configure: Regenerate.
3035 * config.h.in: Likewise.
3036 * intrinsics/date_and_time.c (date_and_time): Do not
3037 use snprinf if it is not available.
3038 * io/write.c (output_float): Likewise.
3040 2004-11-20 Steven G. Kargl <kargls@comcast.net>
3042 * Makefile.am: Add intrinsics/{umask.c,unlink.c,exit.c}
3043 * Makefile.in: Regenerated
3044 * intrinsics/umask.c: New file
3045 * intrinsics/unlink.c: ditto
3046 * intrinsics/exit.c: ditto
3048 2004-11-18 Victor Leikehman <lei@il.ibm.com>
3050 * m4/matmul.m4: Loops reordered to improve cache behavior.
3051 * generated/matmul_??.c: Regenerated.
3053 2004-11-10 Paul Brook <paul@codesourcery.com>
3056 * configure.ac: Check for strtof.
3057 * configure: Regenerate.
3058 * config.h.in: Regenerate.
3059 * io/read.c (convert_real): Use strtof if available.
3060 (convert_precision_real): Remove.
3061 (read_f): Avoid poor exponentiation algorithm.
3063 2004-11-05 Andreas Schwab <schwab@suse.de>
3065 * configure.ac: Use AC_PROG_FC, FC and FCFLAGS instead of
3066 AC_PROG_F77, F77 and FFLAGS.
3067 * Makefile.am (selected_int_kind.inc, selected_real_kind.inc): Use
3068 FCCOMPILE instead of F77COMPILE.
3069 * configure, Makefile.in: Regenerate.
3071 2004-11-05 Kelley Cook <kcook@gcc.gnu.org>
3073 * acinclude.m4: Properly quote AC_CACHE_CHECK.
3074 * Makefile.am: Add in ACLOCAL_AMFLAGS.
3075 * aclocal.m4, configure, Makefile.in: Regenerate.
3077 2004-10-30 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
3079 * config.h.in: Regenerate.
3080 * configure: Regenerate.
3081 * configure.ac (AC_CHECK_FUNCS): Add mkstemp.
3082 * io/unix.c (S_IRGRP): Define if undefined.
3086 (tempfile): Use mktemp if mkstemp missing, fix typos.
3088 2004-10-30 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
3090 * intrinsics/system.c ("libgfortran.h"): Move after system headers.
3092 2004-10-30 Canqun Yang <canqun@nudt.edu.cn>
3094 * intrinsics/rand.c (irand): Handle NULL argument.
3096 2004-10-07 Paul Brook <paul@codesourcery.com>
3098 * io/transfer.c (finalize_transfer): Free internal streams.
3099 * io/unix.c (mem_close): Free stream object.
3101 2004-10-07 Paul Brook <paul@codesourcery.com>
3103 * intrinsics/string_intrinsics.c (string_verify): Fix off by one
3106 2004-10-06 Paul Brook <paul@codesourcery.com>
3109 * io/transfer.c (data_transfer_init): Reset sf_seen_eor.
3111 2004-10-04 Andrew Pinski <pinskia@physics.uc.edu>
3113 * intrinsics/mvbits.c: Commit the file.
3115 2004-10-04 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3118 * intrinsics/pack_generic.c (__pack): Allocate memory for return array
3119 if not done by caller.
3120 (__pack_s): New function.
3121 * runtime/memory.c (internal_malloc, internal_malloc64): Allow
3122 allocating zero memory.
3125 * Makefile.am (gfor_helper_src): Add intrinsics/mvbits.h.
3126 * Makefile.in: Regenerate.
3127 * intrinsics/mvbits.h: New file.
3130 * intrinsics/system.c: New file.
3131 * Makefile.am: Add dependency for the new file.
3132 * Makefile.in: Regenerate.
3134 2004-10-04 Paul Brook <paul@codesourcery.com>
3135 Bud Davis <bdavis9659@comcast.net>
3139 * io/format.c (parse_format_list): Set repeat count for S, SP, SS,
3141 * io/write.c (output_float): Don't output minus zero.
3143 2004-10-03 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
3145 * intrinsics/abort.c ("libgfortran.h"): Move.
3146 * intrinsics/date_and_time.c ("libgfortran.h"): Same.
3147 * intrinsics/write.c ("libgfortran.h"): Same.
3149 2004-09-26 Tobias Schlueter <tobis.schlueter@physik.uni-muenchen.de>
3152 * config.h.in (HAVE_POWF): Undefine.
3153 * configure.ac: Check for 'powf' in library.
3154 * configure: Regenerate.
3155 * intrinsics/c99_functions.c (powf): New function.
3157 2004-09-24 Tobias Schlueter <tobis.schlueter@physik.uni-muenchen.de>
3159 * intrinsics/etime.c (etime_): New function.
3161 2004-09-21 Steven G. Kargl <kargls@comcast.net>
3163 * libgfortran.h: define gfc_alloca()
3164 * intrinsics/env.c (getenv, get_environment_variable_i4): Use it.
3166 2004-09-21 Bud Davis <bdavis9659@comcast.net>
3169 * io/list_read.c (namelist_read): ignore spaces after
3170 the '=' for namelist reads.
3172 2004-09-15 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
3174 * config.h.in: Regenerate.
3175 * configure: Regenerate.
3176 * configure.ac (AC_CHECK_HEADERS): Check for sys/mman.h.
3177 * unix.c: Include stdio.h.
3178 (HAVE_SYS_MMAN_H): Check.
3179 (PROT_READ, PROT_WRITE): Provide default definitions.
3181 2004-09-15 Steven G. Kargl <kargls@comcast.net>
3183 * intrincics/getcwd.c: New file.
3184 * Makefile.am: Add getcwd.c.
3185 * Makefile.in: Regenerated.
3187 2004-09-15 Steven G. Kargl <kargls@comcast.net>
3188 Paul Brook <paul@codesourcery.com>
3190 * intrinsics/env.c (getenv, get_environmental_variable): Remove
3191 trailing white space. Use alloca. Honour trim_name.
3193 2004-09-13 Bud Davis <bdavis9659@comcast.net>
3197 * io/list_read.c (list_formatted_read): Handle trailing spaces
3200 2004-09-06 Steven G. Kargl <kargls@comcast.net>
3202 * io/write.c (output_float): Typo in comment. Remove debugging
3203 printf. Fix format for FP of form 1e10.
3205 2004-09-03 Richard Henderson <rth@redhat.com>
3207 * intrinsics/cshift0.c (DEF_COPY_LOOP, copy_loop_int, copy_loop_long,
3208 copy_loop_double, copy_loop_ldouble): New.
3209 (__cshift0): Make shift type ssize_t. Use % operator instead of
3210 div. Use specialized versions of copy loop depending on the shape.
3212 2004-09-02 Paul Brook <paul@codesourcery.com>
3214 * io/format.c (parse_format_list): Set repeat count for P descriptors.
3215 * write.c (output_float): Fix condition. Correctly handle nonzero
3218 2004-09-01 Eric Botcazou <ebotcazou@libertysurf.fr>
3220 * mk-sik-inc.sh: Use a temporary string instead of 'echo -n'.
3221 * mk-srk-inc.sh: Likewise.
3223 2004-09-01 Paul Brook <paul@codesourcery.com>
3225 * runtime/error.c (generate_error): Set both iostat and
3228 2004-08-31 Paul Brook <paul@codesourcery.com>
3231 * io/list_read.c (next_char): Don't signal EOF for internal files.
3232 * io/unix.c (mem_alloc_r_at): Don't return NULL for incomplete reads.
3234 2004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3236 * io/unit.c: Separate copyright years by ','.
3237 (compare, insert_unit, delete_unit, is_internal_unit, close_units):
3238 Remove blank line in beginning of function.
3239 (get_unit): Simplify code.
3241 2004-08-31 Paul Brook <paul@codesourcery.com>
3243 * io/unit.c (get_unit): Remove superfluous if.
3245 2004-08-31 Paul Brook <paul@codesourcery.com>
3247 * io/transfer.c (read_sf): Rename uinty to readlen. Detect EOF.
3248 (finalize_transfer): Move setjmp after namlist IO.
3249 * io/unix.c (mem_alloc_r_at): Calculate remaining length correctly.
3251 2004-08-31 Paul Brook <paul@codesourcery.com>
3253 * list_read.c (eat_separator): Set at_eo when a '/' is seen.
3255 2004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3257 * libgfortran.h: Replace 'gfc_strlen_type' by
3258 'gfc_charlen_type'. Update comment accordingly.
3259 * intrinsics/args.c, intrinsics/env.c, io/io.h, io/transfer.c:
3260 Replace all occurences of 'gfc_strlen_type' by 'gfc_charlen_type'.
3262 2004-08-31 Paul Brook <paul@codesourcery.com>
3264 * libgfortran.h: Add comments.
3266 2004-08-30 Richard Henderson <rth@redhat.com>
3268 * Makefile.am (gfor_helper_src): Split selected_kind.f90.
3269 (gfor_built_src): Add selected_int_kind.inc selected_real_kind.inc.
3270 (selected_int_kind.inc selected_real_kind.inc): New rules.
3271 * Makefile.in: Regenerate.
3272 * mk-sik-inc.sh, mk-srk-inc.sh: New files.
3273 * intrinsics/selected_int_kind.f90: Split from selected_kind.f90,
3274 include table of detected kinds.
3275 * intrinsics/selected_real_kind.f90: Similarly.
3277 2004-08-29 Steven G. Kargl <kargls@comcast.net>
3278 Paul Brook <paul@codesourcery.com>
3280 * intrinsics/bessel.c: New file.
3281 * intrinsics/erf.c: New file.
3282 * Makefie.am: Add intrinsics/bessel.c and intrinsics/erf.c.
3283 * configure.ac: Test for C99 Bessel and Error functions.
3284 * Makefile.in: Regenerate.
3285 * config.h.in: Regenerate.
3286 * configure: Regenerate.
3288 2004-08-29 Steven G. Kargl <kargls@comcast.net>
3289 Paul Brook <paul@codesourcery.com>
3291 * Makefile.am: Add intrinsics/getXid.c.
3292 * configure.ac: Add tests for get{g,p,u}id.
3293 * config.h.in: Regenerate.
3294 * Makefile.in: Regenerate.
3295 * configure: Regenerate.
3297 2004-08-28 Paul Brook <paul@codesourcery.com>
3300 * libgfortran.h (rtoa): Remove prototype.
3301 * runtime/error.c (rtoa): Remove.
3302 * io/write.c (calculate_G_format): Don't add blanks if E format is
3303 used. Add correct number of blanks when exponent width is specified.
3304 (output_float): Rewrite.
3306 2004-08-27 Paul Brook <paul@codesourcery.com>
3308 * io/rewind.c (st_rewind): Reset unit to read mode.
3310 2004-08-27 Bud Davis <bdavis9659@comcast.net>
3313 * io/io.h: created typedef for unit_mode.
3314 * io/io.h (gfc_unit): added mode to unit structure.
3315 * io/transfer.c (data_transfer_init): flush if a write then
3316 read is done on a unit (direct access files).
3317 * io/rewind.c (st_rewind): Used unit mode instead of global.
3319 2004-08-24 Bud Davis <bdavis9659@comcast.net>
3322 * runtime/error.c (itoa): keep from overflowing during
3323 mod operation by using unsigned variable.
3325 2004-08-24 Bud Davis <bdavis9659@comcast.net>
3328 * runtime/string_intrinsics.c (string_index):check for
3329 substring longer than string.
3331 2004-08-24 David Edelsohn <edelsohn@gnu.org>
3333 * Makefile.am (libgfortran_la_LDFLAGS): Add -lm.
3334 * Makefile.in: Rebuilt.
3336 2004-08-23 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3338 * io/io.h, io/list_read.c, io/open.c, io/transfer.c, io/write.c:
3339 Fix formatting issues, update copyright years.
3341 2004-08-21 Bud Davis <bdavis9659@comcast.net>
3344 * io/transfer.c (next_record_w): Do not blank pad.
3345 * io/transfer.c (next_record): Take into account partial records.
3347 2004-08-18 Victor Leikehman <lei@il.ibm.com>
3350 * io/transfer.c (st_set_nml_var)
3351 * io/write.c (namelist_write): Allow var_name and var_name_len to be
3352 null. For strings, use string_length field instead of len.
3353 * io/io.h (struct namelist_type): New field string_length.
3354 (st_set_nml_var_char): New argument string_length.
3356 2004-08-13 Bud Davis <bdavis9659@comcast.net>
3359 * io/open.c (st_open): use flags instead of the unit structure.
3361 2004-08-10 Victor Leikehman <lei@il.ibm.com>
3363 * io/list_read.c (namelist_read): Convert variable names
3364 to lower case, so that mixed-case names are recognized.
3365 Don't read beyond terminating slash.
3367 2004-08-09 Richard Henderson <rth@redhat.com>
3368 Roger Sayle <roger@eyesopen.com>
3370 * intrinsics/c99_functions.c (nextafterf): New implementation that
3371 works correctly with denormalized numbers.
3373 2004-08-09 Victor Leikehman <lei@il.ibm.com>
3375 * m4/matmul.m4, m4/matmull.m4, intrinsics/eoshift0.c,
3376 intrinsics/eoshift2.c, intrinsics/transpose_generic.c:
3377 Allocate space if return value has NULL in its data field.
3378 * generated/*.c: Regenerate.
3380 2004-08-06 Janne Blomqvist <jblomqvi@cc.hut.fi>
3382 * intrinsics/env.c: New file.
3383 * Makefile.am: Add env.c to build.
3384 * Makefile.in: Regenerate.
3386 2004-08-05 Victor Leikehman <lei@il.ibm.com>
3388 PR libgfortran/16704
3389 * io/read.c (read_radix): Understand letters f and F as hex digits.
3391 2004-08-04 Victor Leikehman <lei@il.ibm.com>
3393 * libgfortran.h (array_t, size0) New declarations.
3394 * m4/ifunction.m4, m4/transpose.m4, intrinsics/cshift0.c: Allocate
3395 space if return value descriptor has NULL in its data field,
3396 and initialize bounds and stride.
3397 * intrinsics/size.c (array_t, size0): Declarations moved to
3399 * generated/*.c: Regenerate.
3401 2004-08-03 Roger Sayle <roger@eyesopen.com>
3403 PR libgfortran/16137
3404 * configure.ac: Add tests for acosf, asinf, atan2f, atanf, ceilf,
3405 copysignf, cosf, coshf, expf, floorf, frexpf, hypotf, logf, log10f,
3406 scalbnf, sinf, sinhf, sqrtf, tanf and tanhf in libm.
3407 * config.h.in: Regenerate.
3408 * configure: Regenerate.
3410 * instrinsics/c99_functions.c (acosf, asinf, atan2f, atanf, ceilf,
3411 copysignf, cosf, coshf, expf, floorf, frexpf, hypotf, logf, log10f,
3412 nextafterf, scalbnf, sinf, sinhf, sqrtf, tanf, tanhf): New stub
3413 implementations for targets that don't support C99 float functions.
3415 2004-08-01 Roger Sayle <roger@eyesopen.com>
3417 * io/write.c (write_float): Use the slightly more portable isnan
3418 in preference to isinf.
3420 2004-07-18 Bud Davis <bdavis9659@comcast.net>
3422 * configure.ac: Add check for LFS support.
3423 * configure: Regenerate
3425 2004-07-11 Paul Brook <paul@codesourcery.com>
3428 * m4/cexp.m4 (carg): Return -pi to pi.
3429 * generated/exp_c?.c: Regenerate.
3431 2004-07-08 Andreas Krebbel <krebbel1@de.ibm.com>
3434 * libgfortran/io/write.c: (write_float): Added length check.
3435 Remove pointless memset calls.
3437 2004-07-04 Bud Davis <bdavis9659@comcast.net>
3438 Paul Brook <paul@codesourcery.com>
3441 * io/transfer.c(us_write): set recl for seq unform writes to max size.
3442 * io/transfer.c(data_transfer_init): handle un-opened seq unform unit.
3443 * io/unix.c(fd_alloc_w_at): handle requests at start, fd_flush at
3445 * io/unix.c(is_seekable): set based upon the file/device, not the
3446 method being used to access it (fd or mmap).
3447 * io/unix.c(fd_flush): don't set file_size if !seekable.
3448 * io/unix.c(fd_truncate: ditto.
3450 2004-07-04 Janne Blomqvist <jblomqvi@cc.hut.fi>
3451 Paul Brook <paul@codesourcery.com>
3455 * libgfortran.h (gfc_strlen_type): Define.
3456 * intrinsics/args.c (getarg): Rename ...
3457 (getarg_i4): ... to this.
3458 (getarg_i8, get_command_argument_i4, get_command_argument_i8,
3459 get_command_i4, get_command_i8): New functions.
3461 2004-07-04 Matthias Klose <doko@debian.org>
3463 * libtool-version: New.
3464 * Makefile.am (libgfortran_la_LDFLAGS): Use -version-info for soname.
3465 * Makefile.in: Regenerate.
3466 * configure.ac: Remove libtool_VERSION macro
3467 * configure: Regenerate
3469 2004-06-30 Steve Kargl <sgk@troutmask.apl.washington.edu>
3470 Steven Bosscher <stevenb@suse.de>
3472 * intrinsics/rand.c (rand): Wrap the irand() call from the previous
3475 2004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3476 Paul Brook <paul@codesourcery.com>
3478 * runtime/normalize.c (normalize_r4_i4, normalize_r8_i8): Fix
3480 * intrinsics/rand.c (rand): Call irand() in call to normalize_r4_i4.
3482 2004-06-27 Bud Davis <bdavis9659@comcast.net>
3485 * io/write.c (write_float): check signbit for Infinity.
3487 2004-06-26 Bud Davis <bdavis9659@comcast.net>
3490 * unix.c(regular_file): create file if it does not exist.
3492 2004-06-24 Andrew Pinski <apinski@apple.com>
3494 * configure.ac: Remove check for libmx.
3495 * configure: Regenerate.
3497 2004-06-22 Janne Blomqvist <jblomqvi@cc.hut.fi>
3500 * inquire.c (st_inquire): Add comment
3501 * io.h (st_parameter): Add iolength.
3502 (st_iolength, st_iolength_done): Declare.
3503 * transfer.c (iolength_transfer, iolength_transfer_init,
3504 st_iolength, st_iolength_done): New functions.
3506 2004-06-21 Steven G. Kargl <kargls@comcast.net>
3508 * etime.c (etime_sub): Remove array rank check;
3509 Add check for sufficient space.
3511 2004-06-19 Bud Davis <bdavis9659@comcast.net>
3514 * io/list_read.c(set_value): fixed spelling.
3516 2004-06-19 Bud Davis <bdavis9659@comcast.net>
3519 * io/list_read.c(set_value): don't copy if the string is null.
3521 2004-06-14 Bud Davis <bdavis9659@comcast.net>
3524 * intrinsics/c99_functions.c: Use fpclassify if it exists.
3526 2004-06-13 Paul Brook <paul@codesourcery.com>
3528 * Makefile.am (gfor_helper_src): Add runtime/normalize.f90.
3529 * configure.ac: Add checks for nextafter and nextafterf.
3530 * Makefile.in, config.h.in, configure: Regenerate.
3531 * libgfortran.h (normalize_r4_i4, normalize_r8_i8): Declare.
3532 * intrinsics/rand.c (rand): Use normalize_r4_i4.
3533 * intrinsics/random.c (random_r4): Use normalize_r4_i4.
3534 (random_r8): Use normalize_r8_i8.
3535 * runtime/normalize.c: New file.
3537 2004-06-13 Steven G. Kargl <kargls@comcast.net>
3538 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3540 * random.c: Fix several spelling and formatting mistakes in
3542 (random_r8): Fix loop to make random numbers range in [0,1(.
3545 2004-06-13 Steven G. Kargl <kargls@comcast.net>
3547 * random.c (random_r4): Burn a random number.
3548 (random_r8): fix infinite loop.
3550 2004-06-12 Bud Davis <bdavis9659@comcast.net>
3551 Steve Kargl <sgk@troutmask.apl.washington.edu>
3554 * intrinsics/c99_functions.c: New file.
3555 * Makefile.am: Add new file.
3556 * configure.ac: Added test for round/roundf.
3557 * Makefile.in: Regenerate.
3558 * configure: Regenerate.
3559 * configure.h.in: Regenerate.
3561 2004-06-12 Steven G. Kargl <kargls@comcast.net>
3563 * Makefile.am: Add rand.c and etime.c
3564 * Makefile.in: Regenerated.
3565 * aclocal.in: Regenerated.
3566 * cpu_time.c (second_sub, second): New functions.
3567 * rand.c (irand, rand, srand): New file.
3568 * etime.c (etime_sub, etime): New file.
3570 2004-06-12 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3571 Steven Bosscher <stevenb@suse.de>
3574 * intrinsics/date_and_time.c: New file.
3575 * Makefile.am (gfor_helper_src): Add intrinsics/date_and_time.c.
3576 * Makefile.in, aclocal.m4: Regenerate.
3577 * libgfortran.h: Prototype date_and_time().
3579 2004-06-12 Bud Davis <bdavis9659@comcast.net>
3582 * intrinsics/args.c: Implement GETARG and IARGC.
3583 * Makefile.am: Add it.
3584 * Makefile.in: Regenerate.
3586 2004-06-12 Bud Davis <bdavis9659@comcast.net>
3589 * io/write.c(write_float): Format inf and nan IAW F2003.
3591 2004-06-09 Bud Davis <bdavis9659@comcaste.net>
3594 * io/transfer.c (formatted_transfer): position is unique
3595 for T and TL edit descriptors.
3596 (data_transfer_init): set record length to size of internal
3599 2004-06-09 Bud Davis <bdavis9659@comcast.net>
3602 * io/backspace.c(st_backspace): call correct routine for
3603 formatted and un-formatted units.
3605 2004-05-30 Andreas Jaeger <aj@suse.de>, Steven Bosscher <stevenb@suse.de>
3608 * Makefile.am (AM_CPPFLAGS): Renamed from INCLUDES.
3609 (lib_LTLIBRARIES): Rename to ...
3610 (toolexeclib_LTLIBRARIES): this for multilib support.
3611 * configure.in: Rename to ...
3612 * configure.ac: this. Update to modern autoconf style, enable
3613 multilibs, support --enable-version-specific-runtime-libs.
3614 * Makefile.in: Regenerated.
3615 * configure: Regenerated.
3616 * aclocal.m4: Regenerated.
3618 2004-05-30 Steven G. Kargl <kargls@comcast.net>
3620 * libgfortran.h (random_seed): Update prototype.
3621 * intrinsics/random.c: Disable old implementation and add new one.
3623 2004-05-30 Andreas Jaeger <aj@suse.de>
3625 * intrinsics/random.c: Include unistd.h for close and read
3626 prototypes, remove unneeded inclusion of assert.h.
3628 * intrinsics/abort.c: Include stdlib.h for abort prototype, remove
3629 unneeded inclusion of assert.h.
3631 2004-05-27 Tobias Schlueter <tobias.shclueter@physik.uni-muenchen.de>
3634 * intrinsics/associated.c: Remove enum.
3635 (associated): Replace TRUE/FALSE by 1/0.
3637 2004-05-23 Steven G. Kargl <kargls@comcast.net>
3639 * random.c (random_seed): Use correct variable.
3641 2004-05-22 Steven G. Kargl <kargls@comcast.net>
3643 * intrinsics/system_clock: New file.
3644 * Makefile.am: Add intrinsics/system_clock.c.
3645 * Makefile.in: Regenerate.
3647 2004-05-21 Roger Sayle <roger@eyesopen.com>
3649 * io/format.c (parse_format_list): Allow the comma after a string
3650 literal to be optional.
3652 2004-05-18 Paul Brook <paul@codesourcery.com>
3653 Feng Wang <fengwang@nudt.edu.cn>
3655 * Makefile.am (i_pow_c): Set it. Add build rule.
3656 (gfor_built_src): Use it.
3657 (m4_files): add m4/pow.m4.
3658 * Makefile.in: Regenerate.
3659 * m4/pow.m4: New file.
3660 * generated/pow_*.c: Regenerate.
3662 2004-05-18 Paul Brook <paul@codesourcery.com>
3664 * Makefile.am: Remove references to types.m4.
3665 * m4/iparm.m4: Merge with types.m4.
3666 * m4/types.m4: Remove.
3667 * m4/cshift1.m4, m4/dotprod.m4, m4/dotprodc.m4, m4/dotprodl.m4,
3668 m4/eoshift1.m4, m4/eoshift3.m4, m4/iforeach.m4, m4/ifunction.m4,
3669 m4/in_pack.m4, m4/in_unpack.m4, m4/iparm.m4, m4/matmul.m4,
3670 m4/matmull.m4, m4/maxloc0.m4, m4/maxloc1.m4, m4/maxval.m4,
3671 m4/minloc0.m4, m4/minloc1.m4, m4/minval.m4, m4/reshape.m4,
3672 m4/shape.m4, m4/specific.m4, m4/specific2.m4, m4/transpose.m4):
3673 Update to use new iparm.m4.
3674 * generated/*.c: Regenerate.
3676 2004-05-18 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3679 * gfortran.h (offset_t): Rename to ...
3680 (gfc_offset): ... this.
3681 * io/backspace.c (formatted_backspace, unformatted_backspace),
3682 io/io.h (stream, gfc_unit, global_t, file_length, file_position),
3683 transfer.c (us_read, us_write, next_record_r, next_record_w),
3684 io/unit.c (init_units), unix.c (unix_stream, fd_alloc,
3685 fd_alloc_r_at, fd_alloc_w_at, fd_seek, mmap_alloc,
3686 mmap_alloc_r_at, mmap_alloc_w_at, mmap_seek, mem_alloc_r_at,
3687 mem_alloc_w_at, mem_seek, file_length, file_position): Replace all
3688 occurences of offset_t by gfc_offset.
3690 2004-05-16 Paul Brook <paul@codesourcery.com>
3692 * io/format.c (write_real): Don't include padding in format.
3694 2004-05-16 Paul Brook <paul@codesourcery.com>
3696 * io/format.c (format_lex): Make c an int.
3698 2004-05-16 Janne Blomqvist <jblomqvi@cc.hut.fi>
3699 Paul Brook <paul@codesourcery.com>
3701 * io/write.c (write_logical): Don't print extra blank.
3702 (write_integer): Base field width on kind.
3703 (list_formatted_write): Output initial blank.
3705 2004-05-16 Janne Blomqvist <jblomqvi@cc.hut.fi>
3707 * io/io.h (flush): Add prototype.
3708 * io/transfer.c (finalize_transfer): Flush partial records.
3709 * io/unix.c (flush): New function.
3711 2004-05-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3714 * io/io.h (unit_t): Rename to ...
3715 (gfc_unit) ... this.
3716 (unit_root, current_unit, find_file, find_unit, get_unit): Now
3718 (delete_file, insert_unit, close_unit): Argument now of type
3720 * backspace.c (st_backspace), close.c (st_close), endfile.c
3721 (st_endfile), inquire.c (inquire_via_unit, st_inquire), open.c
3722 (test_endfile, edit_modes, new_unit, already_open, st_open),
3723 rewind.c (st_rewind), transfer.c (current_unit), unit.c
3724 (internal_unit, unit_cache, rotate_left, rotate_right, insert,
3725 insert_unit, delete_root, delete_treap, delete_unit, find_unit,
3726 get_unit, init_units, close_unit), unix.c (find_file0,
3727 find_file, delete_file): Replace all occurences of unit_t by
3730 2004-05-15 Bud Davis <bdavis9659@comcast.net>
3733 * io/write.c (write_a): right justify A edit output.
3735 2004-05-14 Bud Davis <bdavis9659@comcast.net>
3738 * libgfortan.h,intrinsics/random.c: Made random_seed visible.
3739 * runtime/main.c(init): Call random_seed as part of MAIN init.
3741 2004-05-13 Tobias Schlter <tobias.schlueter@physik.uni-muenchen.de>
3743 * io/format.c: (parse_format_list): No comma is required after
3746 2004-05-13 Bud Davis <bdavis9659@comcast.net>
3749 * io/intrinsic/string_intrinsics.c (adjustr): rework logic.
3751 2004-05-06 Rainer Orth <ro@TechFak.Uni-Bielefeld.DE>
3752 Steven Bosscher <stevenb@suse.de>
3755 * libgfortran.h: Include <inttypes.h> if available.
3757 2004-05-03 Rainer Orth <ro@TechFak.Uni-Bielefeld.DE>
3759 * io/unix.c (MAP_FAILED): Define if missing.
3760 (mmap_alloc): Cast MAP_FAILED to char *.
3761 (mmap_open): Likewise.
3763 2004-04-26 Bud Davis <bdavis9659@comcast.net>
3765 * generated/_abs_i8.f90: New file.
3766 * generated/_abs_c4.f90: New file.
3767 * generated/_abs_c8.f90: New file.
3768 * Makefile.am: Add them.
3769 * Makefile.in: Regenerate.
3771 2004-04-26 Bud Davis <bdavis9659@comcast.net>
3774 * generated/_abs_i4.f90: New file.
3775 * Makefile.am: Add it.
3776 * Makefile.in: Regenerate.
3778 2004-04-25 Bud Davis <bdavis9659@comcast.net>
3781 * io/list_read.c(list_formatted_read): finish consuming the
3782 spaces and seperators at eoln to get ready for next item.
3784 2004-04-23 Bud Davis <bdavis9659@comcast.net>
3787 * io/read.c(read_a): Handle field width > destination and no field width.
3789 2004-04-22 Bud Davis <bdavis9659@comcast.net>
3792 * io/format.c (format_item): gracefully handle a ')'
3793 when it is the first character encountered in the string.
3795 2004-04-11 Bud Davis <bdavis9659@comcast.net>
3798 * io/transfer.c (next_record): Update last_record when
3799 more than one record is written to a direct access file
3800 with one write statement.
3802 2004-04-11 Bud Davis <bdavis9659@comcast.net>
3805 * io/transfer.c (next_record_w) : No '\n' if internal.
3806 * io/unix.c (empty_internal_buffer) : Init to spaces, not '\n'.
3808 2004-04-11 Bud Davis <bdavis9659@comcast.net>
3810 * io.h (ioparm): Interface from FE is 32 bit, irregardless of offset_t.
3811 Will need to change this later to support direct access files > 2gb.
3813 2004-04-03 Bud Davis <bdavis9659@comcast.net>
3816 * io/transfer.c (next_record_r) : Skip to next record.
3818 2004-04-03 Bud Davis <bdavis9659@comcast.net>
3821 * io/transfer.c (next_record): Update last_record for DIRECT
3823 2004-04-03 Bud Davis <bdavis9659@comcast.net>
3826 * io/unix.c (find_file0): Use fd field of struct
3828 2004-04-03 Bud Davis <bdavis9659@comcast.net>
3831 * io/inquire.c (inquire_via_unit): Changed return string for
3832 BLANK=NULL. Use correct variable for ACTION.
3834 2004-04-01 Bud Davis <bdavis9659@comcast.net>
3837 * io/read.c (read_f): Allow a decimal without a leading digit.
3838 * io/write.c (output_float): remove a leading '0' to keep from
3839 overflowing the field (F edit descriptor).
3841 2004-04-01 Bud Davis <bdavis9659@comcast.net>
3844 * io/open.c (new_unit),
3845 * io/io.h : new_unit is now visible
3846 * io/transfer.c (data_transfer_init): open unit if no OPEN statement.
3847 * io/transfer.c (data_transfer_init): remove compile warnings.
3848 * io/rewind.c (st_rewind): ftruncate if writing.
3850 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3852 * write.c (write_l): Use extract_int for 'L' edit descriptor.
3854 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3857 * io/io.h (global_t):
3858 * io/list_read.c (next_char,list_formatted_read,ist_formatted_read):
3859 Move eof_jmp to a global structure.
3860 * io/transfer.c(finalize_transfer) : Set up eof_jump for callers.
3862 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3864 * m4/cexp.m4 (csqrt): Actually use the passed value.
3865 * generated/exp_c?.c: Regenerate.
3867 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3870 * io.h, transfer.c, open.c : recl_in changed from ptr to variable.
3871 * open.c (new_unit): Moved test for positioned direct access error.
3872 (init_units): Corrected calculation of max records.
3874 2004-02-06 Feng Wang <fengwang@nudt.edu.cn>
3876 * Makefile.am: Add m4/dotprodc.m4. And fix spelling.
3877 * Makefile.in: Regenerate.
3878 * m4/dotprodc.m4: New file. Implement complex dot_product.
3879 * m4/dotprod.m4: Delete the complex implementation.
3880 * generated/dotprod_*: Update.
3882 2004-02-07 Bud Davis <bdavis9659@comcast.net>
3884 * transfer.c (write_constant_string): Do not delete H's in hollerith
3887 2004-01-05 Andrew Pinski <apinski@apple.com>
3889 * configure.in: Check for csin in -lmx also.
3890 * configure: Regenerate.
3892 2004-01-01 Paul Brook <paul@codesourcery.com>
3894 * io/list_read.c (find_nml_node): Make static.
3895 (match_namelist_name): Ditto.
3896 * io/read.c (convert_precision_real): Make static, fix spelling.
3897 * io/transfer.c (extract_real): Remove unused prototype.
3898 (st_set_nml_var): Make static.
3899 * io/write.c (extract_real): Make static.
3901 2003-12-12 Huang Chun <chunhuang73@hotmal.com>
3903 * intrinsics/string_intrinsics.c (string_index): Fix logics thinko.
3905 2003-12-05 Melvin Hadasht <melvin.hadasht@free.fr>
3907 * io/transfer.c (data_transfer_init): Give a runtime error for list
3908 formatted reads and writes from/to files opened for unformatted IO.
3910 2003-11-30 Paul Brook <paul@nowt.org>
3912 * runtime/memory.c (push_context): Remove.
3913 (pop_context): Remove.
3914 * libgfortran.h: Remove prototypes.
3916 2003-11-27 Paul Brook <paul@nowt.org>
3918 * runtime/memory.c (deallocate): Nullify pointer after freeing.
3920 2003-11-27 Paul Brook <paul@nowt.org>
3922 * intrinsics/string_intrinsics.c: Use new memory allocation interface.
3923 * libgfortran.h: Ditto.
3924 * m4/in_pack.m4: Ditto.
3925 * runtime/in_pack_generic.c: Ditto.
3926 * runtime/memory.c: Ditto.
3928 2003-11-26 Richard Henderson <rth@redhat.com>
3930 * m4/exponent.m4, m4/fraction.m4: New.
3931 * m4/nearest.m4, m4/set_exponent.m4: New.
3932 * generated/*: Update.
3933 * Makefile.am: Add them.
3934 (AM_CFLAGS): New. Use -std=gnu99.
3935 * Makefile.in: Regenerate.
3937 2003-11-08 Paul Brook <paul@nowt.org>
3940 * m4/maxloc0.m4: Use default value of 1. Handle zero sized arrays.
3941 * m4/maxloc1.m4: Ditto.
3942 * m4/minloc0.m4: Ditto.
3943 * m4/minloc1.m4: Ditto.
3944 * m4/ifunction.m4: Set return value for zero sized arrays.
3945 * m4/iforeach.m4: Ditto.
3946 * m4/all.m4, m4/any.m4, m4/count.m4, m4/maxloc1.m4, m4/minloc1.m4,
3947 m4/mxaval.m4, m4/minval.m4, m4/product.m4, m4/sum.m4: Ditto.
3948 * generated/*: Update.
3950 2003-10-30 Toon Moene <toon@moene.indiv.nluug.nl>
3953 * io/list_read.c (eat_spaces): Treat tab as space.
3955 2003-10-30 Lars Segerlund <Lars.Segerlund@comsys.se>
3957 * intrinsics/random.c: Add reference to paper containing algorithm.
3958 (random_seed): Extra error checking and proper handling of arrays.
3959 (arandom_r4, arandom_r8): Implement.
3961 2003-10-29 Toon Moene <toon@moene.indiv.nluug.nl>
3964 * runtime/memory.c (allocate_size): Allow allocation
3965 of zero-sized objects.
3967 2003-10-29 Toon Moene <toon@moene.indiv.nluug.nl>
3970 * open.c (new_unit): Open without a file name opens
3971 a file with name fort.<unit>.
3973 2003-10-12 Feng Wang <wf_cs@yahoo.com>
3975 * intrinsics/cshift0.c: New file.
3976 * m4/cshift1.m4: New file
3977 * generated/cshift*.c: New files.
3978 * Makefile.am: Add them.
3979 * Makefile.in: Regenerate.
3981 2003-10-12 XiaoQiang Zhang <zhangapache@yahoo.com>
3983 * io/list_read.c (read_character): Remove unwanted call to free_saved.
3985 2003-10-11 Huang Chun <jiwang@mail.edu.cn>
3987 * intrinsics/string_intrinsics.c (string_trim): New function.
3988 (string_repeat): New function.
3990 2003-10-11 Paul Brook <paul@nowt.org>
3992 * intrinsics/dprod_r8.f90: New file.
3993 * Makefile.am (gfor_specific_src): Add it.
3994 (gfor_built_specific_src): Rename from gfor_build_specific_c.
3996 (gfor_specific2_src): Rename from gfor_built_specific2_c.
3998 * Makefile.in: Regenerate.
3999 * generated/_aint_*.f90: New files.
4000 * generated/_anint*.f90: New files.
4001 * generated/_atan2*.f90: New files.
4002 * generated/_mod*.f90: New files.
4004 2003-09-20 Kejia Zhao <kejia_zh@yahoo.com.cn>
4006 * intrinsics/selected_kind.f90: New file.
4007 * Makefile.am: Add it.
4008 * Makefile.in: regenerate.
4010 2003-09-19 Lars Segerlund <Lars.Segerlund@comsys.se>
4011 Paul Brook <paul@nowt.org>
4013 * intrinsics/random.c: New file.
4014 * Makefile.am (gfor_hemper_src): Add it.
4015 (gfor_specific_c): Fix typo.
4017 2003-09-19 Paul Brook <paul@nowt.org>
4019 * All: rename g95->gfc.
4021 2003-09-18 XiaoQiang Zhang <zhangapache@yahoo.com>
4023 * io/write.c (output_float): Fix bug of FMT_E, Add comments.
4025 2003-09-09 XiaoQiang Zhang <zhangapache@yahoo.com>
4027 * io/write.c (write_float): Dectection of positive infinite number,
4028 Not a Number(NaN) and negative infinite number.
4029 (ioutput_float): Bug fix for FMT_E and FMT_D processing to
4030 output a very_very small number ( < 0.1e-100 ).
4032 2003-09-07 XiaoQiang Zhang <zhangapache@yahoo.com>
4034 * libgfortran.h (xtoa, itoa): Parameter modified.
4035 * io/io.h (namelist_info): Declaration to support namelist I/O
4036 (st_parameter): Add namelist related component
4037 (ionml, empty_internal_buffer, st_set_nml_var_int,
4038 st_set_nml_var_float, st_set_nml_var_char, st_set_nml_var_complex,
4039 st_set_nml_var_log): Declaration
4040 (set_integer, set_integer): Parameter changed
4041 * io/format.c (free_nodes): Fix annoying bug of lefting "deallocated"
4043 (parse_format_list): Fix bug about FMT_SLASH
4044 * io/list_read.c (push_char): Totally clear old saved_string, zeroize
4045 newly allocated saved_string
4046 (next_char): Add detection of End_Of_Line support
4047 (convert_integer): Now can process 64 bits interger
4048 (read_real): Bug fixed
4049 (init_at_eol, find_nml_node, match_namelist_name): Add new functions
4050 (match_namelist_name): New implemention
4051 * io/lock.c (ionml): New global variable
4052 (library_end): Free memory in ionml
4053 * io/open.c (st_open): Variable initializtion
4054 * io/read.c (max_value): 64 bits interger support
4055 (convert_precsion_real): New procedure to replace "strtod" with more
4057 (read_f, read_radix): Input bug fix
4058 * io/transfer.c: (sf_seen_eor): New static variable
4059 (read_sf): Zeroize base buffer; fix bugs: single read statement can
4060 not get input in mutli line when read from stdin
4061 (formatted_transfer): Fix bug of FMT_O, FMT_B, FMT_Z for INTEGER type
4063 (data_transfer_init): Clear internal buffer for Internel File I/O.
4064 Internal File now worked. Detect some error condition for namelist.
4066 (next_record_w): Internal file and Namelist I/O support.
4067 (st_set_nml_var, st_set_nml_var_float, st_set_nml_var_char,
4068 st_set_nml_var_complex, st_set_nml_var_log): Implemention.
4069 * io/unit.c (implicit_unit): Deletion
4070 (get_unit): Now cannot open a unit implicitly.
4071 * io/unix.c (mmap_alloc): Fix fatal error in calculating the length of
4073 (mem_alloc_r_at): Internal file I/O support added
4074 (empty_internal_buffer): New function
4075 * io/write.c (extract_int): Support 64 bits interger processing
4076 (output_float): Varibale initialization
4077 (write_float): Infinite real number detection.
4078 (write_int): 64 bits integer I/O support
4079 (write_decimal): New function to output decimal number
4080 (otoa, btoa): Better implemention and 64 bits interger support
4081 (namelist_write): New function
4082 * runtime/error.c (itoa, xtoa): Better implemention and 64 bits
4085 2003-08-15 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4087 * libgfortran.h (os_error, runtime_error,internal_error, sys_exit,
4088 get_mem ): Add attribute.
4089 * intrinsics/spread_generic.c (__spread): Fix spelling.
4090 * io/inquire.c (inquire_via_filename): Add const.
4091 * io/io.h (sys_exit): Add attribute.
4092 * io/io.h (move_pos_offset): Add move_pos_offset.
4093 * io/io.h (compare_file_filename, inquire_sequential, inquire_direct,
4094 inquire_formatted, inquire_unformatted, inquire_read, inquire_write,
4095 inquire_readwrite, convert_real, write_a, write_b, write_d, write_e,
4096 write_en, write_es, write_f, write_i, write_l, write_o, write_x,
4097 write_z): Add const.
4098 * io/read.c (convert_real): Add const.
4099 * io/transfer.c (type_name): Add const.
4100 * io/unix.c (unpack_filename, compare_file_filename,inquire_sequential,
4101 inquire_direct, inquire_formatted, inquire_unformatted, inquire_access,
4102 inquire_read, inquire_write, inquire_readwrite): Add const.
4103 * io/write.c (output_float): Remove unused variable.
4104 * io/write.c (write_a, extract_int, extract_real, output_float,
4105 write_float, write_int, write_i, write_b, write_o, write_z, write_d,
4106 write_e, write_f, write_en, write_es, write_logical, write_integer,
4107 write_character, write_real, write_complex): Add const.
4108 * runtime/error.c (rtoa): Remove unused variable.
4109 * runtime/select.c (select_string): Add const.
4110 * runtime/stop.c (stop_string): Add const.
4112 2003-08-10 Paul Brook <paul@nowt.org>
4114 * Makefile.am (gfor_helper_src): Add intrinsics/abort.c.
4115 (FFLAGS): Add -fno-underscoring.
4116 * Makefile.in: Regenerate.
4117 * intrinsics/abort.c: New file.
4119 2003-08-10 Erik Schnetter <schnetter@uni-tuebingen.de>
4121 * fmain.c (main): Do not call init and cleanup; call set_args instead.
4122 * libgfortran.h (init, cleanup): Remove declarations.
4123 (set_args): Add declaration.
4124 * runtime/main.c (init, cleanup): Make them static, and give them
4125 the constructor and destructor attributes.
4126 (set_args): New function.
4128 2003-08-10 Paul Brook <paul@nowt.org>
4130 * intrinsics/strinf_intrinsics.c (compare_string): Return value based
4131 on which string is longest.
4133 2003-08-10 Paul Brook <paul@nowt.org>
4135 * Makefile.am (EXTRA_DIST): Remove old files.
4136 * Makefile.in: Regenerate.
4138 2003-07-26 Paul Brook <paul@nowt.org>
4140 Rename library to libgfortran.
4141 * libgfortran.h: Change prefix to _libgfortran_.
4143 2003-07-24 Paul Brook <paul@nowt.org>
4145 * configure.in: Don't pull in system libtool. Use toplevel
4148 2003-07-22 Paul Brook <paul@nowt.org>
4150 Regenerate all configury files.
4152 2003-07-09 Chun Huang <compiler@sohu.com>
4154 * intrinsics/string_intrinsic.c (string_scan): New function.
4155 (string_verify): New function.
4157 2003-06-25 Paul Brook <paul@nowt.org>
4159 * io/unix.c (mem_alloc_r_at, mem_alloc_w_at): Advance logical_offset.
4160 (mem_seek): Don't bother setting physical_offset.
4162 2003-06-20 Paul Brook <paul@nowt.org>
4164 * libgfor.h (stop_numeric): Declare.
4165 * runtime/pause.c: New file.
4166 * Makefile.am: Add it.
4168 2003-06-08 Paul Brook <paul@nowt.org>
4170 * m4/cexp.m4 (cabs): Use correct typed version.
4171 (csqrt): New function.
4173 2003-06-07 Canqun Yang <canqun@yahoo.com.cn>
4175 Spotted by Benjamin and Tobias:
4176 * io/list_read.c: Add Separator '\t'.
4177 (parse_real, read_real): Accept real values starting with an optional
4178 sign follows a decimal point.
4180 2003-06-06 Steven Bosscher <steven@gcc.gnu.org>
4182 * Makefile.am: Don't put cmath objects in subdir.
4183 * configure.in: Rename MATHOBJ to MATH_OBJ.
4185 2003-06-02 Kejia Zhao <Kejia_zh@yahoo.com.cn>
4187 * intrinsics/associated.c: New file.
4188 * Makefile.am: Add it. Regenerate Makefile.in.
4189 * libgfor.h: Define g95_array_void, G95_DESCRIPTOR_DATA, and
4190 G95_DESCRIPTOR_DTYPE.
4192 2003-06-01 Canqun Yang <canqun@yahoo.com.cn>
4194 * io/write.c (calcuate_exp): Rewrite it to avoid overflow.
4195 (calculate_G_format): Rewrite it to eliminate an infinte loop and set
4196 the scale_factor to 0 for F editing.
4198 2003-05-11 Tobias Schlter <innenminister@gmx.de>
4200 * libgfor.h: Only include stdint.h if it exists.
4202 2003-05-07 Paul Brook <paul@nowt.org>
4204 * libgfor.h: Use stdint.h types.
4205 * intrinsics/ishift.c: Ditto.
4206 * runtime/memory.c (malloc_t): Reorder fields for better alignment.
4208 2003-05-05 Steven Bosscher <steven@gcc.gnu.org>
4210 * libgfor.h (offsetof): Define if nobody else does.
4211 * runtime/memory.c (HEADER_SIZE): Use it.
4213 2003-05-01 Tobias Schlter <innenminister@gmx.de>
4215 * configure.in: Require autoconf 2.54.
4217 2003-04-28 Tobias Schlter <innenminister@gmx.de>
4218 Paul Brook <paul@nowt.org>
4220 * intrinsics/reshape_generic.c: Copy the whole element, not just the
4222 * m4/transpose.m4: New file.
4223 * Makefile.am: Add them.
4224 Regenerate generated files.
4226 2003-04-18 Steven Bosscher <steven@gcc.gnu.org>
4228 * io/format.c (parse_format_list): Allow 'X' without integer
4229 prefix. This is an extension. Interpretation is '1X'.
4231 2003-04-18 Tobias Schlter <Tobias.Schlueter@physik.uni-muenchen.de>
4233 * io/format.c (parse_format_list): Allow '0P'.
4235 2003-04-18 Steven Bosscher <steven@gcc.gnu.org>
4237 * Makefile.in: Re-regenerate for automake 1.7.3.
4239 2003-04-18 Canqun Yang <canqun@yahoo.com.cn>
4241 Port implementation for CHARACTER SELECT from Andy's tree.
4242 * runtime/select.c: New file
4243 * Makefile.am: Add it.
4244 * Makefile.in: Regenerate.
4246 2003-04-17 Xiaoqiang Zhang <zhangapache@yahoo.com>
4248 * io/transfer.c (formatted_transfer): Modified
4249 * io/unix.c (move_pos_offset): New Function.
4250 * io/format.c (parse_format_list): Modified.
4252 2003-04-15 Xiaoqiang Zhang <zhangapache@yahoo.com>
4254 * io/write.c (write_float,write_real): New implemention of
4255 FMT_G and default float editing.
4256 (calculate_exp,calculate_G_format,output_float): New Function.
4257 (write_float,write_real,write_logical): Modified
4258 * libgfor.h (default_rtoa): Remove Declaration.
4259 * runtime/error.c (default_rtoa): Remove Function.
4261 2003-04-15 Steven Bosscher <steven@gcc.gnu.org>
4264 * io/write.c (extract_real): Add missing break statement.
4266 2003-04-13 Steven Bosscher <steven@gcc.gnu.org>
4268 * cpu_time.c: Make sure we have a definition of HZ. Don't
4269 rely on CLOCKS_PER_SEC, it is always 1000000, on any system.
4271 2003-04-13 Steven Bosscher <steven@gcc.gnu.org>
4272 Paul Brook <paul@nowt.org>
4274 * configure.in: Check for process time headers and GETTIMEOFDAY.
4275 * makefile.am: Add intrinsics/cpu_time.c.
4276 * acinclude.m4: New file.
4277 * intrinsics/cpu_time.c: New file.
4278 * m4/dotprodl.m4: Fix typo.
4279 Regenerate generated files.
4281 2003-04-11 Xiaoqiang Zhang <zhangapache@yahoo.com>
4283 * io/write.c (extract_real): Ouput floating point value.
4284 (write_float): New Function.
4285 (write_e, write_f, write_en, write_es): Modified
4286 * io/transfer.c (formatted_transfer): Modified.
4287 * libgfor.h (default_rtoa): Declaration.
4288 (rtoa): Declaration.
4289 * runtime/error.c (default_rtoa): New Function.
4290 (rtoa): New Function.
4292 2003-04-05 Paul Brook <paul@nowt.org>
4294 * intrinsics/spread_generic.c: New file.
4295 * Makefile.am: Add it. Regenerate Makefile.in.
4297 2003-03-29 Paul Brook <paul@nowt.org>
4299 * intrinsics/pack_generic.c: New file.
4300 * intrinsics/unpack_generic.c: New file.
4301 * Makefile.am: Add them. Regenerate Makefile.in.
4303 2003-03-25 Paul Brook <paul@nowt.org>
4305 * intrinsics/eoshift0.c: New file.
4306 * intrinsics/eoshift2.c: New file.
4307 * m4/eoshift1.m4: New file.
4308 * m4/eoshift3.m4: New file.
4309 * Makefile.am: Add them.
4310 * in_unpack_generic.c: Initialize src.
4311 Regenerate generated files.
4313 2003-03-14 Paul Brook <paul@nowt.org>
4315 * m4/shape.m4: Work properly with array temporaries.
4316 * m4/in_pack.m4: Skip redundant checks for array temporaries.
4317 * runtime/in_pack_generic.c: Ditto.
4319 2003-03-12 Paul Brook <paul@nowt.org>
4321 * m4/shape.m4: Work properly with noncontiguous arrays.
4323 2003-03-08 Paul Brook <paul@nowt.org>
4325 * m4/in_pack.m4: Correctly handle zero sized and assumed size arrays.
4326 * runtime/in_pack_generic.c: Ditto.
4328 2003-02-08 Paul Brook <paul@nowt.org>
4330 * intrinsics/reshape_generic.c: Use runtime_error to report errors.
4331 * io/close.c (st_close): Return void.
4332 * io/open.c (st_open): Return void.
4333 * libgfor.h (g95_array_char): Declare.
4334 (internal_malloc_size): Ditto.
4335 (internal_pack*, internal_unpack*): Ditto.
4336 * m4/in_pack.m4: Allocate storage if neccessary. Fix logic for packed
4338 * m4/in_unpack.m4: Include file fixes.
4339 * m4/reshape.m4: Increment the correct source pointer.
4340 * Makefile.am (maxloc): Fix typo.
4341 * runtime/in_pack_generic.c: Call optimized functions. Allocate
4342 storage if neccessary. Fix logic for packed arrays.
4343 * runtime/in_unpack_generic.c: Call optimized functions.
4344 * runtime/main.c: Use runtime_error to report errors.
4345 * memory.c (internal_malloc_size): Make non-static.
4347 2003-02-02 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4349 * reshape_packed.c, lock.c: Add #include <string.h>.
4350 * libgfor.h, format.c, inquire.c, io.h, transfer.c, unix.c,
4351 environ.c, error.c, memory.c, string.c: Add const.
4352 * error.c (show_locus): Add void.
4354 2003-02-21 Paul Brook <paul@nowt.org>
4356 * m4/in_pack.m4: Avoid returning const * parameter.
4357 * Makefile.am: Only regenerate files in maintainer mode.
4359 2003-02-20 Paul Brook <paul@nowt.org>
4361 Add array repacking support functions.
4362 * m4/in_pack.m4, m4/in_unpack.m4: New files.
4363 * runtime/in_pack_generic.c, runtime/in_unpack_generic.c: New files.
4364 * Makefile.am: Build them. Regenerate configury files.
4365 * generated/: New directory for generated files (need to move
4366 everything else there).
4368 2003-02-07 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
4370 * m4/cexp.m4: Fix typo.
4372 2003-01-26 Paul Brook <paul@nowt.org>
4374 * intrinsics/: Add missing generated files.
4376 2003-01-26 Paul Brook <paul@nowt.org>
4378 * Makefile.am: Put -I before the filename.
4380 2003-01-24 Paul Brook <paul@nowt.org>
4382 * configure.in: Add AM_MAINTAINER_MODE.
4384 2003-01-23 Paul Brook <paul@nowt.org>
4386 * configure.in, Makefile.am: Modify to work with unmodified autoconf
4388 Also regenerate other configury files.
4390 2003-01-21 Paul Brook <paul@nowt.org>
4392 * io/read.c: Don't use stdint.h, it doesn't exist on cygwin.
4394 2003-01-20 Steven Bosscher <s.bosscher@student.tudelft.nl>
4396 * io/read.c (read_f): Don't use alloca, but safe get_mem instead.
4397 Don't include "alloca.h".
4399 2003-01-20 Steven Bosscher <s.bosscher@student.tudelft.nl>
4401 * intrinsics/string.c: Rename to intrinsics/string_intrinsics.c.
4402 * Makefile.am: Adjust file name.
4403 * Makefile.in: Regenerate.
4404 * gfortypes.h: Kill, include everything in...
4405 * libgfor.h: ...here. Include config.h
4406 * fmain.c, intrinsics/ishftc.c, intrinsic/reshape_generic.c,
4407 intrinsics/reshape_i4.c, intrinsics/reshape_i8.c,
4408 intrinsics/reshape_packed.c, intrinsics/size.c,
4409 m4/reshape.m4, runtime/main.c, runtime/memory.c: Use macro
4410 for prefix for all functions instead of hardcoded.
4412 2003-01-19 Steven Bosscher <s.bosscher@student.tudelft.nl>
4414 * io/lock.c (library_end): Propagate library return
4417 2003-01-19 Steven Bosscher <s.bosscher@student.tudelft.nl>
4419 Port fixes from Andy's tree:
4420 * io/read.c (read_decimal): Reverse sense of overflow
4421 comparison during integer reads.
4422 * io/format.c (revert): Fix comment.
4423 (next_format): Fix format revision.
4424 * io/unix.c: Fix and simplify mmap version of stream
4427 2003-01-11 Paul Brook <paul@nowt.org>
4429 * configure, Makefile.in: Regenerate.
4431 2003-01-11 Paul Brook <paul@nowt.org>
4433 * runtime/stop.c: Rewrite.
4435 2003-01-08 Paul Brook <paul@nowt.org>
4437 * configure, Makefile.in: Regenerate.
4439 2003-01-05 Paul Brook <paul@nowt.org>
4441 * (*.m4) Move to m4/.
4442 * intrinsics/string.c (_gfor_string_index): New Function.
4444 2002-12-29 Paul Brook <paul@nowt.org>
4446 * intrinsics/reshape.*: New files.
4447 * gcc_config.patch: Update to new GCC configure system.
4449 2002-10-10 Paul Brook <paul@nowt.org>
4451 * intrinsics/size.c: New file.
4452 * intrinsics/shape.m4: New file.
4453 * Makefile.am: Add above files.
4455 2002-10-02 Paul Brook <paul@nowt.org>
4457 * fmain.c (main): Move here.
4458 * libgfor.c: From here.
4459 * libgfor.h (gfor_init, gfor_runtime_cleanup): Declare.
4460 * Makefile.am: Build libgforbegin.
4461 * gcc_config.patch: Remove stray -march=athlon.
4462 * dotprodl.m4: Fix use of L8_TO_L4 macro.
4463 * ifunction.m4: Move variable declarations to allow compilation with
4465 * specific.m4, specific4.m4: Fix typo typecode->type_code.
4466 * README: Document use of patch -p1.
4468 2002-09-12 Paul Brook <paul@nowt.org>
4470 * math/*: Add complex math library functions.
4471 * intrinsics/specific(2).m4: Generate Specific intrinsic functions.
4472 * Makefile.am: Add details for above.
4473 * configure.in: Use AC_PROG_F95. Test for the presence of csin.
4475 2002-09-09 Paul Brook <paul@nowt.org>
4477 * libgfor.c (determine_endianness): Use an array rather than a struct.
4478 * intrinsics/dotprod*, matmul*: Implement DOT_PRODUCT and MATMUL.
4480 2002-09-09 Steven Bosscher <s.bosscher@student.tudelft.nl>
4482 * libgfor.c: Add fatal signal handler.
4483 Romove superfluous abort() calls.
4485 2002-09-07 Paul Brook <paul@nowt.org>
4487 * Makefile.am, intrinsics: Major rewrite.
4489 2002-09-02 Paul Brook <paul@nowt.org>
4491 * Makefile.am: Added -I$(srcdir) to m4 rule.
4493 2002-08-30 Paul Brook <paul@nowt.org>
4495 * io/*: Integrated libgforio.
4496 * Makefile.am, configure.in: Make compatable with GCC. Build code for
4497 intrinsics in the intrisics directory.
4498 * intrinsics/intrinsics.m4: Move here. Strip directories from the
4499 filename. Add 'and' and 'all' intrinsics.
4501 2002-08-17 Paul Brook <paul@nowt.org>
4503 * ALL: First release as more than just a single file