1 2005-11-28 Jakub Jelinek <jakub@redhat.com>
4 * acinclude.m4 (LIBGFOR_CHECK_PRAGMA_WEAK): Rename to...
5 (LIBGFOR_GTHREAD_WEAK): ... this. Define SUPPORTS_WEAK rather
6 than HAVE_PRAGMA_WEAK. Define GTHREAD_USE_WEAK to 0 on hosts
7 that shouldn't use weak in gthr.h.
8 * configure.ac: Use LIBGFOR_GTHREAD_WEAK instead of
9 LIBGFOR_CHECK_PRAGMA_WEAK.
10 * config.h.in: Regenerated.
11 * configure: Regenerated.
12 * io/io.h (SUPPORTS_WEAK): Don't define here.
14 * intrinsics/ftell.c (ftell, FTELL_SUB): Add unlock_unit call.
15 * intrinsics/fget.c (fgetc, fputs): Likewise.
16 * intrinsics/tty.c (ttynam): Likewise.
18 2005-11-27 Jerry DeLisle <jvdelisle@gcc.gnu.org>
21 * io/unit.c (init_units): Set default flag to BLANK_NULL per
22 requirement of F95 standard. Set PAD_YES for stdin.
24 2005-11-27 David Edelsohn <edelsohn@gnu.org>
26 * intrinsics/random.c: Include config.h
27 * io/size_from_kind.c: Include config.h and libgfortran.h
28 * io/io.h: Revert 2005-11-21 change.
30 2005-11-27 Francois-Xavier Coudert <coudert@clipper.ens.fr>
32 * io/write.c (namelist_write): Correct type in previous
35 2005-11-27 Francois-Xavier Coudert <coudert@clipper.ens.fr>
38 * io/list_read.c (eat_separator, finish_separator,
39 read_character): Handle CRLF separators correctly during reads.
40 (nml_query): Use the HAVE_CRLF macro to print adequate newlines.
41 * io/io.h (st_parameter_dt): Add comment about the possible
42 values for sf_seen_eor.
43 * io/unix.c (tempfile, regular_file): HAVE_CRLF doesn't imply
44 that O_BINARY is defined, so we add that condition.
45 (stream_at_bof): Fix typo in comment.
46 * io/transfer.c (read_sf): Handle correctly CRLF, setting
47 sf_seen_eor value to 2 instead of 1.
48 (formatted_transfer_scalar): Use the sf_seen_eor value to
49 handle CRLF the right way.
50 * io/write.c (nml_write_obj, namelist_write): Use CRLF as newline
51 when HAVE_CRLF is defined.
53 2005-11-26 Richard Henderson <rth@redhat.com>
55 * io/list_read.c (nml_parse_qualifier): Use ssize_t instead of int
58 2005-11-26 Janne Blomqvist <jb@gcc.gnu.org>
61 * io/open.c (edit_modes): Check for STATUS_UNKNOWN flag.
63 2005-11-25 Richard Henderson <rth@redhat.com>
65 * io/list_read.c (nml_parse_qualifier): Use memcpy to extract
66 values from dtp->u.p.value.
67 * io/io.h (struct st_parameter_dt): Change reversion_flag, first_item,
68 seen_dollar, sf_seen_eor, eor_condition, no_leading_blank, char_flag,
69 input_complete, at_eol, comma_flag, namelist_mode, nml_read_error to
70 single-bit fields. Move value to where it'll be at least pointer
73 2005-11-23 Alan Modra <amodra@bigpond.net.au>
75 * io/open.c (new_unit): Use the right unit number when checking
76 for stdin, stdout, stderr.
78 2005-11-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
81 * io/list_read.c (read_character): Add auto completion on short
84 2005-11-21 David Edelsohn <edelsohn@gnu.org>
86 * io/io.h (_LARGE_FILES): Undefine for AIX.
87 (_LARGE_FILE_API): Define for AIX.
89 2005-11-21 Jakub Jelinek <jakub@redhat.com>
94 * Makefile.am (AM_CPPFLAGS): Add gcc directories as -I paths,
96 * Makefile.in: Regenerated.
97 * acinclude.m4 (LIBGFOR_CHECK_SYNC_FETCH_AND_ADD,
98 LIBGFOR_CHECK_GTHR_DEFAULT, LIBGFOR_CHECK_PRAGMA_WEAK): New macros.
99 * configure.ac: Add them.
100 * configure: Rebuilt.
101 * config.h.in: Rebuilt.
102 * libtool-version: Bump libgfortran.so SONAME to libgfortran.so.1.
103 * libgfortran.h (library_start, show_locus, internal_error,
104 generate_error, find_option): Add st_parameter_common * argument.
105 (library_end): Change into a dummy macro.
106 * io/io.h: Include gthr.h.
107 (SUPPORTS_WEAK): Define if HAVE_PRAGMA_WEAK.
108 (CHARACTER): Remove define.
109 (st_parameter, global_t): Remove typedef.
110 (ioparm, g, ionml, current_unit): Remove variables.
111 (init_error_stream): Remove prototype.
112 (CHARACTER1, CHARACTER2): Define.
113 (st_parameter_common, st_parameter_open, st_parameter_close,
114 st_parameter_filepos, st_parameter_inquire, st_parameter_dt): New
116 (IOPARM_LIBRETURN_MASK, IOPARM_LIBRETURN_OK, IOPARM_LIBRETURN_ERROR,
117 IOPARM_LIBRETURN_END, IOPARM_LIBRETURN_EOR, IOPARM_ERR, IOPARM_END,
118 IOPARM_EOR, IOPARM_HAS_IOSTAT, IOPARM_HAS_IOMSG, IOPARM_COMMON_MASK,
119 IOPARM_OPEN_HAS_RECL_IN, IOPARM_OPEN_HAS_FILE, IOPARM_OPEN_HAS_STATUS,
120 IOPARM_OPEN_HAS_ACCESS, IOPARM_OPEN_HAS_FORM, IOPARM_OPEN_HAS_BLANK,
121 IOPARM_OPEN_HAS_POSITION, IOPARM_OPEN_HAS_ACTION,
122 IOPARM_OPEN_HAS_DELIM, IOPARM_OPEN_HAS_PAD, IOPARM_CLOSE_HAS_STATUS,
123 IOPARM_INQUIRE_HAS_EXIST, IOPARM_INQUIRE_HAS_OPENED,
124 IOPARM_INQUIRE_HAS_NUMBER, IOPARM_INQUIRE_HAS_NAMED,
125 IOPARM_INQUIRE_HAS_NEXTREC, IOPARM_INQUIRE_HAS_RECL_OUT,
126 IOPARM_INQUIRE_HAS_FILE, IOPARM_INQUIRE_HAS_ACCESS,
127 IOPARM_INQUIRE_HAS_FORM, IOPARM_INQUIRE_HAS_BLANK,
128 IOPARM_INQUIRE_HAS_POSITION, IOPARM_INQUIRE_HAS_ACTION,
129 IOPARM_INQUIRE_HAS_DELIM, IOPARM_INQUIRE_HAS_PAD,
130 IOPARM_INQUIRE_HAS_NAME, IOPARM_INQUIRE_HAS_SEQUENTIAL,
131 IOPARM_INQUIRE_HAS_DIRECT, IOPARM_INQUIRE_HAS_FORMATTED,
132 IOPARM_INQUIRE_HAS_UNFORMATTED, IOPARM_INQUIRE_HAS_READ,
133 IOPARM_INQUIRE_HAS_WRITE, IOPARM_INQUIRE_HAS_READWRITE,
134 IOPARM_DT_LIST_FORMAT, IOPARM_DT_NAMELIST_READ_MODE,
135 IOPARM_DT_HAS_REC, IOPARM_DT_HAS_SIZE, IOPARM_DT_HAS_IOLENGTH,
136 IOPARM_DT_HAS_FORMAT, IOPARM_DT_HAS_ADVANCE,
137 IOPARM_DT_HAS_INTERNAL_UNIT, IOPARM_DT_HAS_NAMELIST_NAME,
138 IOPARM_DT_IONML_SET): Define.
139 (gfc_unit): Add lock, waiting and close fields. Change file
140 from flexible array member into pointer to char.
141 (open_external): Add st_parameter_open * argument.
142 (find_file, file_exists): Add file and file_len arguments.
143 (flush_all_units): New prototype.
144 (max_offset, unit_root, unit_lock): New variable.
145 (is_internal_unit, is_array_io, next_array_record,
146 parse_format, next_format, unget_format, format_error,
147 read_block, write_block, next_record, convert_real,
148 read_a, read_f, read_l, read_x, read_radix, read_decimal,
149 list_formatted_read, finish_list_read, namelist_read,
150 namelist_write, write_a, write_b, write_d, write_e, write_en,
151 write_es, write_f, write_i, write_l, write_o, write_x, write_z,
152 list_formatted_write, get_unit): Add st_parameter_dt * argument.
153 (insert_unit): Remove prototype.
154 (find_or_create_unit, unlock_unit): New prototype.
155 (new_unit): Return gfc_unit *. Add st_parameter_open *
156 and gfc_unit * arguments.
157 (free_fnodes): Remove prototype.
158 (free_format_data): New prototype.
160 (init_at_eol): Remove prototype.
161 (free_ionml): New prototype.
162 (inc_waiting_locked, predec_waiting_locked, dec_waiting_unlocked):
163 New inline functions.
164 * io/unit.c (max_offset, unit_root, unit_lock): New variables.
165 (insert): Adjust os_error caller.
166 (insert_unit): Made static. Allocate memory here, initialize
167 lock and after inserting it return it, locked.
168 (delete_unit): Adjust for deletion of g.
169 (find_unit_1): New function.
171 (find_or_create_unit): New function.
172 (get_unit): Add dtp argument, change meaning of the int argument
173 as creation request flag. Adjust for different st_* calling
174 conventions, lock internal unit's lock before returning it
175 and removal of g. Call find_unit_1 instead of find_unit.
176 (is_internal_unit, is_array_io): Add dtp argument, adjust for
177 removal of most of global variables.
178 (init_units): Initialize unit_lock. Adjust insert_unit callers
179 and adjust for g removal.
180 (close_unit_1): New function.
181 (close_unit): Use it.
182 (unlock_unit): New function.
183 (close_units): Lock unit_lock, use close_unit_1 rather than
185 * io/close.c (st_close): Add clp argument. Adjust for new
186 st_* calling conventions and internal function API changes.
187 * io/file_pos.c (st_backspace, st_endfile, st_rewind, st_flush):
188 Add fpp argument. Adjust for new st_* calling conventions and
189 internal function API changes.
190 (formatted_backspace, unformatted_backspace): Likewise. Add
192 * io/open.c (edit_modes, st_open): Add opp argument. Adjust for
193 new st_* calling conventions and internal function API changes.
194 (already_open): Likewise. If not HAVE_UNLINK_OPEN_FILE, unlink
195 scratch file. Instead of calling close_unit just call sclose,
196 free u->file if any and clear a few u fields before calling
198 (new_unit): Return gfc_unit *. Add opp and u arguments.
199 Adjust for new st_* calling conventions and internal function
200 API changes. Don't allocate unit here, rather than work with
201 already created unit u already locked on entry. In case
202 of failure, close_unit it.
203 * io/unix.c: Include unix.h.
204 (BUFFER_SIZE, unix_stream): Moved to unix.h.
205 (unit_to_fd): Add unlock_unit call.
206 (tempfile): Add opp argument, use its fields rather than ioparm.
207 (regular_file): Likewise.
208 (open_external): Likewise. Only unlink file if fd >= 0.
209 (init_error_stream): Add error argument, set structure it points
210 to rather than filling static variable and returning its address.
211 (FIND_FILE0_DECL, FIND_FILE0_ARGS): Define.
212 (find_file0): Use them. Don't crash if u->s == NULL.
213 (find_file): Add file and file_len arguments, use them instead
214 of ioparm. Add locking. Pass either an array of 2 struct stat
215 or file and file_len pair to find_file0.
216 (flush_all_units_1, flush_all_units): New functions.
217 (file_exists): Add file and file_len arguments, use them instead
219 * io/unix.h: New file.
220 * io/lock.c (ioparm, g, ionml): Remove variables.
221 (library_start): Add cmp argument, adjust for new st_* calling
223 (library_end): Remove.
224 (free_ionml): New function.
225 * io/inquire.c (inquire_via_unit, inquire_via_filename,
226 st_inquire): Add iqp argument, adjust for new st_* calling
227 conventions and internal function API changes.
228 * io/format.c (FARRAY_SIZE): Decrease to 64.
229 (fnode_array, format_data): New typedefs.
230 (avail, array, format_string, string, error, saved_token, value,
231 format_string_len, reversion_ok, saved_format): Remove variables.
232 (colon_node): Add const.
233 (free_fnode, free_fnodes): Remove.
234 (free_format_data): New function.
235 (next_char, unget_char, get_fnode, format_lex, parse_format_list,
236 format_error, parse_format, revert, unget_format, next_test): Add
237 fmt or dtp arguments, pass it all around, adjust for internal
238 function API changes and adjust for removal of global variables.
239 (next_format): Likewise. Constify return type.
240 (next_format0): Constify return type.
241 * io/transfer.c (current_unit, sf_seen_eor, eor_condition, max_pos,
242 skips, pending_spaces, scratch, line_buffer, advance_status,
243 transfer): Remove variables.
244 (transfer_integer, transfer_real, transfer_logical,
245 transfer_character, transfer_complex, transfer_array, current_mode,
246 read_sf, read_block, read_block_direct, write_block,
247 write_block_direct, unformatted_read, unformatted_write,
248 type_name, write_constant_string, require_type,
249 formatted_transfer_scalar, us_read, us_write, pre_position,
250 data_transfer_init, next_record_r, next_record_w, next_record,
251 finalize_transfer, iolength_transfer, iolength_transfer_init,
252 st_iolength, st_iolength_done, st_read, st_read_done, st_write,
253 st_write_done, st_set_nml_var, st_set_nml_var_dim,
254 next_array_record): Add dtp argument, pass it all around, adjust for
255 internal function API changes and removal of global variables.
256 * io/list_read.c (repeat_count, saved_length, saved_used,
257 input_complete, at_eol, comma_flag, last_char, saved_string,
258 saved_type, namelist_mode, nml_read_error, value, parse_err_msg,
259 nml_err_msg, prev_nl): Remove variables.
260 (push_char, free_saved, next_char, unget_char, eat_spaces,
261 eat_separator, finish_separator, nml_bad_return, convert_integer,
262 parse_repeat, read_logical, read_integer, read_character,
263 parse_real, read_complex, read_real, check_type,
264 list_formatted_read_scalar, list_formatted_read, finish_list_read,
265 find_nml_node, nml_untouch_nodes, nml_match_name, nml_query,
266 namelist_read): Add dtp argument, pass it all around, adjust for
267 internal function API changes and removal of global variables.
268 (nml_parse_qualifier): Likewise. Add parse_err_msg argument.
269 (nml_read_obj): Likewise. Add pprev_nl, nml_err_msg, clow and
271 (nml_get_obj_data): Likewise. Add pprev_nl and nml_err_msg
273 (init_at_eol): Removed.
274 * io/read.c (convert_real, read_l, read_a, next_char, read_decimal,
275 read_radix, read_f, read_x): Add dtp argument, pass it all around,
276 adjust for internal function API changes and removal of global
278 (set_integer): Adjust internal_error caller.
279 * io/write.c (no_leading_blank, nml_delim): Remove variables.
280 (write_a, calculate_sign, calculate_G_format, output_float,
281 write_l, write_float, write_int, write_decimal, write_i, write_b,
282 write_o, write_z, write_d, write_e, write_f, write_en, write_es,
283 write_x, write_char, write_logical, write_integer, write_character,
284 write_real, write_complex, write_separator,
285 list_formatted_write_scalar, list_formatted_write, nml_write_obj,
286 namelist_write): Add dtp argument, pass it all around, adjust for
287 internal function API changes and removal of global variables.
288 (extract_int, extract_uint, extract_real): Adjust internal_error
290 * runtime/fpu.c (_GNU_SOURCE): Don't define here.
291 * runtime/error.c: Include ../io/unix.h.
292 (filename, line): Remove variables.
293 (st_printf): Pass address of a local variable to init_error_stream.
294 (show_locus): Add cmp argument. Use fields it points to rather than
295 filename and line variables.
296 (os_error, runtime_error): Remove show_locus calls.
297 (internal_error): Add cmp argument. Pass it down to show_locus.
298 (generate_error): Likewise. Use flags bitmask instead of non-NULL
299 check for iostat and iomsg parameter presence, adjust for st_*
300 calling convention changes.
301 * runtime/stop.c (stop_numeric, stop_string): Remove show_locus
303 * runtime/pause.c (pause_numeric, pause_string): Likewise.
304 * runtime/string.c: Include ../io/io.h.
305 (find_option): Add cmp argument. Pass it down to generate_error.
306 * intrinsics/flush.c (recursive_flush): Remove.
307 (flush_i4, flush_i8): Use flush_all_units. Add unlock_unit
309 * intrinsics/rand.c: Include ../io/io.h.
310 (rand_seed_lock): New variable.
311 (srand, irand): Add locking.
312 (init): New constructor function.
313 * intrinsics/random.c: Include ../io/io.h.
314 (random_lock): New variable.
315 (random_r4, random_r8, arandom_r4, arandom_r8): Add locking.
316 (random_seed): Likewise. open failed if fd < 0. Set i correctly.
317 (init): New constructor function.
318 * intrinsics/system_clock.c (tp0, t0): Remove.
319 (system_clock_4, system_clock_8): Don't subtract tp0/t0 from current
320 time, use just integer arithmetics.
321 * intrinsics/tty.c (isatty_l4, isatty_l8, ttynam_sub): Add
324 2005-11-20 Richard Henderson <rth@redhat.com>
326 * Makefile.am: Revert 2005-11-14 change. Enable -free-vectorize
327 via gmake per-target variables.
328 * Makefile.in, aclocal.m4: Regenerate.
330 2005-11-18 Francois-Xavier Coudert <coudert@clipper.ens.fr>
332 * configure.ac: Add "-I ." to the AM_FCFLAGS.
333 * configure: Regenerate.
335 2005-11-18 Hans-Peter Nilsson <hp@axis.com>
337 * config/fpu-glibc.h (set_fpu): Only call fedisableexcept for
338 nonzero FE_ALL_EXCEPT.
340 2005-11-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
343 * io/io.h (unit_access): Add ACCESS_APPEND.
344 * io/open.c (access_opt): Add APPEND value for ACCESS keyword.
345 (st_open): Use that new value to set the POSITION accordingly.
347 2005-11-14 Janne Blomqvist <jb@gcc.gnu.org>
350 * Makefile.am: Add -ftree-vectorize for compiling matmul.
351 * m4/matmul.m4: Add const and restrict to type declarations as
353 * m4/matmull.m4: Likewise.
354 * Makefile.in: Regenerated.
355 * generated/matmul_*.c: Likewise.
357 2005-11-13 Francois-Xavier Coudert <coudert@clipper.ens.fr>
359 * intrinsics/fget.c: New file.
360 * intrinsics/ftell.c: New file.
361 * io/unix.c (stream_offset): New function.
362 * io/io.h: Add prototype for stream_offset.
363 * Makefile.am: Add intrinsics/fget.c and intrinsics/ftell.c.
364 * Makefile.in: Regenerate.
366 2005-11-12 Steven G. Kargl <kargls@comcast.net>
369 * intrinsics/string_intrinsics.c (string_scan): Off by one; Fix typos
372 2005-11-10 Andreas Jaeger <aj@suse.de>
374 * libgfortran.h: Add proper defines where needed.
376 2005-11-10 Andreas Jaeger <aj@suse.de>
378 * libgfortran.h: Add missing prototypes for internal_pack
381 2005-11-06 Janne Blomqvist <jb@gcc.gnu.org>
385 * io/io.h: Add argument to prototypes, add prototypes for
386 size_from_*_kind functions.
387 * io/list_read.c (read_complex): Add size argument, use
389 (list_formatted_read): Add size argument, cleanup.
390 (list_formatted_read_scalar): Add size argument.
391 (nml_read_obj): Fix for padding.
392 * io/transfer.c: Add argument to transfer function pointer.
393 (unformatted_read): Add size argument.
394 (unformatted_write): Likewise.
395 (formatted_transfer_scalar): Fix for padding with complex(10).
396 (formatted_transfer): Add size argument, cleanup.
397 (transfer_integer): Add size argument to transfer call.
398 (transfer_real): Likewise.
399 (transfer_logical): Likewise.
400 (transfer_character): Likewise.
401 (transfer_complex): Likewise.
402 (transfer_array): New kind argument, use it.
403 (data_transfer_init): Add size argument to formatted_transfer
405 (iolength_transfer): Add size argument, cleanup.
406 * io/write.c (write_complex): Add size argument, fix for padding
408 (list_formatted_write): Add size argument, cleanup.
409 (list_formatted_write_scalar): Add size argument, use it.
410 (nml_write_obj): Fix for size vs. kind issue.
411 * io/size_from_kind.c: New file.
412 * Makefile.am: Add io/size_from_kind.c.
413 * configure: Regenerate.
414 * Makefile.in: Regenerate.
416 2005-11-06 Francois-Xavier Coudert <coudert@clipper.ens.fr>
418 * intrinsics/ctime.c: New file.
419 * configure.ac: Add check for ctime.
420 * Makefile.am: Add ctime.c
421 * configure: Regenerate.
422 * config.h.in: Regenerate.
423 * Makefile.in: Regenerate.
425 2005-11-05 Richard Guenther <rguenther@suse.de>
427 * configure.ac: Use AM_FCFLAGS for extra flags, not FCFLAGS.
428 * configure: Regenerate.
430 2005-11-05 Francois-Xavier Coudert <coudert@clipper.ens.fr>
432 * intrinsics/tty.c (ttynam): New function.
434 2005-11-04 Steven G. Kargl <kargls@comcast.net>
437 * runtime/stop.c (stop_numeric): Use stop_code = -1.
439 2005-11-04 Francois-Xavier Coudert <coudert@clipper.ens.fr>
442 * runtime/main.c (stupid_function_name_for_static_linking): New
444 * runtime/error.c (internal_error): Call
445 stupid_function_name_for_static_linking.
446 * libgfortran.h: Add prototype for
447 stupid_function_name_for_static_linking.
449 2005-11-01 Paul Thomas <pault@gcc.gnu.org>
452 * libgfortran/intrinsics/date_and_time.c: Add interface to
453 the functions date_and_time for the intrinsic function secnds.
455 2005-10-31 Jerry DeLisle <jvdelisle@verizon.net>
458 * io/list_read.c (free_saved): Set saved_used to zero.
460 2005-10-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
463 * io/unix.c (flush_if_preconnected): New function.
464 * io/io.h: Add prototype for flush_if_preconnected.
465 * io/transfer.c (data_transfer_init): Use flush_if_preconnected
466 to workaround buggy mixed C-Fortran code.
468 2005-10-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
470 * Makefile.am: Add intrinsics/malloc.c file.
471 * Makefile.in: Regenerate.
472 * intrinsics/malloc.c: New file, with implementations for free
473 and malloc library functions.
475 2005-10-29 Mike Stump <mrs@apple.com>
477 * Makefile.am (kinds.h): Remove target, if command fails.
478 (selected_int_kind.inc): Likewise.
479 (selected_real_kind.inc): Likewise.
480 * Makefile.in: Regenerate.
482 2005-10-28 Francois-Xavier Coudert <coudert@clipper.ens.fr>
485 * Makefile.am (intrinsics): Add signal.c.
486 * Makefile.in: Regenerate.
487 * configure.ac: Checks for signal and alarm.
488 * config.h.in: Regenerate.
489 * configure: Regenerate.
490 * intrinsics/signal.c: New file for SIGNAL and ALARM intrinsics.
492 2005-10-28 Francois-Xavier Coudert <coudert@clipper.ens.fr>
494 * acinclude.m4 (LIBGFOR_CHECK_FPSETMASK): New check.
495 * configure.ac: Check for floatingpoint.h, fptrap.h and float.h
496 headers. Use LIBGFOR_CHECK_FPSETMASK. Check for fp_trap and
498 * configure.host: Add case for systems with fpsetmask and systems
499 with fp_trap/fp_enable.
500 * config/fpu-sysv.h: New file, FPU code using fpsetmask.
501 * config/fpu-aix.h: New file, FPU code for AIX using fp_trap and
503 * aclocal.m4: Regenerate.
504 * configure: Regenerate.
505 * config.h.in: Regenerate.
507 2005-10-24 Jerry DeLisle <jvdelisle@verizon.net>
510 * libgfortran.h: Remove array stride error code.
511 * runtime/error.c: Remove array stride error.
512 * io/io.h: Change name of 'nml_loop_spec' to 'array_loop_spec' to be
513 generic. Add pointer to array_loop_spec and rank to gfc_unit
515 * io/list_read.c: Revise nml_loop_spec references to array_loop_spec.
516 * io/transfer.c (init_loop_spec): New function to initialize
518 (next_array_record): New function to return the index to the next array
519 record by incrementing through the array_loop_spec.
520 (next_record_r): Use new function.
521 (next_record_w): Use new function.
522 (finalize_transfer): Free memory allocated for array_loop_spec.
523 * io/unit.c (get_array_unit_len): Delete this function. Use new
524 function init_loop_spec to initialize the array_loop_spec.
526 2005-10-24 Paul Thomas <pault@gcc.gnu.org>
529 * libgfortran/io/list_read.c (namelist_read): Exit with call to
530 free_saved () so that character strings do not accumulate.
532 2005-10-23 Jerry DeLisle <jvdelisle@verizon.net>
535 * io/transfer.c (read_block): Change the order of execution to not read
537 (read_block_direct): Same change.
539 2005-10-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
542 * acinclude.m4 (LIBGFOR_CHECK_WORKING_STAT): New check.
543 * configure.ac: Use LIBGFOR_CHECK_WORKING_STAT.
544 * Makefile.in: Regenerate.
545 * configure: Regenerate.
546 * config.h.in: Regenerate.
547 * aclocal.m4: Regenerate.
548 * io/unix.c (compare_file_filename): Add fallback case for
549 systems without working stat.
550 * io/open.c (already_open): Correct call to
551 compare_file_filename.
552 * io/io.h: Correct proto for compare_file_filename.
554 2005-10-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
556 * runtime/fpu.c: Add _GNU_SOURCE definition.
557 * config/fpu-glibc.h: Remove __USE_GNU definition.
559 2005-10-23 Paul Thomas <pault@gcc.gnu.org>
562 * intrinsics/spread_generic.c (spread_internal_scalar): New
563 function that handles the special case of spread with a scalar
564 source. This has new interface functions -
565 (spread_scalar, spread_char_scalar): New functions to interface
566 with the calls specified in gfc_resolve_spread.
568 2005-10-21 Francois-Xavier Coudert <coudert@clipper.ens.fr>
571 * io/unix.c: Add fallback definition for SSIZE_MAX.
573 2005-10-19 Francois-Xavier Coudert <coudert@clipper.ens.fr>
575 * c99_protos.h: Define preprocessor HAVE_ macros with value 1
576 instead of empty value.
577 * intrinsics/c99_functions.c: Likewise.
578 * intrinsics/getXid.c: Define HAVE_GETPID with value 1 instead of
580 * intrinsics/sleep.c: Define HAVE_SLEEP with value 1 instead of
583 2005-10-19 Francois-Xavier Coudert <coudert@clipper.ens.fr>
586 * c99_protos.h: Define HAVE_ macros for all provided functions.
588 2005-10-14 Uros Bizjak <uros@kss-loka.si>
590 * config/fpu-387.h (set_fpu): Remove extra ":" in stmxcsr.
591 Change cw and cw_sse variables to unsigned.
592 (SSE): New definition.
595 2005-10-13 Thomas Koenig <Thomas.Koenig@online.de>
597 * io/unix.c(fd_alloc_r_at): Use read() instead of do_read()
598 only in case of special files (e.g. terminals).
600 2005-10-13 Uros Bizjak <uros@kss-loka.si>
602 * config/fpu-387.h (set_fpu): Add "=m" for stmxcsr.
604 2005-10-12 Francois-Xavier Coudert <coudert@clipper.ens.fr>
606 * Makefile.am: Add fpu.c to the build process, and
607 target-dependent code as fpu-target.h.
608 * Makefile.in: Regenerate.
609 * configure.ac: Add call to configure.host to set
611 * configure: Regenerate.
612 * configure.host: New script to determine which host-dependent
614 * libgfortran.h: Add fpe option, remove previous fpu_ options.
615 Add bitmasks for different FPE traps. Add prototype for set_fpu.
616 * runtime/environ.c: Remove environment variables to control
618 * runtime/fpu.c (set_fpe): New function for the front-end.
619 * runtime/main.c (init): Set FPU state.
620 * config: New directory to store host-dependent code.
621 * config/fpu-387.h: New file with code handling the i387 FPU.
622 * config/fpu-glibc.h: New file with code for glibc systems.
623 * config/fpu-generic.h: Fallback for the most generic host. Issue
626 2005-10-12 Janne Blomqvist <jblomqvi@cc.hut.fi>
628 * io/unix.c(fd_alloc_r_at): Remove parts of patch of 2005/10/07 that
629 cause input from the terminal to hang.
631 2005-10-11 Steven G. Kargl <kargls@comcast.net>
634 * c99_functions.c (csqrtf, csqrt): Fix choice of branch cut. Note
635 csqrt{f} were imported from glibc, and this bug is still present
636 there. glibc PR is 1146.
638 2005-10-07 Janne Blomqvist <jblomqvi@cc.hut.fi>
642 * io/io.h: Add read and write members to stream, define access
644 * io/transfer.c (read_block_direct): New function.
645 (write_block_direct): New function.
646 (unformatted_read): Change to use read_block_direct.
647 (unformatted_write): Change to use write_block_direct.
648 * io/unix.c: Remove mmap includes and defines.
651 (reset_stream): New function.
652 (do_read): New function.
653 (do_write): New function.
654 (fd_flush): Change to use do_write() instead of writen().
655 (fd_alloc_r_at): Change to use do_read().
656 (fd_seek): Change return type to try, as the prototype. Add check
657 to avoid syscall overhead if possible.
658 (fd_read): New function.
659 (fd_write): New function.
660 (fd_open): Set pointers for new functions.
661 (mem_read): New function.
662 (mem_write): New function.
663 (open_internal): Set pointers for new functions.
664 (is_seekable): Clean up comment.
666 2005-10-07 Jerry DeLisle <jvdelisle@verizon.net>
668 * io/transfer.c (write_block): Add test for end-of-file condition,
669 removed from mem_alloc_w_at. (next_record_w): Clean up checks for
670 NULL pointer returns from s_alloc_w.
671 * io/unix.c (mem_alloc_w_at): Remove call to generate_error end-of-file.
672 * io/write.c (write_float): Add checks for NULL pointer returns from
673 write_block calls. (write_integer): Same.
675 2005-10-03 Jakub Jelinek <jakub@redhat.com>
677 * runtime/memory.c (allocate_size): Malloc 1 byte if size == 0.
679 2005-10-03 Francois-Xavier Coudert <coudert@clipper.ens.fr>
683 * Makefile.am: Add generated files for large real and integers
684 kinds. Add a rule to create the kinds.inc c99_protos.inc files.
685 Use kinds.inc to preprocess Fortran generated files.
686 * libgfortran.h: Add macro definitions for GFC_INTEGER_16_HUGE,
687 GFC_REAL_10_HUGE and GFC_REAL_16_HUGE. Add types gfc_array_i16,
688 gfc_array_r10, gfc_array_r16, gfc_array_c10, gfc_array_c16,
690 * mk-kinds-h.sh: Define macros HAVE_GFC_LOGICAL_* and
691 HAVE_GFC_COMPLEX_* when these types are available.
692 * intrinsics/ishftc.c (ishftc16): New function for GFC_INTEGER_16.
693 * m4/all.m4, m4/any.m4, m4/count.m4, m4/cshift1.m4, m4/dotprod.m4,
694 m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4, m4/eoshift3.m4,
695 m4/exponent.m4, m4/fraction.m4, m4/in_pack.m4, m4/in_unpack.m4,
696 m4/matmul.m4, m4/matmull.m4, m4/maxloc0.m4, m4/maxloc1.m4,
697 m4/maxval.m4, m4/minloc0.m4, m4/minloc1.m4, m4/minval.m4, m4/mtype.m4,
698 m4/nearest.m4, m4/pow.m4, m4/product.m4, m4/reshape.m4,
699 m4/set_exponent.m4, m4/shape.m4, m4/specific.m4, m4/specific2.m4,
700 m4/sum.m4, m4/transpose.m4: Protect generated functions with
701 appropriate "#if defined (HAVE_GFC_type_kind)" preprocessor directives.
702 * Makefile.in: Regenerate.
703 * all files in generated/: Regenerate.
705 2005-10-01 Jakub Jelinek <jakub@redhat.com>
707 * runtime/memory.c (malloc_t): Remove.
708 (GFC_MALLOC_MAGIC, HEADER_SIZE, DATA_POINTER, DATA_HEADER): Remove.
709 (mem_root, runtime_cleanup, malloc_with_header): Remove.
710 (internal_malloc_size): Use just get_mem if size != 0, return NULL
712 (internal_free): Just free if non-NULL.
713 (internal_realloc_size): Remove debugging stuff.
714 (allocate_size): Use malloc directly, remove debugging stuff.
715 (deallocate): Use free directly, fix error message wording.
717 * libgfortran.h (GFC_ITOA_BUF_SIZE, GFC_XTOA_BUF_SIZE,
718 GFC_OTOA_BUF_SIZE, GFC_BTOA_BUF_SIZE): Define.
719 (gfc_itoa, xtoa): Add 2 extra arguments.
720 * runtime/environ.c: Include stdio.h.
721 (check_buffered): Use sprintf.
722 * runtime/error.c: Include assert.h.
723 (gfc_itoa, xtoa): Add 2 extra arguments, avoid using static
725 (st_printf, st_sprintf): Adjust callers.
726 * io/write.c (otoa, btoa): Add 2 extra arguments, avoid using
728 (write_int, write_decimal): Add 2 extra arguments to conv
729 function pointer, adjust caller.
730 (write_integer): Adjust gfc_itoa caller.
732 * io/unit.c (get_array_unit_len): Return 0 rather than NULL.
734 * io/read.c (read_f): Remove spurious pointer dereference.
736 2005-09-30 Janne Blomqvist <jblomqvi@cc.hut.fi>
739 * io/open.c (edit_modes): Check for correct flag.
741 2005-09-29 Jakub Jelinek <jakub@redhat.com>
743 * runtime/string.c (find_option): Change 3rd argument to
745 * libgfortran.h (find_option): Likewise.
746 * runtime/environ.c (rounding, precision, signal_choices): Constify.
747 (init_choice, show_choice): Change 2nd argument to const choice *.
748 * io/open.c (access_opt, action_opt, blank_opt, delim_opt, form_opt,
749 position_opt, status_opt, pad_opt): Constify.
750 * io/transfer.c (advance_opt): Likewise.
751 * io/inquire.c (undefined): Likewise.
752 * io/close.c (status_opt): Likewise.
753 * io/format.c (posint_required, period_required, nonneg_required,
754 unexpected_element, unexpected_end, bad_string, bad_hollerith,
755 reversion_error): Likewise.
756 * io/unix.c (yes, no, unknown): Change from const char *
759 2005-09-27 Steve Ellcey <sje@cup.hp.com>
762 * acinclude.m4 (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE): New.
763 (LIBGFOR_CHECK_FOR_BROKEN_ISNAN): New.
764 (LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): New.
765 * configure.ac (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE): Add use.
766 (LIBGFOR_CHECK_FOR_BROKEN_ISNAN): Add use.
767 (LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): Add use.
768 * configure: Regenerate.
769 * config.h.in: Regenerate.
770 * libgfortan.h (isfinite): undef if broken, set if needed.
771 (isnan): undef if broken, set if needed.
772 (fpclassify): undef if broken, set if needed.
773 * io/write.c: Remove TODO comment about working isfinite.
774 * intrinsics/c99_functions.c (round): Use isfinite instead
776 * intrinsics/c99_functions.c (roundf): Ditto.
778 2005-09-24 Janne Blomqvist <jblomqvi@cc.hut.fi>
780 * io.h: Changed prototypes of list_formatted_{read|write}.
781 * list_read.c (list_formatted_read): Renamed to
782 list_formatted_read_scalar and made static.
783 (list_formatted_read): New function.
784 * transfer.c: Prototype for transfer_array. Changed transfer
786 (unformatted_read): Add nelems argument, use it.
787 (unformatted_write): Likewise.
788 (formatted_transfer): Changed name to formatted_transfer_scalar.
789 (formatted_transfer): New function.
790 (transfer_integer): Add nelems argument to transfer call, move
791 updating item count to transfer functions.
792 (transfer_real): Likewise.
793 (transfer_logical): Likewise.
794 (transfer_character): Likewise.
795 (transfer_complex): Likewise.
796 (transfer_array): New function.
797 (data_transfer_init): Call formatted_transfer with new argument.
798 (iolength_transfer): New argument, use it.
799 * write.c (list_formatted_write): Renamed to
800 list_formatted_write_scalar, made static.
801 (list_formatted_write): New function.
803 2005-09-26 David Edelsohn <edelsohn@gnu.org>
805 * configure.ac: Add check for __clog.
806 * configure: Regenerate.
808 2005-09-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
810 * c99_protos.h: Add prototypes for C99 complex functions.
811 * libgfortran.h: Include complex.h before c99_protos.h.
812 * intrinsics/c99_functions.c: Define HAVE_ macros for the
813 fallback functions we provide.
814 (cabsf, cabs, cabsl, cargf, carg, cargl, cexpf, cexp, cexpl,
815 clogf, clog, clogl, clog10f, clog10, clog10l, cpowf, cpow, cpowl,
816 cqsrtf, csqrt, csqrtl, csinhf, csinh, csinhl, ccoshf, ccosh,
817 ccoshl, ctanhf, ctanh, ctanhl, csinf, csin, csinl, ccosf, ccos,
818 ccosl, ctanf, ctan, ctanl): New fallback functions.
819 * Makefile.am (gfor_math_trig_c, gfor_math_trig_obj,
820 gfor_specific_c, gfor_cmath_src, gfor_cmath_obj): Remove.
821 * Makefile.in: Regenerate.
822 * configure.ac: Remove checks for csin. Add checks for all C99
824 * config.h.in: Regenerate.
825 * configure: Regenerate.
826 * aclocal.m4: Regenerate.
828 2005-09-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
829 Danny Smith <dannysmith@users.sourceforge.net>
832 * intrinsics/getXid.c: Add getpid wrapper for MinGW.
833 * intrinsics/getlog.c: Add getlogin wrapper for MinGW.
834 * intrinsics/hostnm.c: Add gethostname wrapper for MinGW.
836 2005-09-24 Francois-Xavier Coudert <coudert@clipper.ens.fr>
839 * intrinsics/sleep.c: Add correct sleep macro for MinGW.
841 2005-09-24 Francois-Xavier Coudert <coudert@clipper.ens.fr>
844 * intrinsics/cpu_time.c (__cpu_time_1): Provide a MS Windows
847 2005-09-14 Jerry DeLisle <jvdelisle@verizon.net
849 PR fortran/21875 Internal Unit Array I/O, NIST
850 * libgfortran.h: Add run time error code for array stride.
851 * runtime/error.c (translate_error): Add error message for
853 * io/io.h: Add array descriptor pointer to IOPARM structure.
854 Add prtotypes for two new functions.
855 * io/transfer.c (data_transfer_init): Removed initialization and
856 moved to unit.c (get_unit)
857 * io/transfer.c (next_record_r): Include internal unit read
859 * io/transfer.c (next_record_w): Include internal unit write
860 functionality, including padding of character array records.
861 * io/unit.c (get_array_unit_len): New function to return the number
862 of records in the character array 'file' from the array descriptor.
863 * io/unit.c (get_unit): Gathered initialization code from
864 init_data_transfer for internal units and added initialization of
865 character array unit.
866 * io/unit.c (is_array_io): New function to determine if internal unit
868 * io/unix.c (mem_alloc_w_at): Add error checks for bad record length
871 2005-09-13 Richard Sandiford <richard@codesourcery.com>
874 * intrinsics/cshift0.c (cshift0): Add an extra size argument.
875 (cshift0_1, cshift0_2, cshift0_4, cshift0_8): Replace explicit
876 implementations with...
877 (DEFINE_CSHIFT): ...this new macro. Define character versions too.
878 * intrinsics/eoshift0.c (zeros): Delete.
879 (eoshift0): Add extra size and filler arguments. Use memset if no
881 (eoshift0_1, eoshift0_2, eoshift0_4, eoshift0_8): Replace explicit
882 implementations with...
883 (DEFINE_EOSHIFT): ...this new macro. Define character versions too.
884 * intrinsics/eoshift2.c (zeros): Delete.
885 (eoshift2): Add extra size and filler arguments. Use memset if no
887 (eoshift2_1, eoshift2_2, eoshift2_4, eoshift2_8): Replace explicit
888 implementations with...
889 (DEFINE_EOSHIFT): ...this new macro. Define character versions too.
890 * intrinsics/pack.c (pack_internal): New static function, reusing
891 the contents of pack and adding an extra size argument. Change
892 "mptr" rather than "m" when calculating the array size.
893 (pack): Redefine as a forwarder to pack_internal.
894 (pack_s_internal): New static function, reusing the contents of
895 pack_s and adding an extra size argument.
896 (pack_s): Redefine as a forwarder to pack_s_internal.
897 (pack_char, pack_s_char): New functions.
898 * intrinsics/reshape.c (reshape_internal): New static function,
899 reusing the contents of reshape and adding an extra size argument.
900 (reshape): Redefine as a forwarder to reshape_internal.
901 (reshape_char): New function.
902 * intrinsics/spread.c (spread_internal): New static function,
903 reusing the contents of spread and adding an extra size argument.
904 (spread): Redefine as a forwarder to spread_internal.
905 (spread_char): New function.
906 * intrinsics/transpose.c (transpose_internal): New static function,
907 reusing the contents of transpose and adding an extra size argument.
908 (transpose): Redefine as a forwarder to transpose_internal.
909 (transpose_char): New function.
910 * intrinsics/unpack.c (unpack_internal): New static function, reusing
911 the contents of unpack1 and adding extra size and fsize arguments.
912 (unpack1): Redefine as a forwarder to unpack_internal.
913 (unpack0): Call unpack_internal instead of unpack1.
914 (unpack1_char, unpack0_char): New functions.
915 * m4/cshift1.m4 (cshift1): New static function, reusing the contents
916 of cshift1_<kind> and adding an extra size argument.
917 (cshift1_<kind>): Redefine as a forwarder to cshift1.
918 (cshift1_<kind>_char): New function.
919 * m4/eoshift1.m4 (zeros): Delete.
920 (eoshift1): New static function, reusing the contents of
921 eoshift1_<kind> and adding extra size and filler arguments.
922 Fix calculation of hstride. Use memset if no bound is provided.
923 (eoshift1_<kind>): Redefine as a forwarder to eoshift1.
924 (eoshift1_<kind>_char): New function.
925 * m4/eoshift3.m4 (zeros): Delete.
926 (eoshift3): New static function, reusing the contents of
927 eoshift3_<kind> and adding extra size and filler arguments.
928 Use memset if no bound is provided.
929 (eoshift3_<kind>): Redefine as a forwarder to eoshift3.
930 (eoshift3_<kind>_char): New function.
931 * generated/cshift1_4.c, generated/cshift1_8.c,
932 * generated/eoshift1_4.c, generated/eoshift1_8.c,
933 * generated/eoshift3_4.c, generated/eoshift3_8.c: Regenerate.
935 2005-09-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
938 * io/unix.c (is_preconnected): Add function to test if a stream
939 corresponds to a preconnected unit.
940 * io/io.h: Add prototype for is_preconnected.
941 * io/transfer.c (data_transfer_init): Do not truncate
944 2005-09-10 Janne Blomqvist <jblomqvi@cc.hut.fi>
946 * io/unix.c: Remove mmap code.
948 2005-09-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
951 * io/close.c (st_close): Call library_end even in case of error.
953 2005-09-09 Thomas Koenig <Thomas.Koenig@online.de>
955 * io/io.h: Add iomsg as last field of st_parameter.
956 * runtime/error.c (generate_error): If iomsg is present, copy
959 2005-09-09 Richard Sandiford <richard@codesourcery.com>
962 * runtime/memory.c (internal_malloc_size): Return a null pointer
964 (internal_free): Do nothing if the pointer is null.
965 (internal_realloc_size, internal_realloc, internal_realloc64): New.
967 2005-09-07 Francois-Xavier Coudert <coudert@clipper.ens.fr>
970 * acinclude.m4 (LIBGFOR_CHECK_CRLF): New check.
971 * configure.ac: Use new check.
972 * configure.in: Regenerate.
973 * config.h.in: Regenerate.
974 * configure: Regenerate.
975 * io/transfer.c (next_record_w): Add case for CRLF as line
977 * io/unix.c (tempfile, regular_file): Open files with
978 O_BINARY on systems with CRLF.
980 2005-09-07 Steve Ellcey <sje@cup.hp.com>
983 * io/write.c (extract_int): Use memcpy to access buffer.
984 (extract_uint): Ditto.
985 (extract_real): Ditto.
987 2005-09-05 Thomas Koenig <Thomas.Koenig@online.de>
989 * io/list_read.c: Adjust size of of value to 32 (to hold
990 kind=16 complex values).
992 2005-09-04 Thomas Koenig <Thomas.Koenig@online.de>
995 * io/transfer.c(data_transfer_init): Check for a too-large
996 record number. Return if sseek failed.
998 2005-09-03 Jakub Jelinek <jakub@redhat.com>
1000 * io/read.c (read_x): Take int argument instead of fnode * and
1001 digging the N from F->u.n.
1002 * io/io.h (read_x): Adjust prototype.
1003 * io/transfer.c (formatted_transfer): Adjust callers. Don't clobber
1006 2005-09-02 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1008 * io/unix.c (stream_ttyname): Protect use of ttyname by
1010 * configure.ac: Add check for ttyname.
1011 * config.h.in: Regenerate.
1012 * configure: Regenerate.
1014 2005-09-02 Andreas Jaeger <aj@suse.de>
1016 * libgfortran.h: Add prototype for init_compile_options.
1018 * io/io.h: Add prototype for notify_std.
1020 2005-08-31 Steve Ellcey <sje@cup.hp.com>
1022 * io/read.c (set_integer): Use memcpy to fill buffer.
1024 2005-08-31 Steve Ellcey <sje@cup.hp.com>
1027 * io/read.c (convert_real): Use memcpy to fill buffer.
1029 2005-08-29 Thomas Koenig <Thomas.Koenig@online.de>
1032 * io/lock.c(library_start): If ioparm.iostat is present, clear
1035 2005-08-27 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1037 * acinclude.m4 (LIBGFOR_CHECK_UNLINK_OPEN_FILE): Add check to see
1038 if target can unlink open files.
1039 * configure.ac: Use this new test.
1040 * config.h.in: Regenerate.
1041 * configure: Regenerate.
1042 * Makefile.in: Regenerate.
1043 * aclocal.ac: Regenerate.
1044 * io/io.h: Add prototype for unpack_filename.
1045 * io/close.c (st_close): Delete file after closing unit if
1046 HAVE_UNLINK_OPEN_FILE is not defined.
1047 * io/unix.c (unpack_filename): Unlink scratch file after opening
1048 it only if HAVE_UNLINK_OPEN_FILE is defined.
1050 2005-08-17 Kelley Cook <kcook@gcc.gnu.org>
1052 * All files: Update FSF address.
1054 2005-08-16 Thomas Koenig <Thomas.Koenig@online.de>
1057 * io/transfer.c (iolength_transfer): Remove __attribute__ ((unused))
1058 from type. Return correct length for inquire(iolength=)
1059 for complex variables.
1061 2005-08-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1062 Steven Bosscher <stevenb@suse.de>
1065 * Makefile.am: Add file runtime/compile_options.c.
1066 * Makefile.in: Regenerate.
1067 * libgfortran.h: Create structure compile_options_t. Define the
1068 compile_options variable and GFC_STD_ macros.
1069 * runtime/compile_options.c: New file.
1070 * runtime/error.c (notify_std): New function.
1071 * runtime/main.c (init): Call init_compile_options during
1073 * io/format.c: Use the new notify_std function for the $
1074 descriptor extension.
1076 2005-08-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1077 * Makefile.am: Add file intrinsics/tty.c to Makefile process.
1078 * Makefile.in: Regenerate.
1079 * io/io.h: Prototypes for new functions stream_isatty and
1081 * io/unix (stream_isatty, stream_ttyname): New functions to call
1082 isatty() and ttyname() on a given unit.
1083 * intrinsics/tty.c: New file to implement g77 intrinsics TTYNAM
1086 2005-08-08 Jerry DeLisle <jvdelisle@verizon.net>
1089 * io/transfer.c (data_transfer_init): Initialize
1090 current_unit->bytes_left for a read.
1092 2005-08-07 Janne Blomqvist <jblomqvi@cc.hut.fi>
1095 * io/backspace.c: File removed, contents moved to ...
1096 * io/endfile.c: Ditto.
1097 * io/rewind.c: Ditto.
1098 * io/file_pos.c: New file, ... here.
1099 * Makefile.am: Add file_pos.c to list, remove obsolete files.
1100 * Makefile.in: Regenerated.
1102 2005-08-07 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1104 * io/io.h: Change DEFAULT_TEMPDIR to /tmp instead of /var/tmp.
1105 * io/unix.c (tempfile): Look at the TEMP environment variable
1106 to find the temporary files directory. Whitespace correction.
1108 2005-08-06 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1110 * io/unix.c: Add O_RDWR to open() call.
1112 2005-08-04 Paul Thomas <pault@gcc.gnu.org>
1114 * transfer.c (data_transfer_init): Truncate file in
1115 sequential WRITE when last_record == 0, rather than
1116 current_record. Cures problem on RH9.
1118 2005-08-03 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1120 * libgfortran.h: When isfinite is not provided by the system,
1121 define it as a macro, so that it can accept any floating point
1124 2005-08-01 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1127 * intrinsics/flush.c (flush_i8): Add function flush_i8. Update
1130 2005-07-31 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1133 * intrinsics/abort.c (abort): Close units before aborting.
1134 Updated copyright years.
1136 2005-07-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1139 * io/write.c (write_real): Add default formats for real(10) and
1142 2005-07-30 Paul Thomas <pault@gcc.gnu.org>
1144 PR fortran/22570 and related issues.
1145 * transfer.c (formatted_transfer): Make sure that there
1146 really is data present before X- or T- editing. Move all
1147 treatment of tabbing during writes to start of next data
1148 producing format. Suppress incorrect zeroing of bytes_left
1149 in slash formating. Insert int cast for assignment of a
1150 difference of two gfc_offsets.
1152 2005-07-23 Jerry DeLisle <jvdelisle@verizon.net>
1154 * io/write.c (write_float): Revise output of IEEE exceptional
1155 values to comply with F95 and F2003 standards.
1157 2005-07-22 Jerry DeLisle <jvdelisle@verizon.net>
1160 * io/unit.c (init_units): Replace BLANK_ZERO with
1163 2005-07-22 Jerry DeLisle <jvdelisle@verizon.net>
1165 PR libfortran/21875 (FM111.f)
1166 * io/read.c (next_char): Return a ' ' character when BLANK_ZERO
1167 or BLANK_NULL are active.
1168 (read_decimal): Interpret ' ' character correctly for BZ or BN.
1169 (read_radix): Interpret ' ' character correctly for BZ or BN.
1170 (read_f): Interpret ' ' character correctly for BZ or BN.
1172 2005-07-22 Paul Thomas <pault@gcc.gnu.org>
1175 * read.c (read_x): Correct the condition for doing the
1176 x-editing during formatted input.
1177 * transfer.c (formatted_transfer): Cast offset difference
1178 as int, clean-up arithmetic with new variable, bytes_used,
1179 zero counters for FMT_SLASH,
1180 (data_transfer_init) Zero X- and T-editing counters
1182 (next_record_w) Zero X- and T-editing counters.
1185 2005-07-17 Jerry DeLisle <jvdelisle@verizon.net>
1187 * io/write.c (write_float): Fix field width checks for
1188 printing 'Infinity' or 'Inf'.
1189 (output_float): Fix typo in comment.
1191 2005-07-12 Paul Thomas <pault@gcc.gnu.org>
1194 * transfer.c (formatted_transfer): Correct the problems
1195 with X- and T-editting that caused TLs followed by TRs
1196 to overwrite data, which caused NIST FM908.FOR to fail
1198 (data_transfer_init): Zero X- and T-editting counters at
1199 the start of formatted IO.
1200 * write.c (write_x): Write specified number of skips with
1201 specified number of spaces at the end.
1203 2005-07-13 Paul Thomas <pault@gcc.gnu.org>
1205 * io/read.c (read_complex): Prevent X formatting during reads
1206 from going beyond EOR to fix NIST fm908.FOR failure.
1207 * io/list_read.c (read_complex): Allow complex data in list-
1208 directed reads to have eols either side of the comma to
1209 fix NIST FM906.FOR failure.
1211 2005-07-12 Thomas Koenig <Thomas.Koenig@online.de>
1214 * io/unix.c: Add member special_file to type unix_stream.
1215 (fd_truncate): Don't call ftruncate or chsize if
1216 s refers to a special file.
1217 (fd_to_stream): initialize s->special_file.
1219 2005-07-11 David Edelsohn <edelsohn@gnu.org>
1221 PR libgfortran/22412
1222 * io/write.c (otoa): Bias p by SCRATCH_SIZE, not
1223 sizeof (SCRATCH_SIZE).
1226 2005-07-09 Jerry DeLisle <jvdelisle@verizon.net>
1228 PR libfortran/21875 (FM111.f)
1229 * io/read.c (next_char): Return a ' ' character when BLANK_ZERO or
1230 BLANK_NULL are active.
1231 (read_decimal): Interpret ' ' character correctly for BZ or BN.
1232 (read_radix): Interpret ' ' character correctly for BZ or BN.
1233 (read_f): Interpret ' ' character correctly for BZ or BN.
1234 * gfortran.dg/test (fmt_read_bz_bn.f90): New test case.
1236 2005-07-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1237 Thomas Koenig <Thomas.Koenig@online.de>
1240 * io/write.c (extract_unit): New function; extract
1241 ints as unsigned signed int of the correct size.
1242 (write_int): Use it.
1243 * runtime/error.c: Adjust copyright years.
1244 Adjust size of buffer to maximum that can occur.
1246 2005-07-07 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1248 * libgfortran.h (GFC_ARRAY_DESCRIPTOR): Replace 'type *base' by
1250 * intrinsics/cshift0.c, intrinsics/eoshift0.c,
1251 intrinsics/eoshift2.c,intrinsics/pack_generic.c,
1252 intrinsics/reshape_generic.c, intrinsics/spread_generic.c,
1253 intrinsics/transpose_generic.c, intrinsics/unpack_generic,
1254 m4/cshift1.m4, m4/eoshift1.m4, m4/eoshift3.m4, m4/iforeach.m4,
1255 m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4, m4/reshape.m4,
1256 m4,transpose.m4: Set renamed field 'offset' to zero instead of
1258 * generated/all_l4.c, generated/all_l8.c,
1259 generated/any_l4.c, generated/any_l8.c, generated/count_4_l4.c,
1260 generated/count_4_l8.c, generated/count_8_l4.c,
1261 generated/count_8_l8.c, generated/chift1_4.c,
1262 generated/cshift1_8.c, generated/eoshift1_4.c,
1263 generated/eoshift1_8.c, generated/eoshift3_4.c,
1264 generated/eoshift3_8.c, generated/matmul_c4.c,
1265 generated/matmul_c8.c, generated/matmul_i4.c, matmul_i8.c,
1266 generated/matmul_l4.c, generated/matmul_l8.c,
1267 generated/matmul_r4.c, generated/matmul_r8.c,
1268 generated/maxloc0_4_i4.c, generated/maxloc0_4_i8.c,
1269 generated/maxloc0_4_r4.c, generated/maxloc0_4_r8.c,
1270 generated/maxloc0_8_i4.c, generated/maxloc0_8_i8.c,
1271 generated/maxloc0_8_r4.c, generated/maxloc0_8_r8.c,
1272 generated/maxloc1_4_i4.c, generated/maxloc1_4_i8.c,
1273 generated/maxloc1_4_r4.c, generated/maxloc1_4_r8.c,
1274 generated/maxloc1_8_i4.c, generated/maxloc1_8_i8.c,
1275 generated/maxloc1_8_r4.c, generated/maxloc1_8_r8.c,
1276 generated/maxval_i4.c, generated/maxval_i8.c,
1277 generated/maxval_r4.c, generated/maxval_r8.c,
1278 generated/minloc0_4_i4.c, generated/minloc0_4_i8.c,
1279 generated/minloc0_4_r4.c, generated/minloc0_4_r8.c,
1280 generated/minloc0_8_i4.c, generated/minloc0_8_i8.c,
1281 generated/minloc0_8_r4.c, generated/minloc0_8_r8.c,
1282 generated/minloc1_4_i4.c, generated/minloc1_4_i8.c,
1283 generated/minloc1_4_r4.c, generated/minloc1_4_r8.c,
1284 generated/minloc1_8_i4.c, generated/minloc1_8_i8.c,
1285 generated/minloc1_8_r4.c, generated/minloc1_8_r8.c,
1286 generated/minval_i4.c, generated/minval_i8.c,
1287 generated/minval_r4.c, generated/minval_r8.c,
1288 generated/product_c4.c, generated/product_c8.c,
1289 generated/product_i4.c, generated/product_i8.c,
1290 generated/product_r4.c, generated/product_r8.c,
1291 generated/reshape_c4.c, generated/reshape_c8.c,
1292 generated/reshape_i4.c, generated/reshape_i8.c,
1293 generated/sum_c4.c, generated/sum_c8.c, generated/sum_i4.c,
1294 generated/sum_i8.c, generated/sum_r4.c, generated/sum_r8.c,
1295 generated/transpose_c4.c, generated/transpose_c8.c,
1296 generated/transpose_i4.c, generated/transpose_i8.c: Regenerate:
1298 2005-07-07 Thomas Koenig <Thomas.Koenig@online.de>
1301 * intrinsics/eoshift0.c: If abs(shift) > len, fill the
1302 the whole array with the boundary value, but don't overrun it.
1303 * intrinsics/eoshift2.c: Likewise.
1304 * m4/eoshift1.m4: Likewise.
1305 * m4/eoshift3.m4: Likewise.
1306 * generated/eoshift1_4.c: Regenerated.
1307 * generated/eoshift1_8.c: Regenerated.
1308 * generated/eoshift3_4.c: Regenerated.
1309 * generated/eoshift3_8.c: Regenerated.
1311 2005-07-07 Feng Wang <fengwang@nudt.edu.cn>
1314 * io/transfer.c (formatted_transfer): Enable FMT_A on other types to
1315 support Hollerith constants.
1317 2005-07-01 Andreas Jaeger <aj@suse.de>
1319 * intrinsics/unpack_generic.c: Remove const from parameter.
1321 * io/transfer.c (formatted_transfer): Remove unused variable.
1323 2005-06-28 Thomas Koenig <Thomas.Koenig@online.de>
1326 * m4/eoshift1.m4: Correct bstride (it needs to be multiplied
1327 by size since it's a char pointer).
1328 * m4/eoshift1_4.c: Regenerated.
1329 * m4/eoshift1_8.c: Regenerated.
1331 2005-06-28 Thomas Koenig <Thomas.Koenig@online.de>
1334 * m4/eoshift3.m4: Correct bstride (it needs to be multiplied
1335 by size since it's a char pointer).
1336 * m4/eoshift3_4.c: Regenerated.
1337 * m4/eoshift3_8.c: Regenerated.
1339 2005-06-28 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1342 * io/transfer.c (formatted_transfer): Do not iterate on the
1343 repeat count of a FMT_SLASH, since this is already done in
1346 2005-06-25 Thomas Koenig <Thomas.Koenig@online.de>
1349 * m4/cshift1.m4: Remove const from argument ret.
1350 Populate return array descriptor if ret->data is NULL.
1351 * m4/eoshift1.m4: Likewise.
1352 * m4/eoshift3.m4: Likewise.
1353 * generated/cshift1_4.c: Regenerated.
1354 * generated/cshift1_8.c: Regenerated.
1355 * generated/eoshift1_4.c: Regenerated.
1356 * generated/eoshift1_8.c: Regenerated.
1357 * generated/eoshift3_4.c: Regenerated.
1358 * generated/eoshift3_8.c: Regenerated.
1360 2005-06-24 Jerry DeLisle <jvdelisle@verizon.net>
1363 * Makefile.am: Include intrinsics/hyper.c.
1364 * c99_protos.h: Add prototypes for single precision versions of
1365 acosh, asinh, and atanh for platforms that do not have these.
1366 * config.h.in: Add #undef for wrappers.
1367 * configure.ac: Add checks for single precision versions.
1368 * aclocal.m4: Regenerated.
1369 * Makefile.in: Regenerated.
1370 * configure: Regenerated.
1371 * intrinsics/hyper.c: New file, adds new wrapper functions.
1373 2005-06-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1375 * intrinsics/c99_functions.c (log10l): New log10l function for
1376 systems where this is not available.
1377 * c99_protos.h: Prototype for log10l function.
1378 * libgfortran.h: Use generated kinds.h to define GFC_INTEGER_*,
1379 GFC_UINTEGER_*, GFC_LOGICAL_*, GFC_REAL_*, GFC_COMPLEX_*. Update
1380 prototypes for gfc_itoa and xtoa.
1381 * io/io.h: Update prototypes for set_integer and max_value.
1382 * io/list_read.c (convert_integer): Use new
1383 GFC_(INTEGER|REAL)_LARGEST type.
1384 * io/read.c (set_integer): Likewise.
1385 (max_value): Likewise.
1386 (convert_real): Likewise.
1388 (next_char): Likewise.
1389 (read_decimal): Likewise.
1390 (read_radix): Likewise.
1392 * io/write.c (extract_int): Use new GFC_INTEGER_LARGEST type.
1393 (extract_real): Use new GFC_REAL_LARGEST type.
1394 (calculate_exp): Likewise.
1395 (calculate_G_format): Likewise.
1396 (output_float): Likewise. Use log10l for long double values.
1397 Add comment for sprintf format. Use GFC_REAL_LARGEST_FORMAT.
1398 (write_l): Use new GFC_INTEGER_LARGEST type.
1399 (write_float): Use new GFC_REAL_LARGEST type.
1400 (write_int): Remove useless special case for (len < 8).
1401 (write_decimal): Use GFC_INTEGER_LARGEST.
1402 (otoa): Use GFC_UINTEGER_LARGEST as argument.
1403 (btoa): Use GFC_UINTEGER_LARGEST as argument.
1404 * runtime/error.c (gfc_itoa): Use GFC_INTEGER_LARGEST as
1406 (xtoa): Use GFC_UINTEGER_LARGEST as argument.
1407 * Makefile.am: Use mk-kinds-h.sh to generate header kinds.h
1408 with all Fortran kinds available.
1409 * configure.ac: Check for strtold and log10l.
1410 * Makefile.in: Regenerate.
1411 * aclocal.m4: Regenerate.
1412 * configure: Regenerate.
1413 * config.h.in: Regenerate.
1414 * mk-kinds-h.sh: Configuration script for available integer
1418 2005-06-18 Janne Blomqvist <jblomqvi@cc.hut.fi>
1420 * unix.c (stream_at_bof): Don't assume that all non-mmapped files
1422 (stream_at_eof): Likewise.
1424 2005-06-18 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1427 * io/read.c (convert_real): strtod can set errno to EINVAL on an
1428 empty string, but we shouldn't have an error in that case.
1430 2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1433 * io/list_read.c (eat_separator): No need to call next_record,
1434 even in non-namelist_mode.
1436 2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1438 * io/transfer.c (formatted_transfer): Fix typo in error message.
1440 2005-06-17 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1443 * io/transfer.c (read_sf): Correct updating of bytes_left field.
1444 (formatted_transfer): Correct updating of bytes_left field and
1445 reformatting code (comments and whitespace).
1446 * io/unix.c (move_pos_offset): "active" field should not be
1447 changed here. Whitespace corrections.
1449 2005-06-15 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1452 * intrinsics/c99_functions.c (scalbn): Provide fallback
1453 implementation for scalbn.
1454 * c99_protos.h: Prototype for scalbn.
1455 * configure.ac: Add check for scalbn.
1456 * configure: Regenerate.
1457 * config.h.in: Regenerate.
1459 2005-06-14 Thomas Koenig <Thomas.Koenig@online.de>
1461 * intrinsics/eoshift0.c: Removed prototype for eoshift0.
1462 * intrinsics/eoshift2.c: Removed prototype for eoshift2.
1464 2005-06-14 Tom Tromey <tromey@redhat.com>
1467 * configure, aclocal.m4, Makefile.in: Rebuilt.
1469 2005-06-12 Thomas Koenig <Thomas.Koenig@online.de>
1472 * intrinsics/eoshift0.c: Add prototype for eoshift0.
1473 * intrinsics/eoshift2.c: Add prototype for eoshift2.
1475 2005-06-12 Steven G. Kargl <kargls@comcast.net>
1476 Thomas Koenig <Thomas.Koenig@online.de>
1478 PR libfortran/PR21797
1479 * m4/cexp.m4 (csqrt`'q): Add type qualifyer to
1481 * generated/exp_c4.c: Regenerated.
1483 2005-06-12 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1486 * io/read.c (read_f): Take care of spaces after initial sign.
1488 2005-06-11 Thomas Koenig <Thomas.Koenig@onlinde.de>
1491 * Makefile.am: Add in_pack_c4.c, in_pack_c8.c, in_unpack_c4.c
1493 * Makefile.in: Regenerate.
1494 * libgfortran.h: Declare internal_pack_c4, internal_pack_c8,
1495 internal_unpack_c4 and internal_unpack_c8.
1496 * m4/in_pack.m4: Use rtype_ccode insteald of rtype_kind
1498 Use sizeof (rtype_name) as size for memory allocation.
1499 * m4/in_unpack.m4: Use rtype_ccode insteald of rtype_kind
1501 Use sizeof (rtype_name) for calculation of sizes for memcpy.
1502 * runtime/in_pack_generic.c: For real, integer and logical
1503 call internal_pack_4 if size==4 and internal_pack_8 if
1505 For complex, call internal_pack_c4 if size==8 and
1506 internal_pack_c8 if size==16.
1507 * runtime/in_unpack_generic.c: For real, integer and logical
1508 call internal_unpack_4 if size==4 and internal_unpack_8 if
1510 For complex, call internal_unpack_c4 if size==8 and
1511 internal_unpack_c8 if size==16.
1512 * generated/in_pack_i4.c: Regenerated.
1513 * generated/in_pack_i8.c: Regenerated.
1514 * generated/in_unpack_i4.c: Regenerated.
1515 * generated/in_unpack_i8.c: Regenerated.
1516 * generated/in_pack_c4.c: New file.
1517 * generated/in_pack_c8.c: New file.
1518 * generated/in_unpack_c4.c: New file.
1519 * generated/in_unpack_c8.c: New file.
1521 2005-06-09 Thomas Koenig <Thomas.Koenig@online.de>
1524 * m4/reshape.m4: Use sizeof (rtype_name) for sizes to be passed
1526 * generated/reshape_c4.c: Regenerated.
1527 * generated/reshape_c8.c: Regenerated.
1528 * generated/reshape_i4.c: Regenerated.
1529 * generated/reshape_i8.c: Regenerated.
1531 2005-06-07 Thomas Koenig <Thomas.Koenig@online.de>
1534 * m4/matmul.m4: Correct zeroing of result for non-packed
1535 arrays with lowest stride is one.
1536 * generated/matmul_c4.c: Regenerated.
1537 * generated/matmul_c8.c: Regenerated.
1538 * generated/matmul_i4.c: Regenerated.
1539 * generated/matmul_i8.c: Regenerated.
1540 * generated/matmul_r4.c: Regenerated.
1541 * generated/matmul_r8.c: Regenerated.
1543 2005-05-30 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1546 * io/unix.c (fd_close): Add test so that we don't close()
1549 2005-05-29 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1552 * io/format.c (parse_format_list): Set repeat count of $ format
1554 * io/transfer.c (read_sf): Add g.seen_dollar to the test
1555 concerning advancing I/O.
1556 (data_transfer_init): Likewise.
1557 (finalize_transfer): Likewise.
1559 2005-05-27 Thomas Koenig <Thomas.Koenig@online.de>
1561 * runtime/in_pack_generic.c: Adjust copyright years.
1562 (in_pack_generic): Change dimension of auxiliary arrays from
1563 GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
1564 * runtime/in_unpack_generic.c: Adjust copyright years.
1565 (in_unpack_generic): Change dimension of auxiliary arrays from
1566 GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
1568 2005-05-26 Thomas Koenig <Thomas.Koenig@online.de>
1571 * intrinsics/unpack_generic.c: Fix name of routine
1572 on top. Update copyright years.
1573 (unpack1): Remove const from return array descriptor.
1574 rs: New variable, for calculating return sizes.
1575 Populate return array descriptor if ret->data is NULL.
1577 2005-05-22 Peter Wainwright <prw@ceiriog1.demon.co.uk>
1580 * io/write.c (output_float): Rework logic to avoid call to log10
1581 with argument equal to zero.
1583 2005-05-21 Eric Botcazou <ebotcazou@libertysurf.fr>
1585 * configure.ac: Check for trunc and truncf in libm.
1586 * configure: Regenerate.
1587 * config.h.in: Likewise.
1588 * intrinsics/c99_functions.c (trunc, truncf): New functions.
1589 * c99_protos.h (trunc, truncf): Declare them.
1591 2005-05-18 Thomas Koenig <Thomas.Koenig@online.de>
1594 * Makefile.am: Really commit.
1595 * Makefile.in: Really commit.
1597 2005-05-18 Thomas Koenig <Thomas.Koenig@online.de>
1600 * Makefile.am: Add generated/reshape_c4.c and
1601 generated/reshape_c8.c.
1602 * Makefile.in: Regenerated.
1603 * m4/iparm.m4: Define rtype_ccode to be c4 or c8 for
1604 complex types, 4 or 8 otherwise.
1605 * m4/reshape.m4: Use rtype_ccode instead of rtype_kind
1607 * generated/reshape_c4.c: New file.
1608 * generated/reshape_c8.c: New file.
1610 2005-05-16 Andreas Jaeger <aj@suse.de>
1612 * configure.ac: Add additional warning flags.
1613 * configure: Regenerate.
1615 * io/write.c (calculate_G_format): Remove unused parameter.
1616 (output_float): Remove unused parameter.
1617 (write_float): Change callers.
1618 (nml_write_obj): Avoid signed warning.
1619 Make variable const to support -Wwrite-strings.
1621 * io/unix.c (fd_alloc, mmap_open, mmap_sfree, mem_sfree,
1622 mem_truncate): Mark argument as unused.
1624 * io/unit.c (get_unit): Mark argument as unused.
1625 (init_units): Avoid warning about signed comparision.
1627 * io/transfer.c (next_record_r): Remove unused parameter.
1628 (next_record_w): Remove unused parameter.
1629 (next_record): Change callers.
1630 (iolength_transfer): Mark arguments as unused.
1632 * io/open.c: Add initializer.
1634 * io/list_read.c (read_character): Mark argument as unused.
1635 (nml_match_name): Add const to make compile with -Wwrite-strings.
1637 * io/format.c: Add initializer.
1639 2005-05-15 Andreas Jaeger <aj@suse.de>
1641 * m4/eoshift1.m4: Initialize variables to avoid warnings.
1642 * m4/eoshift3.m4: Initialize variables to avoid warnings.
1643 * generated/eoshift1_4.c, generated/eoshift1_8.c,
1644 generated/eoshift3_4.c, generated/eoshift3_8.c: Regenerated.
1646 * intrinsics/spread_generic.c (spread): Initialize variables to
1649 * intrinsics/eoshift0.c (eoshift0): Initialize variables to avoid
1651 * intrinsics/eoshift2.c (eoshift2): Initialize variables to avoid
1654 * io/list_read.c (nml_get_obj_data): Initialize variables to avoid
1657 * intrinsics/pack_generic.c (pack): Remove unneeded calculation.
1659 * m4/matmull.m4 (matmul_): Remove unneeded calculations, fix
1660 pointer cast to avoid warning.
1661 * generated/matmul_l4.c: Regenerated.
1662 * generated/matmul_l8.c: Regenerated.
1664 * Makefile.am: Remove AM_CFLAGS here.
1665 * configure.ac: Define AM_CFLAGS and AM_FCFLAGS so that warnings
1666 are set. Set additionally -Wstrict-prototypes for CFLAGS.
1667 * Makefile.in: Regenerated.
1668 * aclocal.m4: Regenerated.
1669 * configure: Regenerated.
1671 * intrinsics/system_clock.c (system_clock_4, system_clock_8): Add
1672 missing returns, reformat a bit.
1674 * io/write.c (nml_write_obj): Use %d again - and cast to int,
1675 st_sprintf does not handle %ld.
1677 * io/unit.c (is_internal_unit): Add void as parameter list.
1679 * io/transfer.c: Move prototype declarations before the functions.
1681 * runtime/normalize.c (almostone_r4, almostone_r8): Fix parameter
1684 * intrinsics/random.c (KISS_DEFAULT_SEED): Remove extra semicolon.
1686 * io/transfer.c: Do not use empty initializers for global objects.
1687 Add missing initializers.
1689 * io/lock.c: Do not use empty initializers for global objects.
1691 * io/close.c: Add missing initializers.
1693 * runtime/environ.c: Add missing initializers. Do not use empty
1694 initializers for global object.
1695 (init_string): Mark argument as unused.
1697 * runtime/main.c (cleanup): Fix parameter list.
1699 * io/io.h: Fix parameter lists.
1701 * m4/transpose.m4, m4/matmul.m4: Fix pointer cast to avoid
1704 * generated/transpose_c4.c, generated/transpose_c8.c,
1705 generated/transpose_i4.c, generated/transpose_i8.c,
1706 generated/matmul_c4.c, generated/matmul_c8.c,
1707 generated/matmul_i4.c, generated/matmul_i8.c,
1708 generated/matmul_r4.c, generated/matmul_r8.c: Regenerated.
1710 * io/write.c (nml_write_obj): Fix 64-bit problem.
1712 * io/list_read.c (nml_get_obj_data): Add missing braces around
1713 initializer to avoid warnings.
1715 * intrinsics/etime.c (etime_sub): Remove unused variable.
1717 * intrinsics/chdir.c, intrinsics/getlog.c, intrinsics/link.c,
1718 intrinsics/symlnk.c, intrinsics/perror.c: Include <string.h> for
1721 * runtime/string.c (compare0): Remove unused variable.
1722 * io/unit.c (init_units): Remove unused variables.
1723 * intrinsics/getcwd.c (getcwd_i4_sub): Remove unused variable.
1724 * intrinsics/unlink.c (unlink_i4_sub): Remove unused variable.
1725 * intrinsics/stat.c (stat_i4_sub, fstat_i8_sub, fstat_i4_sub,
1726 stat_i8_sub): Remove unused variable.
1728 2005-05-12 Thomas Koenig <Thomas.Koenig@online.de>
1731 * runtime/memory.c: Don't define GFC_CLEAR_MEMORY (it's a
1733 * io/open.c (new_unit): Zero freshly allocated memory for
1735 * io/unit.c (init_units): Zero freshly allocated memory for
1736 STDIN, STDOUT and STDERR.
1737 * io/unix.c (open_internal): Zero freshly allocated memory
1739 (fd_to_stream): Likewise.
1741 2005-05-11 Bud Davis <bdavis@gfortran.org>
1744 * io/unix.c (fd_truncate): update positions when ftruncate
1745 fails (like writing to /dev/null).
1747 2005-05-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1750 * open.c (new_unit): Take care of the case where POSITION_APPEND
1751 is specified (sseek to the end, and set u>-endfile).
1753 2005-05-10 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1756 * Makefile.am (gfor_specific_src): Add 'intrinsics/f2c_intrinsics.F90'
1758 * Makefile.in: Regenerate.
1759 * intrinsics/f2c_specific.F90: New file.
1761 2005-05-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1764 * io/unix.c (fd_to_stream): Add an avoid_mmap argument indicating
1765 we don't we to mmap this stream. Use fd_open instead of mmap_open
1767 (open_external): Call fd_to_stream with avoid_mmap = 0.
1768 (input_stream): Call fd_to_stream with avoid_mmap = 1.
1769 (output_stream): Likewise.
1770 (error_stream): Likewise.
1772 2005-05-09 Mike Stump <mrs@apple.com>
1774 * configure: Regenerate.
1776 2005-05-09 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1779 * io/read.c (read_f): Accept 'e', 'E', 'd' and 'D' as first
1780 non-blank characters of a real number.
1782 2005-05-04 Thomas Koenig <Thomas.Koenig@online.de>
1785 * m4/cshift1.m4: Change dimension of auxiliary arrays from
1786 GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
1787 * m4/eoshift1.m4: Likewise.
1788 * m4/eoshift3.m4: Likewise.
1789 * m4/ifunction.m4: Likewise.
1790 * m4/in_pack.m4: Likewise.
1791 * m4/in_unpack.m4: Likewise.
1792 * intrinsics/cshift0.c: Likewise.
1793 * intrinsics/eoshift0.c: Likewise.
1794 * intrinsics/eoshift2.c: Likewise.
1795 * intrinsics/random.c: Likewise.
1796 * intrinsics/spread_generic.c: Likewise.
1797 * intrinsics/stat.c: Likewise.
1798 * generated/all_l4.c: Regenerated.
1799 * generated/all_l8.c: Regenerated.
1800 * generated/any_l4.c: Regenerated.
1801 * generated/any_l8.c: Regenerated.
1802 * generated/count_4_l4.c: Regenerated.
1803 * generated/count_4_l8.c: Regenerated.
1804 * generated/count_8_l4.c: Regenerated.
1805 * generated/count_8_l8.c: Regenerated.
1806 * generated/cshift1_4.c: Regenerated.
1807 * generated/cshift1_8.c: Regenerated.
1808 * generated/eoshift1_4.c: Regenerated.
1809 * generated/eoshift1_8.c: Regenerated.
1810 * generated/eoshift3_4.c: Regenerated.
1811 * generated/eoshift3_8.c: Regenerated.
1812 * generated/in_pack_i4.c: Regenerated.
1813 * generated/in_pack_i8.c: Regenerated.
1814 * generated/in_unpack_i4.c: Regenerated.
1815 * generated/in_unpack_i8.c: Regenerated.
1816 * generated/maxloc0_4_i4.c: Regenerated.
1817 * generated/maxloc0_4_i8.c: Regenerated.
1818 * generated/maxloc0_4_r4.c: Regenerated.
1819 * generated/maxloc0_4_r8.c: Regenerated.
1820 * generated/maxloc0_8_i4.c: Regenerated.
1821 * generated/maxloc0_8_i8.c: Regenerated.
1822 * generated/maxloc0_8_r4.c: Regenerated.
1823 * generated/maxloc0_8_r8.c: Regenerated.
1824 * generated/maxloc1_4_i4.c: Regenerated.
1825 * generated/maxloc1_4_i8.c: Regenerated.
1826 * generated/maxloc1_4_r4.c: Regenerated.
1827 * generated/maxloc1_4_r8.c: Regenerated.
1828 * generated/maxloc1_8_i4.c: Regenerated.
1829 * generated/maxloc1_8_i8.c: Regenerated.
1830 * generated/maxloc1_8_r4.c: Regenerated.
1831 * generated/maxloc1_8_r8.c: Regenerated.
1832 * generated/maxval_i4.c: Regenerated.
1833 * generated/maxval_i8.c: Regenerated.
1834 * generated/maxval_r4.c: Regenerated.
1835 * generated/maxval_r8.c: Regenerated.
1836 * generated/minloc0_4_i4.c: Regenerated.
1837 * generated/minloc0_4_i8.c: Regenerated.
1838 * generated/minloc0_4_r4.c: Regenerated.
1839 * generated/minloc0_4_r8.c: Regenerated.
1840 * generated/minloc0_8_i4.c: Regenerated.
1841 * generated/minloc0_8_i8.c: Regenerated.
1842 * generated/minloc0_8_r4.c: Regenerated.
1843 * generated/minloc0_8_r8.c: Regenerated.
1844 * generated/minloc1_4_i4.c: Regenerated.
1845 * generated/minloc1_4_i8.c: Regenerated.
1846 * generated/minloc1_4_r4.c: Regenerated.
1847 * generated/minloc1_4_r8.c: Regenerated.
1848 * generated/minloc1_8_i4.c: Regenerated.
1849 * generated/minloc1_8_i8.c: Regenerated.
1850 * generated/minloc1_8_r4.c: Regenerated.
1851 * generated/minloc1_8_r8.c: Regenerated.
1852 * generated/minval_i4.c: Regenerated.
1853 * generated/minval_i8.c: Regenerated.
1854 * generated/minval_r4.c: Regenerated.
1855 * generated/minval_r8.c: Regenerated.
1856 * generated/product_c4.c: Regenerated.
1857 * generated/product_c8.c: Regenerated.
1858 * generated/product_i4.c: Regenerated.
1859 * generated/product_i8.c: Regenerated.
1860 * generated/product_r4.c: Regenerated.
1861 * generated/product_r8.c: Regenerated.
1862 * generated/sum_c4.c: Regenerated.
1863 * generated/sum_c8.c: Regenerated.
1864 * generated/sum_i4.c: Regenerated.
1865 * generated/sum_i8.c: Regenerated.
1866 * generated/sum_r4.c: Regenerated.
1867 * generated/sum_r8.c: Regenerated.
1869 2005-04-30 Thomas Koenig <Thomas.Koenig@online.de>
1872 libgfortran.h: Change typedef of index_type from size_t
1875 2005-04-30 Paul Thomas <pault@gcc.gnu.org>
1878 * generated/matmul_r8.c: Remove incorrect assertions.
1879 * generated/matmul_c4.c: Regenerate
1880 * generated/matmul_c8.c: Regenerate
1881 * generated/matmul_i4.c: Regenerate
1882 * generated/matmul_i8.c: Regenerate
1883 * generated/matmul_r4.c: Regenerate
1884 * generated/matmul_r8.c: Regenerate
1886 2005-04-29 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1888 * configure.ac: Check for ftruncate and chsize.
1889 * io/unix.c (fd_truncate): Provide chsize as alternative to
1891 * config.h.in: Regenerate.
1892 * configure: Regenerate.
1894 2004-04-29 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1896 * intrinsics/rename.c: Add missing #includes.
1898 2004-04-28 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
1900 * AUTHORS, COPYING, INSTALL, NEWS, README: Remove.
1902 2005-04-26 David Edelsohn <edelsohn@gnu.org>
1905 * io/rewind.c (st_rewind): Flush the stream when resetting the mode
1906 from WRITING to READING.
1908 2005-04-22 Paul Thomas <pault@gcc.gnu.org>
1909 Jerry DeLisle <jvdelisle@verizon.net>
1911 * io/write.c (nml_write_obj): Provide 1 more byte for ext_name.
1912 * io/list_read.c (nml_get_obj_data): Put extra brackets in get_mem
1913 call for ext_name. These fix the bug reported by Jerry DeLisle to
1914 the fortran list and are based on his suggested fix.
1916 2005-04-22 Thomas Koenig <Thomas.Koenig@online.de>
1921 * m4/reshape.m4 (reshape_`'rtype_kind): rs, rex: New
1922 variables, to be used in calculation of return array sizes.
1923 Populate return array descriptor if ret->data is NULL.
1924 Fix condition for early return (it used to test something
1925 undefined if order was used).
1926 Remove duplicate check wether pad is used.
1927 * intrinsics/reshape_generic.c (reshape_generic): Likewise.
1928 Fix a few places where the wrong variables were set.
1929 * generated/reshape_i4.c: Regenerated.
1930 * generated/reshape_i8.c: Regenerated.
1932 2005-04-18 Paul Thomas <pault@gcc.gnu.org>
1934 * io/list_read.c (nml_touch_nodes, nml_read_obj,
1935 nml_get_obj_data): Fix memory leaks in code for derived types.
1937 2005-04-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
1940 * io/inquire.c (inquire_via_unit): Check for the gfc_unit being
1941 NULL when setting ioparm.sequential.
1943 2005-04-17 Thomas Koenig <Thomas.Koenig@online.de>
1946 * m4/reshape.m4 (reshape_`'rtype_kind): Change dimension
1947 of auxiliary arrays from GFC_MAX_DIMENSIONS - 1 to
1949 * intrinsics/reshape_generic.c (reshape_generic): Likewise.
1950 * generated/reshape_i4.c: Regenerated.
1951 * generated/reshape_i8.c: Regenerated.
1953 2005-04-17 Paul Thomas <pault@gcc.gnu.org>
1955 * io/list_read.c (eat_separator): at_eol = 1 replaced
1956 (zapped at some time?).
1958 2005-04-17 Paul Thomas <pault@gcc.gnu.org>
1960 PR libgfortran/12884
1961 PR libgfortran/17285
1962 PR libgfortran/18122
1963 PR libgfortran/18210
1964 PR libgfortran/18392
1965 PR libgfortran/18591
1966 PR libgfortran/18879
1967 * io/io.h (nml_ls): Declare.
1968 (namelist_info): Modify for arrays.
1969 * io/list_read.c (namelist_read): Reduced to call to new functions.
1970 (match_namelist_name): Simplified.
1971 (nml_query): Handles stdin queries ? and =?. New function.
1972 (nml_get_obj_data): Parses object name. New function.
1973 (touch_nml_nodes): Marks objects for read. New function.
1974 (untouch_nml_nodes): Resets objects. New function.
1975 (parse_qualifier): Parses and checks qualifiers. New function
1976 (nml_read_object): Reads and stores object data. New function.
1977 (eat_separator): No new_record on '/' in namelist.
1978 (finish_separator): No new_record on '/' in namelist.
1979 (read_logical): Error return for namelist.
1980 (read_integer): Error return for namelist.
1981 (read_complex): Error return for namelist.
1982 (read_real): Error return for namelist.
1983 * io/lock.c (library_end): Free extended namelist_info types.
1984 * io/transfer.c (st_set_nml_var): Modified for arrays.
1985 (st_set_nml_var_dim): Dimension descriptors. New function.
1986 * io/write.c (namelist_write): Reduced to call to new functions.
1987 (nml_write_obj): Writes output for object. New function.
1988 (write_integer): Suppress leading blanks for repeat counts.
1989 (write_int): Suppress leading blanks for repeat counts.
1990 (write_float): Suppress leading blanks for repeat counts.
1991 (output_float): Suppress leading blanks for repeat counts.
1993 2005-04-15 Thomas Koenig <Thomas.Koenig@online.de>
1996 * intrinsics/spread_generic.c (spread): Remove const from
1997 return array descriptor.
1998 New variables: rrank (rank of return array), rs (for
1999 calculating the size of the return array), srank (rank
2000 of the source array).
2001 Generate runtime error if the dim= argument is larger than
2002 the rank of the return array.
2003 Generate runtime error if the needed rank of the return
2004 array is larger than 7.
2005 If ret->data is null, populate the return array descriptor
2006 and initialize the variables for the actual operation.
2007 Otherwise, set ret->dim[0].stride to one if it is zero.
2008 Change second, independent use of variable dim to srank.
2010 2005-04-12 Mike Stump <mrs@apple.com>
2012 * configure: Regenerate.
2014 2005-04-13 Thomas Koenig <Thomas.Koenig@online.de>
2017 * m4/iforeach.c (name`'rtype_qual`_'atype_code): Add TODO
2018 that setting correct strides is a front end job.
2019 (`m'name`'rtype_qual`_'atype_code): Likewise. If mask has
2020 a lowest stride of 0, adjust to 1.
2021 * m4/ifunction.c (name`'rtype_qual`_'atype_code): Add TODO
2022 that setting correct strides is a front end job.
2023 (`m'name`'rtype_qual`_'atype_code): Likewise. If mask has
2024 a lowest stride of 0, adjust to 1.
2025 * maxloc0_4_i4.c: Regenerated
2026 * maxloc0_4_i8.c: Regenerated
2027 * maxloc0_4_r4.c: Regenerated
2028 * maxloc0_4_r8.c: Regenerated
2029 * maxloc0_8_i4.c: Regenerated
2030 * maxloc0_8_i8.c: Regenerated
2031 * maxloc0_8_r4.c: Regenerated
2032 * maxloc0_8_r8.c: Regenerated
2033 * maxloc1_4_i4.c: Regenerated
2034 * maxloc1_4_i8.c: Regenerated
2035 * maxloc1_4_r4.c: Regenerated
2036 * maxloc1_4_r8.c: Regenerated
2037 * maxloc1_8_i4.c: Regenerated
2038 * maxloc1_8_i8.c: Regenerated
2039 * maxloc1_8_r4.c: Regenerated
2040 * maxloc1_8_r8.c: Regenerated
2041 * maxval_i4.c: Regenerated
2042 * maxval_i8.c: Regenerated
2043 * maxval_r4.c: Regenerated
2044 * maxval_r8.c: Regenerated
2045 * minloc0_4_i4.c: Regenerated
2046 * minloc0_4_i8.c: Regenerated
2047 * minloc0_4_r4.c: Regenerated
2048 * minloc0_4_r8.c: Regenerated
2049 * minloc0_8_i4.c: Regenerated
2050 * minloc0_8_i8.c: Regenerated
2051 * minloc0_8_r4.c: Regenerated
2052 * minloc0_8_r8.c: Regenerated
2053 * minloc1_4_i4.c: Regenerated
2054 * minloc1_4_i8.c: Regenerated
2055 * minloc1_4_r4.c: Regenerated
2056 * minloc1_4_r8.c: Regenerated
2057 * minloc1_8_i4.c: Regenerated
2058 * minloc1_8_i8.c: Regenerated
2059 * minloc1_8_r4.c: Regenerated
2060 * minloc1_8_r8.c: Regenerated
2061 * minval_i4.c: Regenerated
2062 * minval_i8.c: Regenerated
2063 * minval_r4.c: Regenerated
2064 * minval_r8.c: Regenerated
2065 * product_c4.c: Regenerated
2066 * product_c8.c: Regenerated
2067 * product_i4.c: Regenerated
2068 * product_i8.c: Regenerated
2069 * product_r4.c: Regenerated
2070 * product_r8.c: Regenerated
2071 * sum_c4.c: Regenerated
2072 * sum_c8.c: Regenerated
2073 * sum_i4.c: Regenerated
2074 * sum_i8.c: Regenerated
2075 * sum_r4.c: Regenerated
2076 * sum_r8.c: Regenerated
2078 2005-04-10 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2081 * runtime/environ.c (init_unsigned_integer): Function for
2082 environment variables we want to be positive.
2083 (init_integer): Function to allow negative environment
2084 variables (e.g. for GFORTRAN_STDIN_UNIT).
2086 2005-04-10 Thomas Koenig <Thomas.Koenig@online.de>
2096 * io/transfer.c (top level): eor_condition: New static variable.
2097 (read_sf): Remove unnecessary zeroing of buffer (there is enough
2098 information in its length).
2099 Return a string of length 0 (to be padded by caller) if EOR was
2101 Remove erroneous special casing of EOR for standard input.
2102 Set eor_condition for non-advancing I/O if an end of line was
2104 Increment ioparm.size if necessary.
2105 (formatted_transfer): Skip the function if there is an EOR condition.
2106 (data_transfer_init): Initialize eor_condition to zero (false).
2107 (next_record_r): Clear sf_seen_eor if a \n has been seen already.
2108 (finalize_transfer): If there is an EOR condition, raise the error.
2110 2005-04-09 Bud Davis <bdavis@gfortran.org>
2111 Steven G. Kargl <kargls@comcast.net>
2114 * io/transfer.c (data_transfer_init): truncate an existing
2115 file on the first write.
2117 2005-04-09 Thomas Koenig <Thomas.Koenig@online.de>
2121 * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): ditto.
2122 If retarray->data is NULL (i.e. the front end does not
2123 know the rank and dimenson of the array), fill in its
2124 properties and allocate memory.
2125 Change the assertions about rank and dimension of retarray into
2126 runtime errors and only check them for retarray->data != NULL.
2127 Do the same for correcting the stride from 0 to 1 in retarray.
2128 (`m'name`'rtype_qual`_'atype_code): Likewise.
2129 * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Likewise.
2130 Change assertion about rank of array to runtime error.
2131 (`m'name`'rtype_qual`_'atype_code): Likewise.
2132 * generated/all_l4.c: Regenerated.
2133 * generated/all_l8.c: Regenerated.
2134 * generated/any_l4.c: Regenerated.
2135 * generated/any_l8.c: Regenerated.
2136 * generated/count_4_l4.c: Regenerated.
2137 * generated/count_4_l8.c: Regenerated.
2138 * generated/count_8_l4.c: Regenerated.
2139 * generated/count_8_l8.c: Regenerated.
2140 * generated/maxloc0_4_i4.c: Regenerated.
2141 * generated/maxloc0_4_i8.c: Regenerated.
2142 * generated/maxloc0_4_r4.c: Regenerated.
2143 * generated/maxloc0_4_r8.c: Regenerated.
2144 * generated/maxloc0_8_i4.c: Regenerated.
2145 * generated/maxloc0_8_i8.c: Regenerated.
2146 * generated/maxloc0_8_r4.c: Regenerated.
2147 * generated/maxloc0_8_r8.c: Regenerated.
2148 * generated/maxloc1_4_i4.c: Regenerated.
2149 * generated/maxloc1_4_i8.c: Regenerated.
2150 * generated/maxloc1_4_r4.c: Regenerated.
2151 * generated/maxloc1_4_r8.c: Regenerated.
2152 * generated/maxloc1_8_i4.c: Regenerated.
2153 * generated/maxloc1_8_i8.c: Regenerated.
2154 * generated/maxloc1_8_r4.c: Regenerated.
2155 * generated/maxloc1_8_r8.c: Regenerated.
2156 * generated/maxval_i4.c: Regenerated.
2157 * generated/maxval_i8.c: Regenerated.
2158 * generated/maxval_r4.c: Regenerated.
2159 * generated/maxval_r8.c: Regenerated.
2160 * generated/minloc0_4_i4.c: Regenerated.
2161 * generated/minloc0_4_i8.c: Regenerated.
2162 * generated/minloc0_4_r4.c: Regenerated.
2163 * generated/minloc0_4_r8.c: Regenerated.
2164 * generated/minloc0_8_i4.c: Regenerated.
2165 * generated/minloc0_8_i8.c: Regenerated.
2166 * generated/minloc0_8_r4.c: Regenerated.
2167 * generated/minloc0_8_r8.c: Regenerated.
2168 * generated/minloc1_4_i4.c: Regenerated.
2169 * generated/minloc1_4_i8.c: Regenerated.
2170 * generated/minloc1_4_r4.c: Regenerated.
2171 * generated/minloc1_4_r8.c: Regenerated.
2172 * generated/minloc1_8_i4.c: Regenerated.
2173 * generated/minloc1_8_i8.c: Regenerated.
2174 * generated/minloc1_8_r4.c: Regenerated.
2175 * generated/minloc1_8_r8.c: Regenerated.
2176 * generated/minval_i4.c: Regenerated.
2177 * generated/minval_i8.c: Regenerated.
2178 * generated/minval_r4.c: Regenerated.
2179 * generated/minval_r8.c: Regenerated.
2180 * generated/product_c4.c: Regenerated.
2181 * generated/product_c8.c: Regenerated.
2182 * generated/product_i4.c: Regenerated.
2183 * generated/product_i8.c: Regenerated.
2184 * generated/product_r4.c: Regenerated.
2185 * generated/product_r8.c: Regenerated.
2186 * generated/sum_c4.c: Regenerated.
2187 * generated/sum_c8.c: Regenerated.
2188 * generated/sum_i4.c: Regenerated.
2189 * generated/sum_i8.c: Regenerated.
2190 * generated/sum_r4.c: Regenerated.
2191 * generated/sum_r8.c: Regenerated.
2193 2005-04-09 Thomas Koenig <Thomas.Koenig@online.de>
2196 * runtime/string.c (compare0): Use fstrlen() to
2197 strip trailing blanks from option string.
2199 2005-04-09 Andrew Pinski <pinskia@physics.uc.edu>
2202 * format.c (parse_format_list): Allow an optional comma
2203 between descriptors.
2205 2005-04-08 Eric Botcazou <ebotcazou@libertysurf.fr>
2207 * io/backspace.c (unformatted_backspace): Do not dereference
2208 the pointer to the stream.
2210 2005-04-07 Andrew Pinski <pinskia@physics.uc.edu>
2213 * configure.ac (extra_ldflags_libgfortran): Set for *-darwin* to
2214 "-Wl,-single_module".
2215 * configure: Regenerate.
2216 * Makefile.am (libgfortran_la_LDFLAGS): Add extra_ldflags_libgfortran.
2217 * Makefile.in: Regenerate.
2219 2005-04-05 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2222 * write.c (write_float): A G edit descriptor may locally change
2223 the scale factor, but it needs to be restored afterwards.
2225 2005-04-03 Dale Ranta <dir@lanl.gov>
2226 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2232 * io/backspace.c (unformatted_backspace): Fix error in arithmetic.
2233 (st_backspace): When in WRITING mode, we flush and falling back
2234 into READING mode. In all cases, correctly position the stream.
2236 2005-03-31 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2239 * io/inquire.c (inquire_via_unit): Non-opened units should still be
2240 reported by an INQUIRE statement as existing.
2241 * io/transfer.c (data_transfer_init): Never accept negative units.
2243 2005-03-29 Dale Ranta <dir@lanl.gov>
2244 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2247 * io/open.c (st_open): call library_end() before returning even if
2250 2005-03-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2253 * list_read.c (next_char, eat_separator, finish_separator, read_real)
2254 (namelist_read): Add support for '\r' as well as '\n' as EOL
2258 * list_read.c (read_sf): Add a '\r' in a test to support DOS
2259 line-endings when line length is exceeded.
2261 2005-03-25 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2264 * io/format.c (parse_format_list): format node for colon edit
2265 descriptor needs a repeat counter set to 1.
2267 2005-02-24 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2269 * config.h.in: Regenerate.
2271 2005-02-23 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2274 * write.c (output_float): Handling the "F0.d" format similarly as
2275 commercial compilers.
2277 2005-03-22 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2279 * Makefile.am: Added new files.
2280 * Makefile.in: Regenerate.
2281 * aclocal.m4: Regenerate.
2282 * configure.ac: add checks for signal.h headers file, as well as
2283 following functions: chdir, strerror, getlogin, gethostname, kill,
2284 link, symlink, perror, sleep, time.
2285 * configure: Regenerate.
2286 * intrinsics/chdir.c, intrinsics/gerror.c, intrinsics/getlog.c,
2287 intrinsics/hostnm.c, intrinsics/ierrno.c, intrinsics/kill.c,
2288 intrinsics/link.c, intrinsics/perror.c, intrinsics/rename.c,
2289 intrinsics/sleep.c, intrinsics/symlnk.c, intrinsics/time.c: Newly
2290 implementend g77 intrinsics.
2292 2005-03-21 Zack Weinberg <zack@codesourcery.com>
2294 * configure.ac: Do not invoke TL_AC_GCC_VERSION.
2295 In all substitutions, leave gcc_version to be expanded by the Makefile.
2296 * aclocal.m4, configure: Regenerate.
2297 * Makefile.am: Set gcc_version.
2298 * Makefile.in: Regenerate.
2300 2005-03-16 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2303 * open.c (new_unit): set record length to max_offset rather than
2304 using a hard-coded limit (which was too low).
2306 2005-03-16 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2309 * write.c (output_float): special check when writing 0.0 with
2312 2005-03-11 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2315 * write.c (output_float): Adds a nzero_real variable to store
2316 the number of leading zeros whatever the format width is. Corrects
2317 the rounding of numbers less than 10^(-width). Fixes typo in an
2318 error message. Updates copyright years
2320 2005-02-27 Toon Moene <toon@moene.indiv.nluug.nl>
2322 * runtime/environ.c: Update copyright years.
2324 2005-02-27 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
2326 * io/write.c: Update copyright years.
2328 2005-02-27 Francois-Xavier Coudert <coudert@clipper.ens.fr>
2331 * io/write.c (output_float): Added special check for value 0.0 in
2334 2004-02-27 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
2336 * io/write.c (output_float): Fix typo in condition.
2338 2005-02-25 Peter O'Gorman <peter@pogma.com>
2339 Toon Moene <toon@moene.indiv.nluug.nl>
2341 PR libgfortran/17748
2342 * runtime/environ.c: Remove references to environ.
2343 (show_variables): remove GFORTRAN_UNBUFFERED_* and
2344 GFORTRAN_NAME_* because they require environ.
2345 (pattern_scan): Remove function.
2347 2004-02-22 Paul Thomas <paulthomas2@wannado.fr>
2348 Bud Davis <bdavis@gfortran.org>
2350 * io/list_read.c (read_real): Handle separators properly
2351 in list directed read.
2353 2004-02-21 Bud Davis <bdavis@gfortran.org>
2356 * io/transfer.c (write_constant_string): accept an 'h' as
2357 the start of a hollerith format string.
2359 2005-02-21 Eric Botcazou <ebotcazou@libertysurf.fr>
2362 * intrinsics/c99_functions.c (nextafterf): Special-case infinite
2365 2005-02-21 Steven G. Kargl <kargls@comcast.net>
2367 * io/write.c (output_float): Typo in error meesage.
2369 2005-02-20 Steven G. Kargl <kargls@comcast.net>
2372 * intrinsic/args.c (iargc): Off by 1.
2374 2005-02-19 Steven G. Kargl <kargls@comcast.net>
2376 * intrinsic/date_and_time.c: Fix conformance problems.
2378 2005-02-01 Paul Thomas <paulthomas2@wanadoo.fr>
2380 PR libgfortran/19363
2381 PR libgfortran/19691
2382 * libgfortran.h (isfinite): Work around broken isfinite(x) in Cygwin.
2384 2005-01-30 Bud Davis <bdavis@gfortran.org>
2387 * io/inquire.c (inquire_via_unit): Use correct variable for
2390 2005-01-29 Thomas Koenig <Thomas.Koenig@online.de>
2393 * io/transfer.c (data_transfer_init): eor requires advance="NO".
2395 2005-01-25 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
2398 * io/read.c (read_f): Don't free uninitialized pointer.
2400 2005-01-23 James A. Morrison <phython@gcc.gnu.org>
2401 Paul Brook <paul@codesourcery.com>
2404 * Makefile.am: Add transpose_c4.c and transpose_c8.c.
2405 * intrinsics/cshift0.c: Use separate optimized loops for complex types.
2406 * m4/transpose.m4: Include type letter in function name.
2407 * Makefile.in: Regenerate.
2408 * generated/transpose_*.c: Regenerate.
2410 2005-01-22 Thomas Koenig <Thomas.Koenig@online.de>
2413 * io/transfer.c (finalize_transfer): Don't do anything if
2414 there is an error condition.
2416 2005-01-22 David Edelsohn <edelsohn@gnu.org>
2418 PR libgfortran/19052
2419 * libgfortran.h (options_t): Add stderr_unit.
2420 * io/io.h (error_stream): Declare.
2421 * io/open.c (new_unit): Do not terminate abnormally if opening
2422 file preconnected to stdin, stdout, or stderr.
2423 * io/unit.c (init_units): Initialize stderr_unit.
2424 * io/unix.c (error_stream): New function.
2425 * runtime/environ.c (GFORTRAN_STDERR_UNIT): New environment variable.
2427 2005-01-22 Thomas Koenig <Thomas.Koenig@online.de>
2430 * io/unix.c (regular_file): No need to change flags->action
2431 if an error occurs. Document this.
2432 No need to call stat() for STATUS_OLD, open() will
2434 For ACTION_UNSPECIFIED, try open for read-write, then for
2435 read-only if open fails with EACCES, then for write-only
2436 if that fails with EACCES again.
2437 * io/unix.c (open_external): Document changed behavior of
2440 2005-01-22 Tobias Schl"uter <tobias.schlueter@physik.uni-muenchen.de>
2443 * io/io.h (st_parameter): Use 'GFC_INTEGER_4' instead of 'int',
2444 use CHARACTER macro for definition of string valued paramters.
2446 2005-01-22 Bud Davis <bdavis9659@comcast.net>
2449 * io/inquire.c(inquire_via_unit): implement POSITION=.
2450 * io/transfer.c(next_record): update position for
2452 * io/rewind.c(st_rewind): update position for
2455 2005-01-16 Bud Davis <bdavis9659@comcast.net>
2458 * io/transfer.c (us_read): no bytes available is not a
2461 2005-01-15 Bud Davis <bdavis9659@comcast.net>
2464 * io/transfer.c (st_write_done): only truncate when it
2467 2005-01-12 Toon Moene <toon@moene.indiv.nluug.nl>
2470 c99_protos.h: License changed to GPL+exception.
2471 libgfortran.h: Ditto.
2472 intrinsics/abort.c: Ditto.
2473 intrinsics/args.c: Ditto.
2474 intrinsics/associated.c: Ditto.
2475 intrinsics/bessel.c: Ditto.
2476 intrinsics/c99_functions.c: Ditto.
2477 intrinsics/cpu_time.c: Ditto.
2478 intrinsics/cshift0.c: Ditto.
2479 intrinsics/date_and_time.c: Ditto.
2480 intrinsics/env.c: Ditto.
2481 intrinsics/eoshift0.c: Ditto.
2482 intrinsics/eoshift2.c: Ditto.
2483 intrinsics/erf.c: Ditto.
2484 intrinsics/etime.c: Ditto.
2485 intrinsics/exit.c: Ditto.
2486 intrinsics/flush.c: Ditto.
2487 intrinsics/fnum.c: Ditto.
2488 intrinsics/getXid.c: Ditto.
2489 intrinsics/getcwd.c: Ditto.
2490 intrinsics/ishftc.c: Ditto.
2491 intrinsics/mvbits.c: Ditto.
2492 intrinsics/pack_generic.c: Ditto.
2493 intrinsics/rand.c: Ditto.
2494 intrinsics/random.c: Ditto.
2495 intrinsics/reshape_generic.c: Ditto.
2496 intrinsics/reshape_packed.c: Ditto.
2497 intrinsics/size.c: Ditto.
2498 intrinsics/spread_generic.c: Ditto.
2499 intrinsics/stat.c: Ditto.
2500 intrinsics/string_intrinsics.c: Ditto.
2501 intrinsics/system.c: Ditto.
2502 intrinsics/system_clock.c: Ditto.
2503 intrinsics/transpose_generic.c: Ditto.
2504 intrinsics/umask.c: Ditto.
2505 intrinsics/unlink.c: Ditto.
2506 intrinsics/unpack_generic.c: Ditto.
2507 io/backspace.c: Ditto.
2509 io/endfile.c: Ditto.
2511 io/inquire.c: Ditto.
2513 io/list_read.c: Ditto.
2518 io/transfer.c: Ditto.
2527 m4/cshift1.m4: Ditto.
2529 m4/dotprod.m4: Ditto.
2530 m4/dotprodc.m4: Ditto.
2531 m4/dotprodl.m4: Ditto.
2532 m4/eoshift1.m4: Ditto.
2533 m4/eoshift3.m4: Ditto.
2534 m4/exponent.m4: Ditto.
2535 m4/fraction.m4: Ditto.
2537 m4/iforeach.m4: Ditto.
2538 m4/ifunction.m4: Ditto.
2539 m4/in_pack.m4: Ditto.
2540 m4/in_unpack.m4: Ditto.
2542 m4/matmul.m4: Ditto.
2543 m4/matmull.m4: Ditto.
2544 m4/maxloc0.m4: Ditto.
2545 m4/maxloc1.m4: Ditto.
2546 m4/maxval.m4: Ditto.
2547 m4/minloc0.m4: Ditto.
2548 m4/minloc1.m4: Ditto.
2549 m4/minval.m4: Ditto.
2551 m4/nearest.m4: Ditto.
2553 m4/product.m4: Ditto.
2554 m4/reshape.m4: Ditto.
2555 m4/set_exponent.m4: Ditto.
2557 m4/specific.m4: Ditto.
2558 m4/specific2.m4: Ditto.
2560 m4/transpose.m4: Ditto.
2562 runtime/environ.c: Ditto.
2563 runtime/error.c: Ditto.
2564 runtime/in_pack_generic.c: Ditto.
2565 runtime/in_unpack_generic.c: Ditto.
2566 runtime/main.c: Ditto.
2567 runtime/memory.c: Ditto.
2568 runtime/normalize.c: Ditto.
2569 runtime/pause.c: Ditto.
2570 runtime/select.c: Ditto.
2571 runtime/stop.c: Ditto.
2572 runtime/string.c: Ditto.
2573 generated/_abs_c4.f90: Regenerated.
2574 generated/_abs_c8.f90: Regenerated.
2575 generated/_abs_i4.f90: Regenerated.
2576 generated/_abs_i8.f90: Regenerated.
2577 generated/_abs_r4.f90: Regenerated.
2578 generated/_abs_r8.f90: Regenerated.
2579 generated/_acos_r4.f90: Regenerated.
2580 generated/_acos_r8.f90: Regenerated.
2581 generated/_aint_r4.f90: Regenerated.
2582 generated/_aint_r8.f90: Regenerated.
2583 generated/_anint_r4.f90: Regenerated.
2584 generated/_anint_r8.f90: Regenerated.
2585 generated/_asin_r4.f90: Regenerated.
2586 generated/_asin_r8.f90: Regenerated.
2587 generated/_atan2_r4.f90: Regenerated.
2588 generated/_atan2_r8.f90: Regenerated.
2589 generated/_atan_r4.f90: Regenerated.
2590 generated/_atan_r8.f90: Regenerated.
2591 generated/_conjg_c4.f90: Regenerated.
2592 generated/_conjg_c8.f90: Regenerated.
2593 generated/_cos_c4.f90: Regenerated.
2594 generated/_cos_c8.f90: Regenerated.
2595 generated/_cos_r4.f90: Regenerated.
2596 generated/_cos_r8.f90: Regenerated.
2597 generated/_cosh_r4.f90: Regenerated.
2598 generated/_cosh_r8.f90: Regenerated.
2599 generated/_dim_i4.f90: Regenerated.
2600 generated/_dim_i8.f90: Regenerated.
2601 generated/_dim_r4.f90: Regenerated.
2602 generated/_dim_r8.f90: Regenerated.
2603 generated/_exp_c4.f90: Regenerated.
2604 generated/_exp_c8.f90: Regenerated.
2605 generated/_exp_r4.f90: Regenerated.
2606 generated/_exp_r8.f90: Regenerated.
2607 generated/_log10_r4.f90: Regenerated.
2608 generated/_log10_r8.f90: Regenerated.
2609 generated/_log_c4.f90: Regenerated.
2610 generated/_log_c8.f90: Regenerated.
2611 generated/_log_r4.f90: Regenerated.
2612 generated/_log_r8.f90: Regenerated.
2613 generated/_mod_i4.f90: Regenerated.
2614 generated/_mod_i8.f90: Regenerated.
2615 generated/_mod_r4.f90: Regenerated.
2616 generated/_mod_r8.f90: Regenerated.
2617 generated/_sign_i4.f90: Regenerated.
2618 generated/_sign_i8.f90: Regenerated.
2619 generated/_sign_r4.f90: Regenerated.
2620 generated/_sign_r8.f90: Regenerated.
2621 generated/_sin_c4.f90: Regenerated.
2622 generated/_sin_c8.f90: Regenerated.
2623 generated/_sin_r4.f90: Regenerated.
2624 generated/_sin_r8.f90: Regenerated.
2625 generated/_sinh_r4.f90: Regenerated.
2626 generated/_sinh_r8.f90: Regenerated.
2627 generated/_sqrt_c4.f90: Regenerated.
2628 generated/_sqrt_c8.f90: Regenerated.
2629 generated/_sqrt_r4.f90: Regenerated.
2630 generated/_sqrt_r8.f90: Regenerated.
2631 generated/_tan_r4.f90: Regenerated.
2632 generated/_tan_r8.f90: Regenerated.
2633 generated/_tanh_r4.f90: Regenerated.
2634 generated/_tanh_r8.f90: Regenerated.
2635 generated/all_l4.c: Regenerated.
2636 generated/all_l8.c: Regenerated.
2637 generated/any_l4.c: Regenerated.
2638 generated/any_l8.c: Regenerated.
2639 generated/count_4_l4.c: Regenerated.
2640 generated/count_4_l8.c: Regenerated.
2641 generated/count_8_l4.c: Regenerated.
2642 generated/count_8_l8.c: Regenerated.
2643 generated/cshift1_4.c: Regenerated.
2644 generated/cshift1_8.c: Regenerated.
2645 generated/dotprod_c4.c: Regenerated.
2646 generated/dotprod_c8.c: Regenerated.
2647 generated/dotprod_i4.c: Regenerated.
2648 generated/dotprod_i8.c: Regenerated.
2649 generated/dotprod_l4.c: Regenerated.
2650 generated/dotprod_l8.c: Regenerated.
2651 generated/dotprod_r4.c: Regenerated.
2652 generated/dotprod_r8.c: Regenerated.
2653 generated/eoshift1_4.c: Regenerated.
2654 generated/eoshift1_8.c: Regenerated.
2655 generated/eoshift3_4.c: Regenerated.
2656 generated/eoshift3_8.c: Regenerated.
2657 generated/exp_c4.c: Regenerated.
2658 generated/exp_c8.c: Regenerated.
2659 generated/exponent_r4.c: Regenerated.
2660 generated/exponent_r8.c: Regenerated.
2661 generated/fraction_r4.c: Regenerated.
2662 generated/fraction_r8.c: Regenerated.
2663 generated/hyp_c4.c: Regenerated.
2664 generated/hyp_c8.c: Regenerated.
2665 generated/in_pack_i4.c: Regenerated.
2666 generated/in_pack_i8.c: Regenerated.
2667 generated/in_unpack_i4.c: Regenerated.
2668 generated/in_unpack_i8.c: Regenerated.
2669 generated/matmul_c4.c: Regenerated.
2670 generated/matmul_c8.c: Regenerated.
2671 generated/matmul_i4.c: Regenerated.
2672 generated/matmul_i8.c: Regenerated.
2673 generated/matmul_l4.c: Regenerated.
2674 generated/matmul_l8.c: Regenerated.
2675 generated/matmul_r4.c: Regenerated.
2676 generated/matmul_r8.c: Regenerated.
2677 generated/maxloc0_4_i4.c: Regenerated.
2678 generated/maxloc0_4_i8.c: Regenerated.
2679 generated/maxloc0_4_r4.c: Regenerated.
2680 generated/maxloc0_4_r8.c: Regenerated.
2681 generated/maxloc0_8_i4.c: Regenerated.
2682 generated/maxloc0_8_i8.c: Regenerated.
2683 generated/maxloc0_8_r4.c: Regenerated.
2684 generated/maxloc0_8_r8.c: Regenerated.
2685 generated/maxloc1_4_i4.c: Regenerated.
2686 generated/maxloc1_4_i8.c: Regenerated.
2687 generated/maxloc1_4_r4.c: Regenerated.
2688 generated/maxloc1_4_r8.c: Regenerated.
2689 generated/maxloc1_8_i4.c: Regenerated.
2690 generated/maxloc1_8_i8.c: Regenerated.
2691 generated/maxloc1_8_r4.c: Regenerated.
2692 generated/maxloc1_8_r8.c: Regenerated.
2693 generated/maxval_i4.c: Regenerated.
2694 generated/maxval_i8.c: Regenerated.
2695 generated/maxval_r4.c: Regenerated.
2696 generated/maxval_r8.c: Regenerated.
2697 generated/minloc0_4_i4.c: Regenerated.
2698 generated/minloc0_4_i8.c: Regenerated.
2699 generated/minloc0_4_r4.c: Regenerated.
2700 generated/minloc0_4_r8.c: Regenerated.
2701 generated/minloc0_8_i4.c: Regenerated.
2702 generated/minloc0_8_i8.c: Regenerated.
2703 generated/minloc0_8_r4.c: Regenerated.
2704 generated/minloc0_8_r8.c: Regenerated.
2705 generated/minloc1_4_i4.c: Regenerated.
2706 generated/minloc1_4_i8.c: Regenerated.
2707 generated/minloc1_4_r4.c: Regenerated.
2708 generated/minloc1_4_r8.c: Regenerated.
2709 generated/minloc1_8_i4.c: Regenerated.
2710 generated/minloc1_8_i8.c: Regenerated.
2711 generated/minloc1_8_r4.c: Regenerated.
2712 generated/minloc1_8_r8.c: Regenerated.
2713 generated/minval_i4.c: Regenerated.
2714 generated/minval_i8.c: Regenerated.
2715 generated/minval_r4.c: Regenerated.
2716 generated/minval_r8.c: Regenerated.
2717 generated/nearest_r4.c: Regenerated.
2718 generated/nearest_r8.c: Regenerated.
2719 generated/pow_c4_i4.c: Regenerated.
2720 generated/pow_c4_i8.c: Regenerated.
2721 generated/pow_c8_i4.c: Regenerated.
2722 generated/pow_c8_i8.c: Regenerated.
2723 generated/pow_i4_i4.c: Regenerated.
2724 generated/pow_i4_i8.c: Regenerated.
2725 generated/pow_i8_i4.c: Regenerated.
2726 generated/pow_i8_i8.c: Regenerated.
2727 generated/pow_r4_i4.c: Regenerated.
2728 generated/pow_r4_i8.c: Regenerated.
2729 generated/pow_r8_i4.c: Regenerated.
2730 generated/pow_r8_i8.c: Regenerated.
2731 generated/product_c4.c: Regenerated.
2732 generated/product_c8.c: Regenerated.
2733 generated/product_i4.c: Regenerated.
2734 generated/product_i8.c: Regenerated.
2735 generated/product_r4.c: Regenerated.
2736 generated/product_r8.c: Regenerated.
2737 generated/reshape_i4.c: Regenerated.
2738 generated/reshape_i8.c: Regenerated.
2739 generated/set_exponent_r4.c: Regenerated.
2740 generated/set_exponent_r8.c: Regenerated.
2741 generated/shape_i4.c: Regenerated.
2742 generated/shape_i8.c: Regenerated.
2743 generated/sum_c4.c: Regenerated.
2744 generated/sum_c8.c: Regenerated.
2745 generated/sum_i4.c: Regenerated.
2746 generated/sum_i8.c: Regenerated.
2747 generated/sum_r4.c: Regenerated.
2748 generated/sum_r8.c: Regenerated.
2749 generated/transpose_i4.c: Regenerated.
2750 generated/transpose_i8.c: Regenerated.
2751 generated/trig_c4.c: Regenerated.
2752 generated/trig_c8.c: Regenerated.
2754 2005-01-07 Bud Davis <bdavis9659@comcast.net>
2757 * transfer.c (next_record_r): always skip the
2758 eol search if it was found during sf_read.
2760 2004-12-27 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2762 * libgfortran/libgfortran.h (GFC_UINTEGER_1, GFC_UINTEGER_2):
2764 * intrinsics/ishftc.c: Update copyright years.
2765 (ishftc8): Change 'shift' and 'size' to GFC_INTEGER_4.
2766 * intrinsics/mvbits.c: Correct non-ASCII character in my name.
2767 Add implementations for GFC_INTEGER_1 and GFC_INTEGER_2.
2769 2004-12-23 Bud Davis <bdavis9659@comcast.net>
2772 * io/tranfer.c (formatted_transfer): moved check for
2773 format reversion inside the processing loop.
2775 2004-12-19 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2778 * libgfortran.h (itoa): Rename to gfc_itoa.
2779 * io/write.c (itoa): Same.
2780 * runtime/environ.c (itoa): Same.
2781 * runtime/error.c (itoa): Same.
2783 2004-12-15 Bud Davis <bdavis9659@comcast.net>
2784 Steven G. Kargl <kargls@comcast.net>
2787 * io/list_read.c (read_real): do not push back a comma when
2788 it delimits a real value without a decimal point
2790 2004-12-14 Steve Ellcey <sje@cup.hp.com>
2792 * libgfortran/io/transfer.c (us_read): Use memcpy/memset
2793 instead of assignment to fill unaligned buffer.
2795 (next_record_w): Ditto.
2797 2004-12-14 Steven G. Kargl <kargls@comcast.net>
2800 * gfortran.h: typedef GFC_INTEGER_1 and GFC_INTEGER_2
2801 * intrinsics/cshift0.c (cshift0_1,cshift0_2): New functions.
2802 * intrinsics/eoshift0.c (eoshift0_1,eoshift0_2): New functions.
2803 * intrinsics/eoshift2.c (eoshift2_1,eoshift2_2): New functions.
2805 2004-12-13 David Edelsohn <edelsohn@gnu.org>
2807 * io/transfer.c (read_sf): Change bitwise "and" to logical "and".
2809 2004-12-12 Richard Henderson <rth@redhat.com>
2811 * intrinsics/cshift0.c, intrinsics/eoshift0.c, intrinsics/eoshift2.c,
2812 intrinsics/pack_generic.c, intrinsics/reshape_generic.c,
2813 intrinsics/spread_generic.c, intrinsics/transpose_generic.c,
2814 intrinsics/unpack_generic.c, m4/cshift1.m4, m4/dotprod.m4,
2815 m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4, m4/eoshift3.m4,
2816 m4/iforeach.m4, m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4,
2817 m4/reshape.m4, m4/shape.m4, m4/transpose.m4: Use standard prefix
2819 * generated/*: Rebuild.
2821 2004-12-12 Richard Henderson <rth@redhat.com>
2823 * acinclude.m4 (LIBGFOR_CHECK_ATTRIBUTE_VISIBILITY): New.
2824 (LIBGFOR_CHECK_ATTRIBUTE_DLLEXPORT): New.
2825 (LIBGFOR_CHECK_ATTRIBUTE_ALIAS): New.
2826 * configure.ac: Use them.
2827 * configure, config.h.in, aclocal.m4: Rebuild.
2828 * libgfortran.h (prefix): Remove.
2829 (PREFIX, IPREFIX): New.
2830 (sym_rename, sym_rename1, sym_rename2): New.
2831 (internal_proto, export_proto, export_proto_np): New.
2832 (iexport_proto, iexport): New.
2833 (iexport_data_proto, iexport_data): New.
2834 * intrinsics/abort.c, intrinsics/args.c, intrinsics/associated.c,
2835 intrinsics/cpu_time.c, intrinsics/cshift0.c,
2836 intrinsics/date_and_time.c, intrinsics/env.c, intrinsics/eoshift0.c,
2837 intrinsics/eoshift2.c, intrinsics/etime.c, intrinsics/exit.c,
2838 intrinsics/flush.c, intrinsics/fnum.c, intrinsics/getXid.c,
2839 intrinsics/getcwd.c, intrinsics/ishftc.c, intrinsics/mvbits.c,
2840 intrinsics/pack_generic.c, intrinsics/rand.c, intrinsics/random.c,
2841 intrinsics/reshape_generic.c, intrinsics/size.c,
2842 intrinsics/spread_generic.c, intrinsics/stat.c,
2843 intrinsics/string_intrinsics.c, intrinsics/system.c,
2844 intrinsics/system_clock.c, intrinsics/transpose_generic.c,
2845 intrinsics/umask.c, intrinsics/unlink.c, intrinsics/unpack_generic.c,
2846 io/backspace.c, io/close.c, io/endfile.c, io/inquire.c, io/io.h,
2847 io/open.c, io/rewind.c, io/transfer.c, libgfortran.h, m4/cshift1.m4,
2848 m4/dotprod.m4, m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4,
2849 m4/eoshift3.m4, m4/exponent.m4, m4/fraction.m4, m4/iforeach.m4,
2850 m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4, m4/nearest.m4,
2851 m4/pow.m4, m4/reshape.m4, m4/set_exponent.m4, m4/shape.m4,
2852 m4/transpose.m4, runtime/environ.c, runtime/error.c,
2853 runtime/in_pack_generic.c, runtime/in_unpack_generic.c,
2854 runtime/main.c, runtime/memory.c, runtime/pause.c, runtime/select.c,
2855 runtime/stop.c: Use them to mark symbols internal or external.
2856 * generated/*: Rebuild.
2858 2004-12-09 David Edelsohn <edelsohn@gnu.org>
2861 Revert 2004-12-07 change.
2862 * Makefile.am (AM_MAKEFLAGS): Delete.
2863 * Makefile.in: Regenerate.
2865 2004-12-07 Steve Ellcey <sje@cup.hp.com>
2867 * libgfortran/Makefile.am (AM_MAKEFLAGS): New.
2868 * libgfortran/Makefile.in: Regenerate
2870 2004-12-07 Steve Ellcey <sje@cup.hp.com>
2872 * io/io.h (open_external): Change prototype.
2873 * io/unix.c (regular_file): Change prototype and set flags->action if
2875 (open_external): Ditto.
2876 * io/open.c (new_unit): Let open_external set flags->action.
2878 2004-12-07 Eric Botcazou <ebotcazou@libertysurf.fr>
2880 * configure.ac: Check for ieeefp.h. Check for fabsf in libm.
2881 * configure: Regenerate.
2882 * config.h.in: Likewise.
2883 * c99_protos.h: New file.
2884 * libgfortran.h: Include c99_protos.h and conditionally ieeefp.h.
2885 * intrinsics/c99_functions.c (fabsf): New function.
2887 2004-12-06 Richard Henderson <rth@redhat.com>
2889 * intrinsics/cshift0.c, intrinsics/eoshift0.c, intrinsics/eoshift2.c,
2890 intrinsics/pack_generic.c, intrinsics/string_intrinsics.c,
2891 intrinsics/transpose_generic.c, m4/ifunction.m4, m4/matmul.m4,
2892 m4/matmull.m4, m4/transpose.m4: Use internal_malloc_size instead
2894 * generated/*: Rebuild.
2896 2004-12-06 Richard Henderson <rth@redhat.com>
2898 * intrinsics/c99_functions.c, intrinsics/eoshift0.c,
2899 intrinsics/eoshift2.c, intrinsics/exit.c, intrinsics/flush.c,
2900 intrinsics/ishftc.c, intrinsics/mvbits.c, intrinsics/pack_generic.c,
2901 intrinsics/random.c, intrinsics/reshape_generic.c, intrinsics/size.c,
2902 intrinsics/spread_generic.c, intrinsics/stat.c,
2903 intrinsics/string_intrinsics.c, intrinsics/system_clock.c,
2904 intrinsics/transpose_generic.c, intrinsics/unlink.c,
2905 intrinsics/unpack_generic.c, io/backspace.c, io/format.c,
2906 io/list_read.c, io/lock.c, io/open.c, io/transfer.c, io/unix.c,
2907 io/write.c, runtime/environ.c, runtime/error.c,
2908 runtime/in_pack_generic.c, runtime/in_unpack_generic.c, runtime/main.c,
2909 runtime/memory.c, runtime/pause.c, runtime/stop.c,
2910 runtime/string.c: Whitespace fixes.
2912 2004-12-06 Richard Henderson <rth@redhat.com>
2914 * Makefile.am: Generate all m4 output under $(srcdir).
2915 * Makefile.in: Regenerate.
2917 2004-12-02 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
2920 * io/transfer.c (unformatted_read, unformatted_write): width of
2921 a COMPLEX is twice its kind.
2923 2004-12-02 Richard Sandiford <rsandifo@redhat.com>
2925 * configure.ac: Use TL_AC_GCC_VERSION to set gcc_version.
2926 * configure, aclocal.m4, Makefile.in: Regenerate.
2928 2004-12-02 Bud Davis <bdavis9659@comcast.net>
2931 * io/unix.c (fd_alloc_w_at): Update file_length when extending.
2932 * io/backspace.c (formatted_backspace): Reset endfile after backspace.
2934 2004-12-02 Bud Davis <bdavis9659@comcast.net>
2936 * io/inquire.c (inquire_via_unit): do not allow a direct access
2937 file to be opened for sequential I/O.
2939 2004-12-02 Steven G. Kargl <kargls@comcast.net>
2940 Paul Brook <paul@codesourcery.com>
2942 * intrinsics/flush.c: New file.
2943 * intrinsics/fnum.c: ditto
2944 * intrinsics/stat.c: ditto
2945 * io/io.h (unit_to_fd): Add prototype.
2946 * io/unix.c (unit_to_fd): New function.
2947 * configure.ac: Add test for members of struct stat. Check for
2948 sys/types.h and sys/stat.h
2949 * Makefile.am: Add intrinsics/{flush.c,fnum.c,stat.c}
2950 * configure.in: Regenerate.
2951 * config.h.in: Regenerate.
2952 * Makefile.in: Regenerate.
2954 2004-12-01 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
2956 * Makefile.am (AM_CPPFLAGS): Use -iquote instead of -I.
2958 2004-11-28 Bud Davis <bdavis9659@comcast.net>
2960 * io/unix.c (mmap_alloc_w_a): check for a write to a location
2961 less than the mapped area.
2963 2004-11-27 Bud Davis <bdavis9659@comcast.net>
2966 * io/endfile.c (st_endfile): flush the stream before truncating.
2968 2004-11-24 Kelley Cook <kcook@gcc.gnu.org>
2970 * configure: Regenerate for libtool change.
2972 2004-11-22 Steven Bosscher <stevenb@suse.de>
2975 * configure.ac: Check for finite in libm.
2976 * libgfortran.h: Define isfinite macro if not defined.
2977 * intrinsics/c99_functions.c: Use defined(fpclassify) instead of
2979 * io/write.c (write_float): Use isfinite instead of finite.
2980 * configure, config.h.in: Rebuilt.
2982 2004-11-20 Roger Sayle <roger@eyesopen.com>
2984 * io/write.c (write_float, list_formatted_write): Fix indentation.
2986 2004-11-20 Eric Botcazou <ebotcazou@libertysurf.fr>
2989 * acinclude.m4 (LIBGFOR_TARGET_ILP32): New check.
2990 * configure.ac: Include LIBGFOR_TARGET_ILP32.
2991 * configure: Regenerate.
2992 * config.h.in: Likewise.
2993 * libgfortran.h: Provide default definitions for C99 types
2994 on ILP32 targets that don't have them.
2997 * configure.ac: Check for snprintf.
2998 * configure: Regenerate.
2999 * config.h.in: Likewise.
3000 * intrinsics/date_and_time.c (date_and_time): Do not
3001 use snprinf if it is not available.
3002 * io/write.c (output_float): Likewise.
3004 2004-11-20 Steven G. Kargl <kargls@comcast.net>
3006 * Makefile.am: Add intrinsics/{umask.c,unlink.c,exit.c}
3007 * Makefile.in: Regenerated
3008 * intrinsics/umask.c: New file
3009 * intrinsics/unlink.c: ditto
3010 * intrinsics/exit.c: ditto
3012 2004-11-18 Victor Leikehman <lei@il.ibm.com>
3014 * m4/matmul.m4: Loops reordered to improve cache behavior.
3015 * generated/matmul_??.c: Regenerated.
3017 2004-11-10 Paul Brook <paul@codesourcery.com>
3020 * configure.ac: Check for strtof.
3021 * configure: Regenerate.
3022 * config.h.in: Regenerate.
3023 * io/read.c (convert_real): Use strtof if available.
3024 (convert_precision_real): Remove.
3025 (read_f): Avoid poor exponentiation algorithm.
3027 2004-11-05 Andreas Schwab <schwab@suse.de>
3029 * configure.ac: Use AC_PROG_FC, FC and FCFLAGS instead of
3030 AC_PROG_F77, F77 and FFLAGS.
3031 * Makefile.am (selected_int_kind.inc, selected_real_kind.inc): Use
3032 FCCOMPILE instead of F77COMPILE.
3033 * configure, Makefile.in: Regenerate.
3035 2004-11-05 Kelley Cook <kcook@gcc.gnu.org>
3037 * acinclude.m4: Properly quote AC_CACHE_CHECK.
3038 * Makefile.am: Add in ACLOCAL_AMFLAGS.
3039 * aclocal.m4, configure, Makefile.in: Regenerate.
3041 2004-10-30 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
3043 * config.h.in: Regenerate.
3044 * configure: Regenerate.
3045 * configure.ac (AC_CHECK_FUNCS): Add mkstemp.
3046 * io/unix.c (S_IRGRP): Define if undefined.
3050 (tempfile): Use mktemp if mkstemp missing, fix typos.
3052 2004-10-30 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
3054 * intrinsics/system.c ("libgfortran.h"): Move after system headers.
3056 2004-10-30 Canqun Yang <canqun@nudt.edu.cn>
3058 * intrinsics/rand.c (irand): Handle NULL argument.
3060 2004-10-07 Paul Brook <paul@codesourcery.com>
3062 * io/transfer.c (finalize_transfer): Free internal streams.
3063 * io/unix.c (mem_close): Free stream object.
3065 2004-10-07 Paul Brook <paul@codesourcery.com>
3067 * intrinsics/string_intrinsics.c (string_verify): Fix off by one
3070 2004-10-06 Paul Brook <paul@codesourcery.com>
3073 * io/transfer.c (data_transfer_init): Reset sf_seen_eor.
3075 2004-10-04 Andrew Pinski <pinskia@physics.uc.edu>
3077 * intrinsics/mvbits.c: Commit the file.
3079 2004-10-04 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3082 * intrinsics/pack_generic.c (__pack): Allocate memory for return array
3083 if not done by caller.
3084 (__pack_s): New function.
3085 * runtime/memory.c (internal_malloc, internal_malloc64): Allow
3086 allocating zero memory.
3089 * Makefile.am (gfor_helper_src): Add intrinsics/mvbits.h.
3090 * Makefile.in: Regenerate.
3091 * intrinsics/mvbits.h: New file.
3094 * intrinsics/system.c: New file.
3095 * Makefile.am: Add dependency for the new file.
3096 * Makefile.in: Regenerate.
3098 2004-10-04 Paul Brook <paul@codesourcery.com>
3099 Bud Davis <bdavis9659@comcast.net>
3103 * io/format.c (parse_format_list): Set repeat count for S, SP, SS,
3105 * io/write.c (output_float): Don't output minus zero.
3107 2004-10-03 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
3109 * intrinsics/abort.c ("libgfortran.h"): Move.
3110 * intrinsics/date_and_time.c ("libgfortran.h"): Same.
3111 * intrinsics/write.c ("libgfortran.h"): Same.
3113 2004-09-26 Tobias Schlueter <tobis.schlueter@physik.uni-muenchen.de>
3116 * config.h.in (HAVE_POWF): Undefine.
3117 * configure.ac: Check for 'powf' in library.
3118 * configure: Regenerate.
3119 * intrinsics/c99_functions.c (powf): New function.
3121 2004-09-24 Tobias Schlueter <tobis.schlueter@physik.uni-muenchen.de>
3123 * intrinsics/etime.c (etime_): New function.
3125 2004-09-21 Steven G. Kargl <kargls@comcast.net>
3127 * libgfortran.h: define gfc_alloca()
3128 * intrinsics/env.c (getenv, get_environment_variable_i4): Use it.
3130 2004-09-21 Bud Davis <bdavis9659@comcast.net>
3133 * io/list_read.c (namelist_read): ignore spaces after
3134 the '=' for namelist reads.
3136 2004-09-15 Aaron W. LaFramboise <aaronavay62@aaronwl.com>
3138 * config.h.in: Regenerate.
3139 * configure: Regenerate.
3140 * configure.ac (AC_CHECK_HEADERS): Check for sys/mman.h.
3141 * unix.c: Include stdio.h.
3142 (HAVE_SYS_MMAN_H): Check.
3143 (PROT_READ, PROT_WRITE): Provide default definitions.
3145 2004-09-15 Steven G. Kargl <kargls@comcast.net>
3147 * intrincics/getcwd.c: New file.
3148 * Makefile.am: Add getcwd.c.
3149 * Makefile.in: Regenerated.
3151 2004-09-15 Steven G. Kargl <kargls@comcast.net>
3152 Paul Brook <paul@codesourcery.com>
3154 * intrinsics/env.c (getenv, get_environmental_variable): Remove
3155 trailing white space. Use alloca. Honour trim_name.
3157 2004-09-13 Bud Davis <bdavis9659@comcast.net>
3161 * io/list_read.c (list_formatted_read): Handle trailing spaces
3164 2004-09-06 Steven G. Kargl <kargls@comcast.net>
3166 * io/write.c (output_float): Typo in comment. Remove debugging
3167 printf. Fix format for FP of form 1e10.
3169 2004-09-03 Richard Henderson <rth@redhat.com>
3171 * intrinsics/cshift0.c (DEF_COPY_LOOP, copy_loop_int, copy_loop_long,
3172 copy_loop_double, copy_loop_ldouble): New.
3173 (__cshift0): Make shift type ssize_t. Use % operator instead of
3174 div. Use specialized versions of copy loop depending on the shape.
3176 2004-09-02 Paul Brook <paul@codesourcery.com>
3178 * io/format.c (parse_format_list): Set repeat count for P descriptors.
3179 * write.c (output_float): Fix condition. Correctly handle nonzero
3182 2004-09-01 Eric Botcazou <ebotcazou@libertysurf.fr>
3184 * mk-sik-inc.sh: Use a temporary string instead of 'echo -n'.
3185 * mk-srk-inc.sh: Likewise.
3187 2004-09-01 Paul Brook <paul@codesourcery.com>
3189 * runtime/error.c (generate_error): Set both iostat and
3192 2004-08-31 Paul Brook <paul@codesourcery.com>
3195 * io/list_read.c (next_char): Don't signal EOF for internal files.
3196 * io/unix.c (mem_alloc_r_at): Don't return NULL for incomplete reads.
3198 2004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3200 * io/unit.c: Separate copyright years by ','.
3201 (compare, insert_unit, delete_unit, is_internal_unit, close_units):
3202 Remove blank line in beginning of function.
3203 (get_unit): Simplify code.
3205 2004-08-31 Paul Brook <paul@codesourcery.com>
3207 * io/unit.c (get_unit): Remove superfluous if.
3209 2004-08-31 Paul Brook <paul@codesourcery.com>
3211 * io/transfer.c (read_sf): Rename uinty to readlen. Detect EOF.
3212 (finalize_transfer): Move setjmp after namlist IO.
3213 * io/unix.c (mem_alloc_r_at): Calculate remaining length correctly.
3215 2004-08-31 Paul Brook <paul@codesourcery.com>
3217 * list_read.c (eat_separator): Set at_eo when a '/' is seen.
3219 2004-08-31 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3221 * libgfortran.h: Replace 'gfc_strlen_type' by
3222 'gfc_charlen_type'. Update comment accordingly.
3223 * intrinsics/args.c, intrinsics/env.c, io/io.h, io/transfer.c:
3224 Replace all occurences of 'gfc_strlen_type' by 'gfc_charlen_type'.
3226 2004-08-31 Paul Brook <paul@codesourcery.com>
3228 * libgfortran.h: Add comments.
3230 2004-08-30 Richard Henderson <rth@redhat.com>
3232 * Makefile.am (gfor_helper_src): Split selected_kind.f90.
3233 (gfor_built_src): Add selected_int_kind.inc selected_real_kind.inc.
3234 (selected_int_kind.inc selected_real_kind.inc): New rules.
3235 * Makefile.in: Regenerate.
3236 * mk-sik-inc.sh, mk-srk-inc.sh: New files.
3237 * intrinsics/selected_int_kind.f90: Split from selected_kind.f90,
3238 include table of detected kinds.
3239 * intrinsics/selected_real_kind.f90: Similarly.
3241 2004-08-29 Steven G. Kargl <kargls@comcast.net>
3242 Paul Brook <paul@codesourcery.com>
3244 * intrinsics/bessel.c: New file.
3245 * intrinsics/erf.c: New file.
3246 * Makefie.am: Add intrinsics/bessel.c and intrinsics/erf.c.
3247 * configure.ac: Test for C99 Bessel and Error functions.
3248 * Makefile.in: Regenerate.
3249 * config.h.in: Regenerate.
3250 * configure: Regenerate.
3252 2004-08-29 Steven G. Kargl <kargls@comcast.net>
3253 Paul Brook <paul@codesourcery.com>
3255 * Makefile.am: Add intrinsics/getXid.c.
3256 * configure.ac: Add tests for get{g,p,u}id.
3257 * config.h.in: Regenerate.
3258 * Makefile.in: Regenerate.
3259 * configure: Regenerate.
3261 2004-08-28 Paul Brook <paul@codesourcery.com>
3264 * libgfortran.h (rtoa): Remove prototype.
3265 * runtime/error.c (rtoa): Remove.
3266 * io/write.c (calculate_G_format): Don't add blanks if E format is
3267 used. Add correct number of blanks when exponent width is specified.
3268 (output_float): Rewrite.
3270 2004-08-27 Paul Brook <paul@codesourcery.com>
3272 * io/rewind.c (st_rewind): Reset unit to read mode.
3274 2004-08-27 Bud Davis <bdavis9659@comcast.net>
3277 * io/io.h: created typedef for unit_mode.
3278 * io/io.h (gfc_unit): added mode to unit structure.
3279 * io/transfer.c (data_transfer_init): flush if a write then
3280 read is done on a unit (direct access files).
3281 * io/rewind.c (st_rewind): Used unit mode instead of global.
3283 2004-08-24 Bud Davis <bdavis9659@comcast.net>
3286 * runtime/error.c (itoa): keep from overflowing during
3287 mod operation by using unsigned variable.
3289 2004-08-24 Bud Davis <bdavis9659@comcast.net>
3292 * runtime/string_intrinsics.c (string_index):check for
3293 substring longer than string.
3295 2004-08-24 David Edelsohn <edelsohn@gnu.org>
3297 * Makefile.am (libgfortran_la_LDFLAGS): Add -lm.
3298 * Makefile.in: Rebuilt.
3300 2004-08-23 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3302 * io/io.h, io/list_read.c, io/open.c, io/transfer.c, io/write.c:
3303 Fix formatting issues, update copyright years.
3305 2004-08-21 Bud Davis <bdavis9659@comcast.net>
3308 * io/transfer.c (next_record_w): Do not blank pad.
3309 * io/transfer.c (next_record): Take into account partial records.
3311 2004-08-18 Victor Leikehman <lei@il.ibm.com>
3314 * io/transfer.c (st_set_nml_var)
3315 * io/write.c (namelist_write): Allow var_name and var_name_len to be
3316 null. For strings, use string_length field instead of len.
3317 * io/io.h (struct namelist_type): New field string_length.
3318 (st_set_nml_var_char): New argument string_length.
3320 2004-08-13 Bud Davis <bdavis9659@comcast.net>
3323 * io/open.c (st_open): use flags instead of the unit structure.
3325 2004-08-10 Victor Leikehman <lei@il.ibm.com>
3327 * io/list_read.c (namelist_read): Convert variable names
3328 to lower case, so that mixed-case names are recognized.
3329 Don't read beyond terminating slash.
3331 2004-08-09 Richard Henderson <rth@redhat.com>
3332 Roger Sayle <roger@eyesopen.com>
3334 * intrinsics/c99_functions.c (nextafterf): New implementation that
3335 works correctly with denormalized numbers.
3337 2004-08-09 Victor Leikehman <lei@il.ibm.com>
3339 * m4/matmul.m4, m4/matmull.m4, intrinsics/eoshift0.c,
3340 intrinsics/eoshift2.c, intrinsics/transpose_generic.c:
3341 Allocate space if return value has NULL in its data field.
3342 * generated/*.c: Regenerate.
3344 2004-08-06 Janne Blomqvist <jblomqvi@cc.hut.fi>
3346 * intrinsics/env.c: New file.
3347 * Makefile.am: Add env.c to build.
3348 * Makefile.in: Regenerate.
3350 2004-08-05 Victor Leikehman <lei@il.ibm.com>
3352 PR libgfortran/16704
3353 * io/read.c (read_radix): Understand letters f and F as hex digits.
3355 2004-08-04 Victor Leikehman <lei@il.ibm.com>
3357 * libgfortran.h (array_t, size0) New declarations.
3358 * m4/ifunction.m4, m4/transpose.m4, intrinsics/cshift0.c: Allocate
3359 space if return value descriptor has NULL in its data field,
3360 and initialize bounds and stride.
3361 * intrinsics/size.c (array_t, size0): Declarations moved to
3363 * generated/*.c: Regenerate.
3365 2004-08-03 Roger Sayle <roger@eyesopen.com>
3367 PR libgfortran/16137
3368 * configure.ac: Add tests for acosf, asinf, atan2f, atanf, ceilf,
3369 copysignf, cosf, coshf, expf, floorf, frexpf, hypotf, logf, log10f,
3370 scalbnf, sinf, sinhf, sqrtf, tanf and tanhf in libm.
3371 * config.h.in: Regenerate.
3372 * configure: Regenerate.
3374 * instrinsics/c99_functions.c (acosf, asinf, atan2f, atanf, ceilf,
3375 copysignf, cosf, coshf, expf, floorf, frexpf, hypotf, logf, log10f,
3376 nextafterf, scalbnf, sinf, sinhf, sqrtf, tanf, tanhf): New stub
3377 implementations for targets that don't support C99 float functions.
3379 2004-08-01 Roger Sayle <roger@eyesopen.com>
3381 * io/write.c (write_float): Use the slightly more portable isnan
3382 in preference to isinf.
3384 2004-07-18 Bud Davis <bdavis9659@comcast.net>
3386 * configure.ac: Add check for LFS support.
3387 * configure: Regenerate
3389 2004-07-11 Paul Brook <paul@codesourcery.com>
3392 * m4/cexp.m4 (carg): Return -pi to pi.
3393 * generated/exp_c?.c: Regenerate.
3395 2004-07-08 Andreas Krebbel <krebbel1@de.ibm.com>
3398 * libgfortran/io/write.c: (write_float): Added length check.
3399 Remove pointless memset calls.
3401 2004-07-04 Bud Davis <bdavis9659@comcast.net>
3402 Paul Brook <paul@codesourcery.com>
3405 * io/transfer.c(us_write): set recl for seq unform writes to max size.
3406 * io/transfer.c(data_transfer_init): handle un-opened seq unform unit.
3407 * io/unix.c(fd_alloc_w_at): handle requests at start, fd_flush at
3409 * io/unix.c(is_seekable): set based upon the file/device, not the
3410 method being used to access it (fd or mmap).
3411 * io/unix.c(fd_flush): don't set file_size if !seekable.
3412 * io/unix.c(fd_truncate: ditto.
3414 2004-07-04 Janne Blomqvist <jblomqvi@cc.hut.fi>
3415 Paul Brook <paul@codesourcery.com>
3419 * libgfortran.h (gfc_strlen_type): Define.
3420 * intrinsics/args.c (getarg): Rename ...
3421 (getarg_i4): ... to this.
3422 (getarg_i8, get_command_argument_i4, get_command_argument_i8,
3423 get_command_i4, get_command_i8): New functions.
3425 2004-07-04 Matthias Klose <doko@debian.org>
3427 * libtool-version: New.
3428 * Makefile.am (libgfortran_la_LDFLAGS): Use -version-info for soname.
3429 * Makefile.in: Regenerate.
3430 * configure.ac: Remove libtool_VERSION macro
3431 * configure: Regenerate
3433 2004-06-30 Steve Kargl <sgk@troutmask.apl.washington.edu>
3434 Steven Bosscher <stevenb@suse.de>
3436 * intrinsics/rand.c (rand): Wrap the irand() call from the previous
3439 2004-06-29 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3440 Paul Brook <paul@codesourcery.com>
3442 * runtime/normalize.c (normalize_r4_i4, normalize_r8_i8): Fix
3444 * intrinsics/rand.c (rand): Call irand() in call to normalize_r4_i4.
3446 2004-06-27 Bud Davis <bdavis9659@comcast.net>
3449 * io/write.c (write_float): check signbit for Infinity.
3451 2004-06-26 Bud Davis <bdavis9659@comcast.net>
3454 * unix.c(regular_file): create file if it does not exist.
3456 2004-06-24 Andrew Pinski <apinski@apple.com>
3458 * configure.ac: Remove check for libmx.
3459 * configure: Regenerate.
3461 2004-06-22 Janne Blomqvist <jblomqvi@cc.hut.fi>
3464 * inquire.c (st_inquire): Add comment
3465 * io.h (st_parameter): Add iolength.
3466 (st_iolength, st_iolength_done): Declare.
3467 * transfer.c (iolength_transfer, iolength_transfer_init,
3468 st_iolength, st_iolength_done): New functions.
3470 2004-06-21 Steven G. Kargl <kargls@comcast.net>
3472 * etime.c (etime_sub): Remove array rank check;
3473 Add check for sufficient space.
3475 2004-06-19 Bud Davis <bdavis9659@comcast.net>
3478 * io/list_read.c(set_value): fixed spelling.
3480 2004-06-19 Bud Davis <bdavis9659@comcast.net>
3483 * io/list_read.c(set_value): don't copy if the string is null.
3485 2004-06-14 Bud Davis <bdavis9659@comcast.net>
3488 * intrinsics/c99_functions.c: Use fpclassify if it exists.
3490 2004-06-13 Paul Brook <paul@codesourcery.com>
3492 * Makefile.am (gfor_helper_src): Add runtime/normalize.f90.
3493 * configure.ac: Add checks for nextafter and nextafterf.
3494 * Makefile.in, config.h.in, configure: Regenerate.
3495 * libgfortran.h (normalize_r4_i4, normalize_r8_i8): Declare.
3496 * intrinsics/rand.c (rand): Use normalize_r4_i4.
3497 * intrinsics/random.c (random_r4): Use normalize_r4_i4.
3498 (random_r8): Use normalize_r8_i8.
3499 * runtime/normalize.c: New file.
3501 2004-06-13 Steven G. Kargl <kargls@comcast.net>
3502 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3504 * random.c: Fix several spelling and formatting mistakes in
3506 (random_r8): Fix loop to make random numbers range in [0,1(.
3509 2004-06-13 Steven G. Kargl <kargls@comcast.net>
3511 * random.c (random_r4): Burn a random number.
3512 (random_r8): fix infinite loop.
3514 2004-06-12 Bud Davis <bdavis9659@comcast.net>
3515 Steve Kargl <sgk@troutmask.apl.washington.edu>
3518 * intrinsics/c99_functions.c: New file.
3519 * Makefile.am: Add new file.
3520 * configure.ac: Added test for round/roundf.
3521 * Makefile.in: Regenerate.
3522 * configure: Regenerate.
3523 * configure.h.in: Regenerate.
3525 2004-06-12 Steven G. Kargl <kargls@comcast.net>
3527 * Makefile.am: Add rand.c and etime.c
3528 * Makefile.in: Regenerated.
3529 * aclocal.in: Regenerated.
3530 * cpu_time.c (second_sub, second): New functions.
3531 * rand.c (irand, rand, srand): New file.
3532 * etime.c (etime_sub, etime): New file.
3534 2004-06-12 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3535 Steven Bosscher <stevenb@suse.de>
3538 * intrinsics/date_and_time.c: New file.
3539 * Makefile.am (gfor_helper_src): Add intrinsics/date_and_time.c.
3540 * Makefile.in, aclocal.m4: Regenerate.
3541 * libgfortran.h: Prototype date_and_time().
3543 2004-06-12 Bud Davis <bdavis9659@comcast.net>
3546 * intrinsics/args.c: Implement GETARG and IARGC.
3547 * Makefile.am: Add it.
3548 * Makefile.in: Regenerate.
3550 2004-06-12 Bud Davis <bdavis9659@comcast.net>
3553 * io/write.c(write_float): Format inf and nan IAW F2003.
3555 2004-06-09 Bud Davis <bdavis9659@comcaste.net>
3558 * io/transfer.c (formatted_transfer): position is unique
3559 for T and TL edit descriptors.
3560 (data_transfer_init): set record length to size of internal
3563 2004-06-09 Bud Davis <bdavis9659@comcast.net>
3566 * io/backspace.c(st_backspace): call correct routine for
3567 formatted and un-formatted units.
3569 2004-05-30 Andreas Jaeger <aj@suse.de>, Steven Bosscher <stevenb@suse.de>
3572 * Makefile.am (AM_CPPFLAGS): Renamed from INCLUDES.
3573 (lib_LTLIBRARIES): Rename to ...
3574 (toolexeclib_LTLIBRARIES): this for multilib support.
3575 * configure.in: Rename to ...
3576 * configure.ac: this. Update to modern autoconf style, enable
3577 multilibs, support --enable-version-specific-runtime-libs.
3578 * Makefile.in: Regenerated.
3579 * configure: Regenerated.
3580 * aclocal.m4: Regenerated.
3582 2004-05-30 Steven G. Kargl <kargls@comcast.net>
3584 * libgfortran.h (random_seed): Update prototype.
3585 * intrinsics/random.c: Disable old implementation and add new one.
3587 2004-05-30 Andreas Jaeger <aj@suse.de>
3589 * intrinsics/random.c: Include unistd.h for close and read
3590 prototypes, remove unneeded inclusion of assert.h.
3592 * intrinsics/abort.c: Include stdlib.h for abort prototype, remove
3593 unneeded inclusion of assert.h.
3595 2004-05-27 Tobias Schlueter <tobias.shclueter@physik.uni-muenchen.de>
3598 * intrinsics/associated.c: Remove enum.
3599 (associated): Replace TRUE/FALSE by 1/0.
3601 2004-05-23 Steven G. Kargl <kargls@comcast.net>
3603 * random.c (random_seed): Use correct variable.
3605 2004-05-22 Steven G. Kargl <kargls@comcast.net>
3607 * intrinsics/system_clock: New file.
3608 * Makefile.am: Add intrinsics/system_clock.c.
3609 * Makefile.in: Regenerate.
3611 2004-05-21 Roger Sayle <roger@eyesopen.com>
3613 * io/format.c (parse_format_list): Allow the comma after a string
3614 literal to be optional.
3616 2004-05-18 Paul Brook <paul@codesourcery.com>
3617 Feng Wang <fengwang@nudt.edu.cn>
3619 * Makefile.am (i_pow_c): Set it. Add build rule.
3620 (gfor_built_src): Use it.
3621 (m4_files): add m4/pow.m4.
3622 * Makefile.in: Regenerate.
3623 * m4/pow.m4: New file.
3624 * generated/pow_*.c: Regenerate.
3626 2004-05-18 Paul Brook <paul@codesourcery.com>
3628 * Makefile.am: Remove references to types.m4.
3629 * m4/iparm.m4: Merge with types.m4.
3630 * m4/types.m4: Remove.
3631 * m4/cshift1.m4, m4/dotprod.m4, m4/dotprodc.m4, m4/dotprodl.m4,
3632 m4/eoshift1.m4, m4/eoshift3.m4, m4/iforeach.m4, m4/ifunction.m4,
3633 m4/in_pack.m4, m4/in_unpack.m4, m4/iparm.m4, m4/matmul.m4,
3634 m4/matmull.m4, m4/maxloc0.m4, m4/maxloc1.m4, m4/maxval.m4,
3635 m4/minloc0.m4, m4/minloc1.m4, m4/minval.m4, m4/reshape.m4,
3636 m4/shape.m4, m4/specific.m4, m4/specific2.m4, m4/transpose.m4):
3637 Update to use new iparm.m4.
3638 * generated/*.c: Regenerate.
3640 2004-05-18 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3643 * gfortran.h (offset_t): Rename to ...
3644 (gfc_offset): ... this.
3645 * io/backspace.c (formatted_backspace, unformatted_backspace),
3646 io/io.h (stream, gfc_unit, global_t, file_length, file_position),
3647 transfer.c (us_read, us_write, next_record_r, next_record_w),
3648 io/unit.c (init_units), unix.c (unix_stream, fd_alloc,
3649 fd_alloc_r_at, fd_alloc_w_at, fd_seek, mmap_alloc,
3650 mmap_alloc_r_at, mmap_alloc_w_at, mmap_seek, mem_alloc_r_at,
3651 mem_alloc_w_at, mem_seek, file_length, file_position): Replace all
3652 occurences of offset_t by gfc_offset.
3654 2004-05-16 Paul Brook <paul@codesourcery.com>
3656 * io/format.c (write_real): Don't include padding in format.
3658 2004-05-16 Paul Brook <paul@codesourcery.com>
3660 * io/format.c (format_lex): Make c an int.
3662 2004-05-16 Janne Blomqvist <jblomqvi@cc.hut.fi>
3663 Paul Brook <paul@codesourcery.com>
3665 * io/write.c (write_logical): Don't print extra blank.
3666 (write_integer): Base field width on kind.
3667 (list_formatted_write): Output initial blank.
3669 2004-05-16 Janne Blomqvist <jblomqvi@cc.hut.fi>
3671 * io/io.h (flush): Add prototype.
3672 * io/transfer.c (finalize_transfer): Flush partial records.
3673 * io/unix.c (flush): New function.
3675 2004-05-15 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
3678 * io/io.h (unit_t): Rename to ...
3679 (gfc_unit) ... this.
3680 (unit_root, current_unit, find_file, find_unit, get_unit): Now
3682 (delete_file, insert_unit, close_unit): Argument now of type
3684 * backspace.c (st_backspace), close.c (st_close), endfile.c
3685 (st_endfile), inquire.c (inquire_via_unit, st_inquire), open.c
3686 (test_endfile, edit_modes, new_unit, already_open, st_open),
3687 rewind.c (st_rewind), transfer.c (current_unit), unit.c
3688 (internal_unit, unit_cache, rotate_left, rotate_right, insert,
3689 insert_unit, delete_root, delete_treap, delete_unit, find_unit,
3690 get_unit, init_units, close_unit), unix.c (find_file0,
3691 find_file, delete_file): Replace all occurences of unit_t by
3694 2004-05-15 Bud Davis <bdavis9659@comcast.net>
3697 * io/write.c (write_a): right justify A edit output.
3699 2004-05-14 Bud Davis <bdavis9659@comcast.net>
3702 * libgfortan.h,intrinsics/random.c: Made random_seed visible.
3703 * runtime/main.c(init): Call random_seed as part of MAIN init.
3705 2004-05-13 Tobias Schlter <tobias.schlueter@physik.uni-muenchen.de>
3707 * io/format.c: (parse_format_list): No comma is required after
3710 2004-05-13 Bud Davis <bdavis9659@comcast.net>
3713 * io/intrinsic/string_intrinsics.c (adjustr): rework logic.
3715 2004-05-06 Rainer Orth <ro@TechFak.Uni-Bielefeld.DE>
3716 Steven Bosscher <stevenb@suse.de>
3719 * libgfortran.h: Include <inttypes.h> if available.
3721 2004-05-03 Rainer Orth <ro@TechFak.Uni-Bielefeld.DE>
3723 * io/unix.c (MAP_FAILED): Define if missing.
3724 (mmap_alloc): Cast MAP_FAILED to char *.
3725 (mmap_open): Likewise.
3727 2004-04-26 Bud Davis <bdavis9659@comcast.net>
3729 * generated/_abs_i8.f90: New file.
3730 * generated/_abs_c4.f90: New file.
3731 * generated/_abs_c8.f90: New file.
3732 * Makefile.am: Add them.
3733 * Makefile.in: Regenerate.
3735 2004-04-26 Bud Davis <bdavis9659@comcast.net>
3738 * generated/_abs_i4.f90: New file.
3739 * Makefile.am: Add it.
3740 * Makefile.in: Regenerate.
3742 2004-04-25 Bud Davis <bdavis9659@comcast.net>
3745 * io/list_read.c(list_formatted_read): finish consuming the
3746 spaces and seperators at eoln to get ready for next item.
3748 2004-04-23 Bud Davis <bdavis9659@comcast.net>
3751 * io/read.c(read_a): Handle field width > destination and no field width.
3753 2004-04-22 Bud Davis <bdavis9659@comcast.net>
3756 * io/format.c (format_item): gracefully handle a ')'
3757 when it is the first character encountered in the string.
3759 2004-04-11 Bud Davis <bdavis9659@comcast.net>
3762 * io/transfer.c (next_record): Update last_record when
3763 more than one record is written to a direct access file
3764 with one write statement.
3766 2004-04-11 Bud Davis <bdavis9659@comcast.net>
3769 * io/transfer.c (next_record_w) : No '\n' if internal.
3770 * io/unix.c (empty_internal_buffer) : Init to spaces, not '\n'.
3772 2004-04-11 Bud Davis <bdavis9659@comcast.net>
3774 * io.h (ioparm): Interface from FE is 32 bit, irregardless of offset_t.
3775 Will need to change this later to support direct access files > 2gb.
3777 2004-04-03 Bud Davis <bdavis9659@comcast.net>
3780 * io/transfer.c (next_record_r) : Skip to next record.
3782 2004-04-03 Bud Davis <bdavis9659@comcast.net>
3785 * io/transfer.c (next_record): Update last_record for DIRECT
3787 2004-04-03 Bud Davis <bdavis9659@comcast.net>
3790 * io/unix.c (find_file0): Use fd field of struct
3792 2004-04-03 Bud Davis <bdavis9659@comcast.net>
3795 * io/inquire.c (inquire_via_unit): Changed return string for
3796 BLANK=NULL. Use correct variable for ACTION.
3798 2004-04-01 Bud Davis <bdavis9659@comcast.net>
3801 * io/read.c (read_f): Allow a decimal without a leading digit.
3802 * io/write.c (output_float): remove a leading '0' to keep from
3803 overflowing the field (F edit descriptor).
3805 2004-04-01 Bud Davis <bdavis9659@comcast.net>
3808 * io/open.c (new_unit),
3809 * io/io.h : new_unit is now visible
3810 * io/transfer.c (data_transfer_init): open unit if no OPEN statement.
3811 * io/transfer.c (data_transfer_init): remove compile warnings.
3812 * io/rewind.c (st_rewind): ftruncate if writing.
3814 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3816 * write.c (write_l): Use extract_int for 'L' edit descriptor.
3818 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3821 * io/io.h (global_t):
3822 * io/list_read.c (next_char,list_formatted_read,ist_formatted_read):
3823 Move eof_jmp to a global structure.
3824 * io/transfer.c(finalize_transfer) : Set up eof_jump for callers.
3826 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3828 * m4/cexp.m4 (csqrt): Actually use the passed value.
3829 * generated/exp_c?.c: Regenerate.
3831 2004-03-24 Bud Davis <bdavis9659@comcast.net>
3834 * io.h, transfer.c, open.c : recl_in changed from ptr to variable.
3835 * open.c (new_unit): Moved test for positioned direct access error.
3836 (init_units): Corrected calculation of max records.
3838 2004-02-06 Feng Wang <fengwang@nudt.edu.cn>
3840 * Makefile.am: Add m4/dotprodc.m4. And fix spelling.
3841 * Makefile.in: Regenerate.
3842 * m4/dotprodc.m4: New file. Implement complex dot_product.
3843 * m4/dotprod.m4: Delete the complex implementation.
3844 * generated/dotprod_*: Update.
3846 2004-02-07 Bud Davis <bdavis9659@comcast.net>
3848 * transfer.c (write_constant_string): Do not delete H's in hollerith
3851 2004-01-05 Andrew Pinski <apinski@apple.com>
3853 * configure.in: Check for csin in -lmx also.
3854 * configure: Regenerate.
3856 2004-01-01 Paul Brook <paul@codesourcery.com>
3858 * io/list_read.c (find_nml_node): Make static.
3859 (match_namelist_name): Ditto.
3860 * io/read.c (convert_precision_real): Make static, fix spelling.
3861 * io/transfer.c (extract_real): Remove unused prototype.
3862 (st_set_nml_var): Make static.
3863 * io/write.c (extract_real): Make static.
3865 2003-12-12 Huang Chun <chunhuang73@hotmal.com>
3867 * intrinsics/string_intrinsics.c (string_index): Fix logics thinko.
3869 2003-12-05 Melvin Hadasht <melvin.hadasht@free.fr>
3871 * io/transfer.c (data_transfer_init): Give a runtime error for list
3872 formatted reads and writes from/to files opened for unformatted IO.
3874 2003-11-30 Paul Brook <paul@nowt.org>
3876 * runtime/memory.c (push_context): Remove.
3877 (pop_context): Remove.
3878 * libgfortran.h: Remove prototypes.
3880 2003-11-27 Paul Brook <paul@nowt.org>
3882 * runtime/memory.c (deallocate): Nullify pointer after freeing.
3884 2003-11-27 Paul Brook <paul@nowt.org>
3886 * intrinsics/string_intrinsics.c: Use new memory allocation interface.
3887 * libgfortran.h: Ditto.
3888 * m4/in_pack.m4: Ditto.
3889 * runtime/in_pack_generic.c: Ditto.
3890 * runtime/memory.c: Ditto.
3892 2003-11-26 Richard Henderson <rth@redhat.com>
3894 * m4/exponent.m4, m4/fraction.m4: New.
3895 * m4/nearest.m4, m4/set_exponent.m4: New.
3896 * generated/*: Update.
3897 * Makefile.am: Add them.
3898 (AM_CFLAGS): New. Use -std=gnu99.
3899 * Makefile.in: Regenerate.
3901 2003-11-08 Paul Brook <paul@nowt.org>
3904 * m4/maxloc0.m4: Use default value of 1. Handle zero sized arrays.
3905 * m4/maxloc1.m4: Ditto.
3906 * m4/minloc0.m4: Ditto.
3907 * m4/minloc1.m4: Ditto.
3908 * m4/ifunction.m4: Set return value for zero sized arrays.
3909 * m4/iforeach.m4: Ditto.
3910 * m4/all.m4, m4/any.m4, m4/count.m4, m4/maxloc1.m4, m4/minloc1.m4,
3911 m4/mxaval.m4, m4/minval.m4, m4/product.m4, m4/sum.m4: Ditto.
3912 * generated/*: Update.
3914 2003-10-30 Toon Moene <toon@moene.indiv.nluug.nl>
3917 * io/list_read.c (eat_spaces): Treat tab as space.
3919 2003-10-30 Lars Segerlund <Lars.Segerlund@comsys.se>
3921 * intrinsics/random.c: Add reference to paper containing algorithm.
3922 (random_seed): Extra error checking and proper handling of arrays.
3923 (arandom_r4, arandom_r8): Implement.
3925 2003-10-29 Toon Moene <toon@moene.indiv.nluug.nl>
3928 * runtime/memory.c (allocate_size): Allow allocation
3929 of zero-sized objects.
3931 2003-10-29 Toon Moene <toon@moene.indiv.nluug.nl>
3934 * open.c (new_unit): Open without a file name opens
3935 a file with name fort.<unit>.
3937 2003-10-12 Feng Wang <wf_cs@yahoo.com>
3939 * intrinsics/cshift0.c: New file.
3940 * m4/cshift1.m4: New file
3941 * generated/cshift*.c: New files.
3942 * Makefile.am: Add them.
3943 * Makefile.in: Regenerate.
3945 2003-10-12 XiaoQiang Zhang <zhangapache@yahoo.com>
3947 * io/list_read.c (read_character): Remove unwanted call to free_saved.
3949 2003-10-11 Huang Chun <jiwang@mail.edu.cn>
3951 * intrinsics/string_intrinsics.c (string_trim): New function.
3952 (string_repeat): New function.
3954 2003-10-11 Paul Brook <paul@nowt.org>
3956 * intrinsics/dprod_r8.f90: New file.
3957 * Makefile.am (gfor_specific_src): Add it.
3958 (gfor_built_specific_src): Rename from gfor_build_specific_c.
3960 (gfor_specific2_src): Rename from gfor_built_specific2_c.
3962 * Makefile.in: Regenerate.
3963 * generated/_aint_*.f90: New files.
3964 * generated/_anint*.f90: New files.
3965 * generated/_atan2*.f90: New files.
3966 * generated/_mod*.f90: New files.
3968 2003-09-20 Kejia Zhao <kejia_zh@yahoo.com.cn>
3970 * intrinsics/selected_kind.f90: New file.
3971 * Makefile.am: Add it.
3972 * Makefile.in: regenerate.
3974 2003-09-19 Lars Segerlund <Lars.Segerlund@comsys.se>
3975 Paul Brook <paul@nowt.org>
3977 * intrinsics/random.c: New file.
3978 * Makefile.am (gfor_hemper_src): Add it.
3979 (gfor_specific_c): Fix typo.
3981 2003-09-19 Paul Brook <paul@nowt.org>
3983 * All: rename g95->gfc.
3985 2003-09-18 XiaoQiang Zhang <zhangapache@yahoo.com>
3987 * io/write.c (output_float): Fix bug of FMT_E, Add comments.
3989 2003-09-09 XiaoQiang Zhang <zhangapache@yahoo.com>
3991 * io/write.c (write_float): Dectection of positive infinite number,
3992 Not a Number(NaN) and negative infinite number.
3993 (ioutput_float): Bug fix for FMT_E and FMT_D processing to
3994 output a very_very small number ( < 0.1e-100 ).
3996 2003-09-07 XiaoQiang Zhang <zhangapache@yahoo.com>
3998 * libgfortran.h (xtoa, itoa): Parameter modified.
3999 * io/io.h (namelist_info): Declaration to support namelist I/O
4000 (st_parameter): Add namelist related component
4001 (ionml, empty_internal_buffer, st_set_nml_var_int,
4002 st_set_nml_var_float, st_set_nml_var_char, st_set_nml_var_complex,
4003 st_set_nml_var_log): Declaration
4004 (set_integer, set_integer): Parameter changed
4005 * io/format.c (free_nodes): Fix annoying bug of lefting "deallocated"
4007 (parse_format_list): Fix bug about FMT_SLASH
4008 * io/list_read.c (push_char): Totally clear old saved_string, zeroize
4009 newly allocated saved_string
4010 (next_char): Add detection of End_Of_Line support
4011 (convert_integer): Now can process 64 bits interger
4012 (read_real): Bug fixed
4013 (init_at_eol, find_nml_node, match_namelist_name): Add new functions
4014 (match_namelist_name): New implemention
4015 * io/lock.c (ionml): New global variable
4016 (library_end): Free memory in ionml
4017 * io/open.c (st_open): Variable initializtion
4018 * io/read.c (max_value): 64 bits interger support
4019 (convert_precsion_real): New procedure to replace "strtod" with more
4021 (read_f, read_radix): Input bug fix
4022 * io/transfer.c: (sf_seen_eor): New static variable
4023 (read_sf): Zeroize base buffer; fix bugs: single read statement can
4024 not get input in mutli line when read from stdin
4025 (formatted_transfer): Fix bug of FMT_O, FMT_B, FMT_Z for INTEGER type
4027 (data_transfer_init): Clear internal buffer for Internel File I/O.
4028 Internal File now worked. Detect some error condition for namelist.
4030 (next_record_w): Internal file and Namelist I/O support.
4031 (st_set_nml_var, st_set_nml_var_float, st_set_nml_var_char,
4032 st_set_nml_var_complex, st_set_nml_var_log): Implemention.
4033 * io/unit.c (implicit_unit): Deletion
4034 (get_unit): Now cannot open a unit implicitly.
4035 * io/unix.c (mmap_alloc): Fix fatal error in calculating the length of
4037 (mem_alloc_r_at): Internal file I/O support added
4038 (empty_internal_buffer): New function
4039 * io/write.c (extract_int): Support 64 bits interger processing
4040 (output_float): Varibale initialization
4041 (write_float): Infinite real number detection.
4042 (write_int): 64 bits integer I/O support
4043 (write_decimal): New function to output decimal number
4044 (otoa, btoa): Better implemention and 64 bits interger support
4045 (namelist_write): New function
4046 * runtime/error.c (itoa, xtoa): Better implemention and 64 bits
4049 2003-08-15 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4051 * libgfortran.h (os_error, runtime_error,internal_error, sys_exit,
4052 get_mem ): Add attribute.
4053 * intrinsics/spread_generic.c (__spread): Fix spelling.
4054 * io/inquire.c (inquire_via_filename): Add const.
4055 * io/io.h (sys_exit): Add attribute.
4056 * io/io.h (move_pos_offset): Add move_pos_offset.
4057 * io/io.h (compare_file_filename, inquire_sequential, inquire_direct,
4058 inquire_formatted, inquire_unformatted, inquire_read, inquire_write,
4059 inquire_readwrite, convert_real, write_a, write_b, write_d, write_e,
4060 write_en, write_es, write_f, write_i, write_l, write_o, write_x,
4061 write_z): Add const.
4062 * io/read.c (convert_real): Add const.
4063 * io/transfer.c (type_name): Add const.
4064 * io/unix.c (unpack_filename, compare_file_filename,inquire_sequential,
4065 inquire_direct, inquire_formatted, inquire_unformatted, inquire_access,
4066 inquire_read, inquire_write, inquire_readwrite): Add const.
4067 * io/write.c (output_float): Remove unused variable.
4068 * io/write.c (write_a, extract_int, extract_real, output_float,
4069 write_float, write_int, write_i, write_b, write_o, write_z, write_d,
4070 write_e, write_f, write_en, write_es, write_logical, write_integer,
4071 write_character, write_real, write_complex): Add const.
4072 * runtime/error.c (rtoa): Remove unused variable.
4073 * runtime/select.c (select_string): Add const.
4074 * runtime/stop.c (stop_string): Add const.
4076 2003-08-10 Paul Brook <paul@nowt.org>
4078 * Makefile.am (gfor_helper_src): Add intrinsics/abort.c.
4079 (FFLAGS): Add -fno-underscoring.
4080 * Makefile.in: Regenerate.
4081 * intrinsics/abort.c: New file.
4083 2003-08-10 Erik Schnetter <schnetter@uni-tuebingen.de>
4085 * fmain.c (main): Do not call init and cleanup; call set_args instead.
4086 * libgfortran.h (init, cleanup): Remove declarations.
4087 (set_args): Add declaration.
4088 * runtime/main.c (init, cleanup): Make them static, and give them
4089 the constructor and destructor attributes.
4090 (set_args): New function.
4092 2003-08-10 Paul Brook <paul@nowt.org>
4094 * intrinsics/strinf_intrinsics.c (compare_string): Return value based
4095 on which string is longest.
4097 2003-08-10 Paul Brook <paul@nowt.org>
4099 * Makefile.am (EXTRA_DIST): Remove old files.
4100 * Makefile.in: Regenerate.
4102 2003-07-26 Paul Brook <paul@nowt.org>
4104 Rename library to libgfortran.
4105 * libgfortran.h: Change prefix to _libgfortran_.
4107 2003-07-24 Paul Brook <paul@nowt.org>
4109 * configure.in: Don't pull in system libtool. Use toplevel
4112 2003-07-22 Paul Brook <paul@nowt.org>
4114 Regenerate all configury files.
4116 2003-07-09 Chun Huang <compiler@sohu.com>
4118 * intrinsics/string_intrinsic.c (string_scan): New function.
4119 (string_verify): New function.
4121 2003-06-25 Paul Brook <paul@nowt.org>
4123 * io/unix.c (mem_alloc_r_at, mem_alloc_w_at): Advance logical_offset.
4124 (mem_seek): Don't bother setting physical_offset.
4126 2003-06-20 Paul Brook <paul@nowt.org>
4128 * libgfor.h (stop_numeric): Declare.
4129 * runtime/pause.c: New file.
4130 * Makefile.am: Add it.
4132 2003-06-08 Paul Brook <paul@nowt.org>
4134 * m4/cexp.m4 (cabs): Use correct typed version.
4135 (csqrt): New function.
4137 2003-06-07 Canqun Yang <canqun@yahoo.com.cn>
4139 Spotted by Benjamin and Tobias:
4140 * io/list_read.c: Add Separator '\t'.
4141 (parse_real, read_real): Accept real values starting with an optional
4142 sign follows a decimal point.
4144 2003-06-06 Steven Bosscher <steven@gcc.gnu.org>
4146 * Makefile.am: Don't put cmath objects in subdir.
4147 * configure.in: Rename MATHOBJ to MATH_OBJ.
4149 2003-06-02 Kejia Zhao <Kejia_zh@yahoo.com.cn>
4151 * intrinsics/associated.c: New file.
4152 * Makefile.am: Add it. Regenerate Makefile.in.
4153 * libgfor.h: Define g95_array_void, G95_DESCRIPTOR_DATA, and
4154 G95_DESCRIPTOR_DTYPE.
4156 2003-06-01 Canqun Yang <canqun@yahoo.com.cn>
4158 * io/write.c (calcuate_exp): Rewrite it to avoid overflow.
4159 (calculate_G_format): Rewrite it to eliminate an infinte loop and set
4160 the scale_factor to 0 for F editing.
4162 2003-05-11 Tobias Schlter <innenminister@gmx.de>
4164 * libgfor.h: Only include stdint.h if it exists.
4166 2003-05-07 Paul Brook <paul@nowt.org>
4168 * libgfor.h: Use stdint.h types.
4169 * intrinsics/ishift.c: Ditto.
4170 * runtime/memory.c (malloc_t): Reorder fields for better alignment.
4172 2003-05-05 Steven Bosscher <steven@gcc.gnu.org>
4174 * libgfor.h (offsetof): Define if nobody else does.
4175 * runtime/memory.c (HEADER_SIZE): Use it.
4177 2003-05-01 Tobias Schlter <innenminister@gmx.de>
4179 * configure.in: Require autoconf 2.54.
4181 2003-04-28 Tobias Schlter <innenminister@gmx.de>
4182 Paul Brook <paul@nowt.org>
4184 * intrinsics/reshape_generic.c: Copy the whole element, not just the
4186 * m4/transpose.m4: New file.
4187 * Makefile.am: Add them.
4188 Regenerate generated files.
4190 2003-04-18 Steven Bosscher <steven@gcc.gnu.org>
4192 * io/format.c (parse_format_list): Allow 'X' without integer
4193 prefix. This is an extension. Interpretation is '1X'.
4195 2003-04-18 Tobias Schlter <Tobias.Schlueter@physik.uni-muenchen.de>
4197 * io/format.c (parse_format_list): Allow '0P'.
4199 2003-04-18 Steven Bosscher <steven@gcc.gnu.org>
4201 * Makefile.in: Re-regenerate for automake 1.7.3.
4203 2003-04-18 Canqun Yang <canqun@yahoo.com.cn>
4205 Port implementation for CHARACTER SELECT from Andy's tree.
4206 * runtime/select.c: New file
4207 * Makefile.am: Add it.
4208 * Makefile.in: Regenerate.
4210 2003-04-17 Xiaoqiang Zhang <zhangapache@yahoo.com>
4212 * io/transfer.c (formatted_transfer): Modified
4213 * io/unix.c (move_pos_offset): New Function.
4214 * io/format.c (parse_format_list): Modified.
4216 2003-04-15 Xiaoqiang Zhang <zhangapache@yahoo.com>
4218 * io/write.c (write_float,write_real): New implemention of
4219 FMT_G and default float editing.
4220 (calculate_exp,calculate_G_format,output_float): New Function.
4221 (write_float,write_real,write_logical): Modified
4222 * libgfor.h (default_rtoa): Remove Declaration.
4223 * runtime/error.c (default_rtoa): Remove Function.
4225 2003-04-15 Steven Bosscher <steven@gcc.gnu.org>
4228 * io/write.c (extract_real): Add missing break statement.
4230 2003-04-13 Steven Bosscher <steven@gcc.gnu.org>
4232 * cpu_time.c: Make sure we have a definition of HZ. Don't
4233 rely on CLOCKS_PER_SEC, it is always 1000000, on any system.
4235 2003-04-13 Steven Bosscher <steven@gcc.gnu.org>
4236 Paul Brook <paul@nowt.org>
4238 * configure.in: Check for process time headers and GETTIMEOFDAY.
4239 * makefile.am: Add intrinsics/cpu_time.c.
4240 * acinclude.m4: New file.
4241 * intrinsics/cpu_time.c: New file.
4242 * m4/dotprodl.m4: Fix typo.
4243 Regenerate generated files.
4245 2003-04-11 Xiaoqiang Zhang <zhangapache@yahoo.com>
4247 * io/write.c (extract_real): Ouput floating point value.
4248 (write_float): New Function.
4249 (write_e, write_f, write_en, write_es): Modified
4250 * io/transfer.c (formatted_transfer): Modified.
4251 * libgfor.h (default_rtoa): Declaration.
4252 (rtoa): Declaration.
4253 * runtime/error.c (default_rtoa): New Function.
4254 (rtoa): New Function.
4256 2003-04-05 Paul Brook <paul@nowt.org>
4258 * intrinsics/spread_generic.c: New file.
4259 * Makefile.am: Add it. Regenerate Makefile.in.
4261 2003-03-29 Paul Brook <paul@nowt.org>
4263 * intrinsics/pack_generic.c: New file.
4264 * intrinsics/unpack_generic.c: New file.
4265 * Makefile.am: Add them. Regenerate Makefile.in.
4267 2003-03-25 Paul Brook <paul@nowt.org>
4269 * intrinsics/eoshift0.c: New file.
4270 * intrinsics/eoshift2.c: New file.
4271 * m4/eoshift1.m4: New file.
4272 * m4/eoshift3.m4: New file.
4273 * Makefile.am: Add them.
4274 * in_unpack_generic.c: Initialize src.
4275 Regenerate generated files.
4277 2003-03-14 Paul Brook <paul@nowt.org>
4279 * m4/shape.m4: Work properly with array temporaries.
4280 * m4/in_pack.m4: Skip redundant checks for array temporaries.
4281 * runtime/in_pack_generic.c: Ditto.
4283 2003-03-12 Paul Brook <paul@nowt.org>
4285 * m4/shape.m4: Work properly with noncontiguous arrays.
4287 2003-03-08 Paul Brook <paul@nowt.org>
4289 * m4/in_pack.m4: Correctly handle zero sized and assumed size arrays.
4290 * runtime/in_pack_generic.c: Ditto.
4292 2003-02-08 Paul Brook <paul@nowt.org>
4294 * intrinsics/reshape_generic.c: Use runtime_error to report errors.
4295 * io/close.c (st_close): Return void.
4296 * io/open.c (st_open): Return void.
4297 * libgfor.h (g95_array_char): Declare.
4298 (internal_malloc_size): Ditto.
4299 (internal_pack*, internal_unpack*): Ditto.
4300 * m4/in_pack.m4: Allocate storage if neccessary. Fix logic for packed
4302 * m4/in_unpack.m4: Include file fixes.
4303 * m4/reshape.m4: Increment the correct source pointer.
4304 * Makefile.am (maxloc): Fix typo.
4305 * runtime/in_pack_generic.c: Call optimized functions. Allocate
4306 storage if neccessary. Fix logic for packed arrays.
4307 * runtime/in_unpack_generic.c: Call optimized functions.
4308 * runtime/main.c: Use runtime_error to report errors.
4309 * memory.c (internal_malloc_size): Make non-static.
4311 2003-02-02 Arnaud Desitter <arnaud.desitter@geography.oxford.ac.uk>
4313 * reshape_packed.c, lock.c: Add #include <string.h>.
4314 * libgfor.h, format.c, inquire.c, io.h, transfer.c, unix.c,
4315 environ.c, error.c, memory.c, string.c: Add const.
4316 * error.c (show_locus): Add void.
4318 2003-02-21 Paul Brook <paul@nowt.org>
4320 * m4/in_pack.m4: Avoid returning const * parameter.
4321 * Makefile.am: Only regenerate files in maintainer mode.
4323 2003-02-20 Paul Brook <paul@nowt.org>
4325 Add array repacking support functions.
4326 * m4/in_pack.m4, m4/in_unpack.m4: New files.
4327 * runtime/in_pack_generic.c, runtime/in_unpack_generic.c: New files.
4328 * Makefile.am: Build them. Regenerate configury files.
4329 * generated/: New directory for generated files (need to move
4330 everything else there).
4332 2003-02-07 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
4334 * m4/cexp.m4: Fix typo.
4336 2003-01-26 Paul Brook <paul@nowt.org>
4338 * intrinsics/: Add missing generated files.
4340 2003-01-26 Paul Brook <paul@nowt.org>
4342 * Makefile.am: Put -I before the filename.
4344 2003-01-24 Paul Brook <paul@nowt.org>
4346 * configure.in: Add AM_MAINTAINER_MODE.
4348 2003-01-23 Paul Brook <paul@nowt.org>
4350 * configure.in, Makefile.am: Modify to work with unmodified autoconf
4352 Also regenerate other configury files.
4354 2003-01-21 Paul Brook <paul@nowt.org>
4356 * io/read.c: Don't use stdint.h, it doesn't exist on cygwin.
4358 2003-01-20 Steven Bosscher <s.bosscher@student.tudelft.nl>
4360 * io/read.c (read_f): Don't use alloca, but safe get_mem instead.
4361 Don't include "alloca.h".
4363 2003-01-20 Steven Bosscher <s.bosscher@student.tudelft.nl>
4365 * intrinsics/string.c: Rename to intrinsics/string_intrinsics.c.
4366 * Makefile.am: Adjust file name.
4367 * Makefile.in: Regenerate.
4368 * gfortypes.h: Kill, include everything in...
4369 * libgfor.h: ...here. Include config.h
4370 * fmain.c, intrinsics/ishftc.c, intrinsic/reshape_generic.c,
4371 intrinsics/reshape_i4.c, intrinsics/reshape_i8.c,
4372 intrinsics/reshape_packed.c, intrinsics/size.c,
4373 m4/reshape.m4, runtime/main.c, runtime/memory.c: Use macro
4374 for prefix for all functions instead of hardcoded.
4376 2003-01-19 Steven Bosscher <s.bosscher@student.tudelft.nl>
4378 * io/lock.c (library_end): Propagate library return
4381 2003-01-19 Steven Bosscher <s.bosscher@student.tudelft.nl>
4383 Port fixes from Andy's tree:
4384 * io/read.c (read_decimal): Reverse sense of overflow
4385 comparison during integer reads.
4386 * io/format.c (revert): Fix comment.
4387 (next_format): Fix format revision.
4388 * io/unix.c: Fix and simplify mmap version of stream
4391 2003-01-11 Paul Brook <paul@nowt.org>
4393 * configure, Makefile.in: Regenerate.
4395 2003-01-11 Paul Brook <paul@nowt.org>
4397 * runtime/stop.c: Rewrite.
4399 2003-01-08 Paul Brook <paul@nowt.org>
4401 * configure, Makefile.in: Regenerate.
4403 2003-01-05 Paul Brook <paul@nowt.org>
4405 * (*.m4) Move to m4/.
4406 * intrinsics/string.c (_gfor_string_index): New Function.
4408 2002-12-29 Paul Brook <paul@nowt.org>
4410 * intrinsics/reshape.*: New files.
4411 * gcc_config.patch: Update to new GCC configure system.
4413 2002-10-10 Paul Brook <paul@nowt.org>
4415 * intrinsics/size.c: New file.
4416 * intrinsics/shape.m4: New file.
4417 * Makefile.am: Add above files.
4419 2002-10-02 Paul Brook <paul@nowt.org>
4421 * fmain.c (main): Move here.
4422 * libgfor.c: From here.
4423 * libgfor.h (gfor_init, gfor_runtime_cleanup): Declare.
4424 * Makefile.am: Build libgforbegin.
4425 * gcc_config.patch: Remove stray -march=athlon.
4426 * dotprodl.m4: Fix use of L8_TO_L4 macro.
4427 * ifunction.m4: Move variable declarations to allow compilation with
4429 * specific.m4, specific4.m4: Fix typo typecode->type_code.
4430 * README: Document use of patch -p1.
4432 2002-09-12 Paul Brook <paul@nowt.org>
4434 * math/*: Add complex math library functions.
4435 * intrinsics/specific(2).m4: Generate Specific intrinsic functions.
4436 * Makefile.am: Add details for above.
4437 * configure.in: Use AC_PROG_F95. Test for the presence of csin.
4439 2002-09-09 Paul Brook <paul@nowt.org>
4441 * libgfor.c (determine_endianness): Use an array rather than a struct.
4442 * intrinsics/dotprod*, matmul*: Implement DOT_PRODUCT and MATMUL.
4444 2002-09-09 Steven Bosscher <s.bosscher@student.tudelft.nl>
4446 * libgfor.c: Add fatal signal handler.
4447 Romove superfluous abort() calls.
4449 2002-09-07 Paul Brook <paul@nowt.org>
4451 * Makefile.am, intrinsics: Major rewrite.
4453 2002-09-02 Paul Brook <paul@nowt.org>
4455 * Makefile.am: Added -I$(srcdir) to m4 rule.
4457 2002-08-30 Paul Brook <paul@nowt.org>
4459 * io/*: Integrated libgforio.
4460 * Makefile.am, configure.in: Make compatable with GCC. Build code for
4461 intrinsics in the intrisics directory.
4462 * intrinsics/intrinsics.m4: Move here. Strip directories from the
4463 filename. Add 'and' and 'all' intrinsics.
4465 2002-08-17 Paul Brook <paul@nowt.org>
4467 * ALL: First release as more than just a single file