OSDN Git Service

PR 19155 Check for strtod failure via endptr
[pf3gnuchains/gcc-fork.git] / libgfortran / ChangeLog-2005
1 2005-12-31  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2
3         PR libfortran/25594
4         PR libfortran/25419
5         * io/list_read.c (list_formatted_read_scalar): Test for comma to return
6         a null value (default). Revert patch of 25419 on 2005-12-28.  
7
8 2005-12-28  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
9
10         PR libfortran/25139
11         * io/unix.c (fd_truncate): Set s->active to zero.
12         PR libfortran/25510
13         * libgfortran.h: Add ERROR_INTERNAL and ERROR_INTERNAL_UNIT.
14         * runtime/error.c (translate_error): Add messages for new errors.
15         * io/list_read.c (next_char): Use new errors.
16         * io/transfer.c (next_record_r) (next_record_w): Use new errors.
17
18 2005-12-28  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
19
20         PR libfortran/25550
21         * io/file_pos.c (st_rewind): Reset bytes left so no error occurs in
22         next_record_r.
23
24 2005-12-28  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
25
26         PR libfortran/25419
27         * io/list_read.c (list_formatted_read_scalar): Allow comma to return a
28         null value (default).
29
30 2005-12-21  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
31
32         PR libfortran/25307
33         * io/list_read.c (next_char): Handle end-of-file conditions for
34         internal units and add support for internal character array units.
35
36 2005-12-18  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
37
38         PR libfortran/25463
39         * io/transfer.c (finalize_transfer): Fix execution order so that
40         next_record is set to zero in all cases.
41
42 2005-12-16  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
43
44         PR libfortran/25264
45         PR libfortran/25349
46         * io/unit.c (get_unit): Delete code that cleared the string when the
47         unit was opened, which is too soon.
48         * io/transfer.c (next_record_w): Pass done flag in.  Change logic for
49         setting max_pos.  Add code to position unit and pad record as needed.
50
51 2005-12-13  Richard Sandiford  <richard@codesourcery.com>
52             Victor Leikehman  <LEI@il.ibm.com>
53
54         * m4/matmul.m4: Use a different order in the special case of a
55         transposed first argument.
56         * generated/matmul_c4.c, generated/matmul_c8.c, generated/matmul_c10.c,
57         * generated/matmul_c16.c, generated/matmul_i4.c, generated/matmul_i8.c,
58         * generated/matmul_i10.c, generated/matmul_r4.c, generated/matmul_r8.c
59         * generated/matmul_r10.c, generated/matmul_r16.c: Regenerated.
60
61 2005-12-10  Janne Blomqvist  <jb@gcc.gnu.org>
62
63         * Makefile.am: Enable loop unrolling for matmul.
64         * configure: Regenerated.
65         * Makefile.in: Regenerated.
66         * aclocal.m4: Regenerated.
67
68 2005-12-10  Thomas Koenig  <Thomas.Koenig@online.de>
69
70         PR fortran/23815
71         * io/file_pos.c (unformatted_backspace):  If flags.convert
72         does not equal CONVERT_NATIVE, reverse the record marker.
73         * io/open.c:  Add convert_opt[].
74         (st_open):  If no convert option is given, set CONVERT_NATIVE.
75         If CONVERT_BIG or CONVERT_LITTLE are given, set flags.convert to
76         CONVERT_NATIVE or CONVERT_SWAP (depending on wether we have
77         a big- or little-endian system).
78         * io/transfer.c (unformatted_read):  Remove unused attribute
79         from arguments.
80         If we need to reverse
81         bytes, break up large transfers into a loop.  Split complex
82         numbers into its two parts.
83         (unformatted_write):  Likewise.
84         (us_read):  If flags.convert does not equal CONVERT_NATIVE,
85         reverse the record marker.
86         (next_record_w): Likewise.
87         (reverse_memcpy):  New function.
88         * io/inquire.c (inquire_via_unit):  Implement convert.
89         * io/io.h (top level):  Add enum unit_convert.
90         Add convert to st_parameter_open and st_parameter_inquire.
91         Define IOPARM_OPEN_HAS_CONVERT and IOPARM_INQUIRE_HAS_CONVERT.
92         Increase padding for st_parameter_dt.
93         Declare reverse_memcpy().
94
95 2005-12-09  Jakub Jelinek  <jakub@redhat.com>
96
97         PR libfortran/24991
98         * acinclude.m4: Include acx.m4 and no-executables.m4.
99         * configure.ac: Add GCC_TOPLEVEL_SUBDIRS.
100         * configure: Rebuilt.
101         * Makefile.am (AM_CPPFLAGS): Use $(host_subdir) in build dir
102         path.
103         * Makefile.in: Rebuilt.
104
105 2005-12-08  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
106
107         PR libfortran/25039
108         * io/io.h: Create a new flag sf_read_comma to control comma
109         separators in numeric reads.
110         * io/transfer.c (formatted_transfer_scalar): Initialize the flag.
111         (read_sf): Check for commas coming in and if the flag is set,
112         shortcut the read.
113         * io/read.c (read_a) (read_x): Clear the flag for character reads and
114         reset it after the reads.
115
116 2005-12-04  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
117
118         * io/format.c: Removing unused code.
119         * intrinsics/random.c: Likewise.
120
121 2005-12-02  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
122
123         PR libfortran/25116
124         * io/transfer.c (data_transfer_init): Don't set the default for
125         namelist I/O on preconnected files to UNFORMATTED.
126
127 2005-11-30  Eric Botcazou  <ebotcazou@libertysurf.fr>
128
129         * libgfortran.h (ILP32 typedefs): Define _UINT8_T, _UINT32_T and
130         _UINT64_T on Solaris.
131
132 2005-11-28  Steven G. Kargl  <kargls@comcast.net>
133
134         PR libfortran/25149
135         * intrinsics/abort.c: Add external abort_ to allow linking when 
136         invoking -std=f95 in testsuite.
137
138 2005-11-28  Jakub Jelinek  <jakub@redhat.com>
139
140         PR libfortran/24991
141         * acinclude.m4 (LIBGFOR_CHECK_PRAGMA_WEAK): Rename to...
142         (LIBGFOR_GTHREAD_WEAK): ... this.  Define SUPPORTS_WEAK rather
143         than HAVE_PRAGMA_WEAK.  Define GTHREAD_USE_WEAK to 0 on hosts
144         that shouldn't use weak in gthr.h.
145         * configure.ac: Use LIBGFOR_GTHREAD_WEAK instead of
146         LIBGFOR_CHECK_PRAGMA_WEAK.
147         * config.h.in: Regenerated.
148         * configure: Regenerated.
149         * io/io.h (SUPPORTS_WEAK): Don't define here.
150
151         * intrinsics/ftell.c (ftell, FTELL_SUB): Add unlock_unit call.
152         * intrinsics/fget.c (fgetc, fputs): Likewise.
153         * intrinsics/tty.c (ttynam): Likewise.
154
155 2005-11-27  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
156
157         PR libfortran/25109
158         * io/unit.c (init_units): Set default flag to BLANK_NULL per
159         requirement of F95 standard.  Set PAD_YES for stdin.
160
161 2005-11-27  David Edelsohn  <edelsohn@gnu.org>
162
163         * intrinsics/random.c: Include config.h
164         * io/size_from_kind.c: Include config.h and libgfortran.h
165         * io/io.h: Revert 2005-11-21 change.
166
167 2005-11-27  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
168
169         * io/write.c (namelist_write): Correct type in previous
170         commit.
171
172 2005-11-27  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
173
174         PR libfortran/24919
175         * io/list_read.c (eat_separator, finish_separator,
176         read_character): Handle CRLF separators correctly during reads.
177         (nml_query): Use the HAVE_CRLF macro to print adequate newlines.
178         * io/io.h (st_parameter_dt): Add comment about the possible
179         values for sf_seen_eor.
180         * io/unix.c (tempfile, regular_file): HAVE_CRLF doesn't imply
181         that O_BINARY is defined, so we add that condition.
182         (stream_at_bof): Fix typo in comment.
183         * io/transfer.c (read_sf): Handle correctly CRLF, setting
184         sf_seen_eor value to 2 instead of 1.
185         (formatted_transfer_scalar): Use the sf_seen_eor value to
186         handle CRLF the right way.
187         * io/write.c (nml_write_obj, namelist_write): Use CRLF as newline
188         when HAVE_CRLF is defined.
189
190 2005-11-27  Janne Blomqvist  <jb@gcc.gnu.org>
191
192         * m4/ifunction.m4: Add const restrict to function arguments.
193         * m4/iforeach.m4: Likewise.
194         * m4/eoshift1.m4: Likewise.
195         * m4/eoshift3.m4: Likewise.
196         * m4/dotprod.m4: Likewise.
197         * m4/dotprodc.m4: Likewise.
198         * m4/dotprodl.m4: Likewise.
199         * m4/shape.m4: Likewise.
200         * m4/cshift1.m4: Likewise.
201         * m4/reshape.m4: Likewise.
202         * m4/transpose.m4: Likewise.
203         * generated/eoshift*: Regenerated
204         * generated/dotprod*: Likewise.
205         * generated/shape*: Likewise.
206         * generated/cshift1*: Likewise.
207         * generated/reshape*: Likewise.
208         * generated/transpose*: Likewise.
209
210 2005-11-26  Richard Henderson  <rth@redhat.com>
211
212         * io/list_read.c (nml_parse_qualifier): Use ssize_t instead of int
213         in dtp->u.p.value.
214
215 2005-11-26  Janne Blomqvist  <jb@gcc.gnu.org>
216
217         PR libfortran/24945
218         * io/open.c (edit_modes): Check for STATUS_UNKNOWN flag.
219         
220 2005-11-25  Richard Henderson  <rth@redhat.com>
221
222         * io/list_read.c (nml_parse_qualifier): Use memcpy to extract
223         values from dtp->u.p.value.
224         * io/io.h (struct st_parameter_dt): Change reversion_flag, first_item,
225         seen_dollar, sf_seen_eor, eor_condition, no_leading_blank, char_flag,
226         input_complete, at_eol, comma_flag, namelist_mode, nml_read_error to
227         single-bit fields.  Move value to where it'll be at least pointer
228         aligned.
229
230 2005-11-23  Alan Modra  <amodra@bigpond.net.au>
231
232         * io/open.c (new_unit): Use the right unit number when checking
233         for stdin, stdout, stderr.
234
235 2005-11-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
236
237         PR libfortran/24794
238         * io/list_read.c (read_character): Add auto completion on short
239         namelist reads.
240
241 2005-11-21  David Edelsohn  <edelsohn@gnu.org>
242
243         * io/io.h (_LARGE_FILES): Undefine for AIX.
244         (_LARGE_FILE_API): Define for AIX.
245
246 2005-11-21  Jakub Jelinek  <jakub@redhat.com>
247
248         PR fortran/24774
249         PR fortran/14943
250         PR fortran/21647
251         * Makefile.am (AM_CPPFLAGS): Add gcc directories as -I paths,
252         add -D_GNU_SOURCE.
253         * Makefile.in: Regenerated.
254         * acinclude.m4 (LIBGFOR_CHECK_SYNC_FETCH_AND_ADD,
255         LIBGFOR_CHECK_GTHR_DEFAULT, LIBGFOR_CHECK_PRAGMA_WEAK): New macros.
256         * configure.ac: Add them.
257         * configure: Rebuilt.
258         * config.h.in: Rebuilt.
259         * libtool-version: Bump libgfortran.so SONAME to libgfortran.so.1.
260         * libgfortran.h (library_start, show_locus, internal_error,
261         generate_error, find_option): Add st_parameter_common * argument.
262         (library_end): Change into a dummy macro.
263         * io/io.h: Include gthr.h.
264         (SUPPORTS_WEAK): Define if HAVE_PRAGMA_WEAK.
265         (CHARACTER): Remove define.
266         (st_parameter, global_t): Remove typedef.
267         (ioparm, g, ionml, current_unit): Remove variables.
268         (init_error_stream): Remove prototype.
269         (CHARACTER1, CHARACTER2): Define.
270         (st_parameter_common, st_parameter_open, st_parameter_close,
271         st_parameter_filepos, st_parameter_inquire, st_parameter_dt): New
272         typedefs.
273         (IOPARM_LIBRETURN_MASK, IOPARM_LIBRETURN_OK, IOPARM_LIBRETURN_ERROR,
274         IOPARM_LIBRETURN_END, IOPARM_LIBRETURN_EOR, IOPARM_ERR, IOPARM_END,
275         IOPARM_EOR, IOPARM_HAS_IOSTAT, IOPARM_HAS_IOMSG, IOPARM_COMMON_MASK,
276         IOPARM_OPEN_HAS_RECL_IN, IOPARM_OPEN_HAS_FILE, IOPARM_OPEN_HAS_STATUS,
277         IOPARM_OPEN_HAS_ACCESS, IOPARM_OPEN_HAS_FORM, IOPARM_OPEN_HAS_BLANK,
278         IOPARM_OPEN_HAS_POSITION, IOPARM_OPEN_HAS_ACTION,
279         IOPARM_OPEN_HAS_DELIM, IOPARM_OPEN_HAS_PAD, IOPARM_CLOSE_HAS_STATUS,
280         IOPARM_INQUIRE_HAS_EXIST, IOPARM_INQUIRE_HAS_OPENED,
281         IOPARM_INQUIRE_HAS_NUMBER, IOPARM_INQUIRE_HAS_NAMED,
282         IOPARM_INQUIRE_HAS_NEXTREC, IOPARM_INQUIRE_HAS_RECL_OUT,
283         IOPARM_INQUIRE_HAS_FILE, IOPARM_INQUIRE_HAS_ACCESS,
284         IOPARM_INQUIRE_HAS_FORM, IOPARM_INQUIRE_HAS_BLANK,
285         IOPARM_INQUIRE_HAS_POSITION, IOPARM_INQUIRE_HAS_ACTION,
286         IOPARM_INQUIRE_HAS_DELIM, IOPARM_INQUIRE_HAS_PAD,
287         IOPARM_INQUIRE_HAS_NAME, IOPARM_INQUIRE_HAS_SEQUENTIAL,
288         IOPARM_INQUIRE_HAS_DIRECT, IOPARM_INQUIRE_HAS_FORMATTED,
289         IOPARM_INQUIRE_HAS_UNFORMATTED, IOPARM_INQUIRE_HAS_READ,
290         IOPARM_INQUIRE_HAS_WRITE, IOPARM_INQUIRE_HAS_READWRITE,
291         IOPARM_DT_LIST_FORMAT, IOPARM_DT_NAMELIST_READ_MODE,
292         IOPARM_DT_HAS_REC, IOPARM_DT_HAS_SIZE, IOPARM_DT_HAS_IOLENGTH,
293         IOPARM_DT_HAS_FORMAT, IOPARM_DT_HAS_ADVANCE,
294         IOPARM_DT_HAS_INTERNAL_UNIT, IOPARM_DT_HAS_NAMELIST_NAME,
295         IOPARM_DT_IONML_SET): Define.
296         (gfc_unit): Add lock, waiting and close fields.  Change file
297         from flexible array member into pointer to char.
298         (open_external): Add st_parameter_open * argument.
299         (find_file, file_exists): Add file and file_len arguments.
300         (flush_all_units): New prototype.
301         (max_offset, unit_root, unit_lock): New variable.
302         (is_internal_unit, is_array_io, next_array_record,
303         parse_format, next_format, unget_format, format_error,
304         read_block, write_block, next_record, convert_real,
305         read_a, read_f, read_l, read_x, read_radix, read_decimal,
306         list_formatted_read, finish_list_read, namelist_read,
307         namelist_write, write_a, write_b, write_d, write_e, write_en,
308         write_es, write_f, write_i, write_l, write_o, write_x, write_z,
309         list_formatted_write, get_unit): Add st_parameter_dt * argument.
310         (insert_unit): Remove prototype.
311         (find_or_create_unit, unlock_unit): New prototype.
312         (new_unit): Return gfc_unit *.  Add st_parameter_open *
313         and gfc_unit * arguments.
314         (free_fnodes): Remove prototype.
315         (free_format_data): New prototype.
316         (scratch): Remove.
317         (init_at_eol): Remove prototype.
318         (free_ionml): New prototype.
319         (inc_waiting_locked, predec_waiting_locked, dec_waiting_unlocked):
320         New inline functions.
321         * io/unit.c (max_offset, unit_root, unit_lock): New variables.
322         (insert): Adjust os_error caller.
323         (insert_unit): Made static.  Allocate memory here, initialize
324         lock and after inserting it return it, locked.
325         (delete_unit): Adjust for deletion of g.
326         (find_unit_1): New function.
327         (find_unit): Use it.
328         (find_or_create_unit): New function.
329         (get_unit): Add dtp argument, change meaning of the int argument
330         as creation request flag.  Adjust for different st_* calling
331         conventions, lock internal unit's lock before returning it
332         and removal of g.  Call find_unit_1 instead of find_unit.
333         (is_internal_unit, is_array_io): Add dtp argument, adjust for
334         removal of most of global variables.
335         (init_units): Initialize unit_lock.  Adjust insert_unit callers
336         and adjust for g removal.
337         (close_unit_1): New function.
338         (close_unit): Use it.
339         (unlock_unit): New function.
340         (close_units): Lock unit_lock, use close_unit_1 rather than
341         close_unit.
342         * io/close.c (st_close): Add clp argument.  Adjust for new
343         st_* calling conventions and internal function API changes.
344         * io/file_pos.c (st_backspace, st_endfile, st_rewind, st_flush):
345         Add fpp argument.  Adjust for new st_* calling conventions and
346         internal function API changes.
347         (formatted_backspace, unformatted_backspace): Likewise.  Add
348         u argument.
349         * io/open.c (edit_modes, st_open): Add opp argument.  Adjust for
350         new st_* calling conventions and internal function API changes.
351         (already_open): Likewise.  If not HAVE_UNLINK_OPEN_FILE, unlink
352         scratch file.  Instead of calling close_unit just call sclose,
353         free u->file if any and clear a few u fields before calling
354         new_unit.
355         (new_unit): Return gfc_unit *.  Add opp and u arguments.
356         Adjust for new st_* calling conventions and internal function
357         API changes.  Don't allocate unit here, rather than work with
358         already created unit u already locked on entry.  In case
359         of failure, close_unit it.
360         * io/unix.c: Include unix.h.
361         (BUFFER_SIZE, unix_stream): Moved to unix.h.
362         (unit_to_fd): Add unlock_unit call.
363         (tempfile): Add opp argument, use its fields rather than ioparm.
364         (regular_file): Likewise.
365         (open_external): Likewise.  Only unlink file if fd >= 0.
366         (init_error_stream): Add error argument, set structure it points
367         to rather than filling static variable and returning its address.
368         (FIND_FILE0_DECL, FIND_FILE0_ARGS): Define.
369         (find_file0): Use them.  Don't crash if u->s == NULL.
370         (find_file): Add file and file_len arguments, use them instead
371         of ioparm.  Add locking.  Pass either an array of 2 struct stat
372         or file and file_len pair to find_file0.
373         (flush_all_units_1, flush_all_units): New functions.
374         (file_exists): Add file and file_len arguments, use them instead
375         of ioparm.
376         * io/unix.h: New file.
377         * io/lock.c (ioparm, g, ionml): Remove variables.
378         (library_start): Add cmp argument, adjust for new st_* calling
379         conventions.
380         (library_end): Remove.
381         (free_ionml): New function.
382         * io/inquire.c (inquire_via_unit, inquire_via_filename,
383         st_inquire): Add iqp argument, adjust for new st_* calling
384         conventions and internal function API changes.
385         * io/format.c (FARRAY_SIZE): Decrease to 64.
386         (fnode_array, format_data): New typedefs.
387         (avail, array, format_string, string, error, saved_token, value,
388         format_string_len, reversion_ok, saved_format): Remove variables.
389         (colon_node): Add const.
390         (free_fnode, free_fnodes): Remove.
391         (free_format_data): New function.
392         (next_char, unget_char, get_fnode, format_lex, parse_format_list,
393         format_error, parse_format, revert, unget_format, next_test): Add
394         fmt or dtp arguments, pass it all around, adjust for internal
395         function API changes and adjust for removal of global variables.
396         (next_format): Likewise.  Constify return type.
397         (next_format0): Constify return type.
398         * io/transfer.c (current_unit, sf_seen_eor, eor_condition, max_pos,
399         skips, pending_spaces, scratch, line_buffer, advance_status,
400         transfer): Remove variables.
401         (transfer_integer, transfer_real, transfer_logical,
402         transfer_character, transfer_complex, transfer_array, current_mode,
403         read_sf, read_block, read_block_direct, write_block,
404         write_block_direct, unformatted_read, unformatted_write,
405         type_name, write_constant_string, require_type,
406         formatted_transfer_scalar, us_read, us_write, pre_position,
407         data_transfer_init, next_record_r, next_record_w, next_record,
408         finalize_transfer, iolength_transfer, iolength_transfer_init,
409         st_iolength, st_iolength_done, st_read, st_read_done, st_write,
410         st_write_done, st_set_nml_var, st_set_nml_var_dim,
411         next_array_record): Add dtp argument, pass it all around, adjust for
412         internal function API changes and removal of global variables.
413         * io/list_read.c (repeat_count, saved_length, saved_used,
414         input_complete, at_eol, comma_flag, last_char, saved_string,
415         saved_type, namelist_mode, nml_read_error, value, parse_err_msg,
416         nml_err_msg, prev_nl): Remove variables.
417         (push_char, free_saved, next_char, unget_char, eat_spaces,
418         eat_separator, finish_separator, nml_bad_return, convert_integer,
419         parse_repeat, read_logical, read_integer, read_character,
420         parse_real, read_complex, read_real, check_type,
421         list_formatted_read_scalar, list_formatted_read, finish_list_read,
422         find_nml_node, nml_untouch_nodes, nml_match_name, nml_query,
423         namelist_read): Add dtp argument, pass it all around, adjust for
424         internal function API changes and removal of global variables.
425         (nml_parse_qualifier): Likewise.  Add parse_err_msg argument.
426         (nml_read_obj): Likewise.  Add pprev_nl, nml_err_msg, clow and
427         chigh arguments.
428         (nml_get_obj_data): Likewise.  Add pprev_nl and nml_err_msg
429         arguments.
430         (init_at_eol): Removed.
431         * io/read.c (convert_real, read_l, read_a, next_char, read_decimal,
432         read_radix, read_f, read_x): Add dtp argument, pass it all around,
433         adjust for internal function API changes and removal of global
434         variables.
435         (set_integer): Adjust internal_error caller.
436         * io/write.c (no_leading_blank, nml_delim): Remove variables.
437         (write_a, calculate_sign, calculate_G_format, output_float,
438         write_l, write_float, write_int, write_decimal, write_i, write_b,
439         write_o, write_z, write_d, write_e, write_f, write_en, write_es,
440         write_x, write_char, write_logical, write_integer, write_character,
441         write_real, write_complex, write_separator,
442         list_formatted_write_scalar, list_formatted_write, nml_write_obj,
443         namelist_write): Add dtp argument, pass it all around, adjust for
444         internal function API changes and removal of global variables.
445         (extract_int, extract_uint, extract_real): Adjust internal_error
446         callers.
447         * runtime/fpu.c (_GNU_SOURCE): Don't define here.
448         * runtime/error.c: Include ../io/unix.h.
449         (filename, line): Remove variables.
450         (st_printf): Pass address of a local variable to init_error_stream.
451         (show_locus): Add cmp argument.  Use fields it points to rather than
452         filename and line variables.
453         (os_error, runtime_error): Remove show_locus calls.
454         (internal_error): Add cmp argument.  Pass it down to show_locus.
455         (generate_error): Likewise.  Use flags bitmask instead of non-NULL
456         check for iostat and iomsg parameter presence, adjust for st_*
457         calling convention changes.
458         * runtime/stop.c (stop_numeric, stop_string): Remove show_locus
459         calls.
460         * runtime/pause.c (pause_numeric, pause_string): Likewise.
461         * runtime/string.c: Include ../io/io.h.
462         (find_option): Add cmp argument.  Pass it down to generate_error.
463         * intrinsics/flush.c (recursive_flush): Remove.
464         (flush_i4, flush_i8): Use flush_all_units.  Add unlock_unit
465         call.
466         * intrinsics/rand.c: Include ../io/io.h.
467         (rand_seed_lock): New variable.
468         (srand, irand): Add locking.
469         (init): New constructor function.
470         * intrinsics/random.c: Include ../io/io.h.
471         (random_lock): New variable.
472         (random_r4, random_r8, arandom_r4, arandom_r8): Add locking.
473         (random_seed): Likewise.  open failed if fd < 0.  Set i correctly.
474         (init): New constructor function.
475         * intrinsics/system_clock.c (tp0, t0): Remove.
476         (system_clock_4, system_clock_8): Don't subtract tp0/t0 from current
477         time, use just integer arithmetics.
478         * intrinsics/tty.c (isatty_l4, isatty_l8, ttynam_sub): Add
479         unlock_unit calls.
480
481 2005-11-20  Richard Henderson  <rth@redhat.com>
482
483         * Makefile.am: Revert 2005-11-14 change.  Enable -free-vectorize
484         via gmake per-target variables.
485         * Makefile.in, aclocal.m4: Regenerate.
486
487 2005-11-18  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
488
489         * configure.ac: Add "-I ." to the AM_FCFLAGS.
490         * configure: Regenerate.
491
492 2005-11-18  Hans-Peter Nilsson  <hp@axis.com>
493
494         * config/fpu-glibc.h (set_fpu): Only call fedisableexcept for
495         nonzero FE_ALL_EXCEPT.
496
497 2005-11-17  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
498
499         PR fortran/24892
500         * io/io.h (unit_access): Add ACCESS_APPEND.
501         * io/open.c (access_opt): Add APPEND value for ACCESS keyword.
502         (st_open): Use that new value to set the POSITION accordingly.
503
504 2005-11-14  Janne Blomqvist  <jb@gcc.gnu.org>
505
506         PR fortran/21468
507         * Makefile.am: Add -ftree-vectorize for compiling matmul.
508         * m4/matmul.m4: Add const and restrict to type declarations as
509         appropriate.
510         * m4/matmull.m4: Likewise.
511         * Makefile.in: Regenerated.
512         * generated/matmul_*.c: Likewise.
513         
514 2005-11-13  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
515
516         * intrinsics/fget.c: New file.
517         * intrinsics/ftell.c: New file.
518         * io/unix.c (stream_offset): New function.
519         * io/io.h: Add prototype for stream_offset.
520         * Makefile.am: Add intrinsics/fget.c and intrinsics/ftell.c.
521         * Makefile.in: Regenerate.
522
523 2005-11-12  Steven G. Kargl  <kargls@comcast.net>
524
525         PR libfortran/24787
526         *  intrinsics/string_intrinsics.c (string_scan): Off by one; Fix typos
527         in nearby comment.
528
529 2005-11-10  Andreas Jaeger  <aj@suse.de>
530
531         * libgfortran.h: Add proper defines where needed.
532
533 2005-11-10  Andreas Jaeger  <aj@suse.de>
534
535         * libgfortran.h: Add missing prototypes for internal_pack
536         functions.
537
538 2005-11-06  Janne Blomqvist <jb@gcc.gnu.org>
539
540         PR fortran/24174
541         PR fortran/24305
542         * io/io.h: Add argument to prototypes, add prototypes for
543         size_from_*_kind functions.
544         * io/list_read.c (read_complex): Add size argument, use
545         it.
546         (list_formatted_read): Add size argument, cleanup.
547         (list_formatted_read_scalar): Add size argument.
548         (nml_read_obj): Fix for padding.
549         * io/transfer.c: Add argument to transfer function pointer.
550         (unformatted_read): Add size argument.
551         (unformatted_write): Likewise.
552         (formatted_transfer_scalar): Fix for padding with complex(10).
553         (formatted_transfer): Add size argument, cleanup.
554         (transfer_integer): Add size argument to transfer call.
555         (transfer_real): Likewise.
556         (transfer_logical): Likewise.
557         (transfer_character): Likewise.
558         (transfer_complex): Likewise.
559         (transfer_array): New kind argument, use it.
560         (data_transfer_init): Add size argument to formatted_transfer
561         call.
562         (iolength_transfer): Add size argument, cleanup.
563         * io/write.c (write_complex): Add size argument, fix for padding
564         with complex(10).
565         (list_formatted_write): Add size argument, cleanup.
566         (list_formatted_write_scalar): Add size argument, use it.
567         (nml_write_obj): Fix for size vs. kind issue.
568         * io/size_from_kind.c: New file.
569         * Makefile.am: Add io/size_from_kind.c.
570         * configure: Regenerate.
571         * Makefile.in: Regenerate.
572
573 2005-11-06  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
574
575         * intrinsics/ctime.c: New file.
576         * configure.ac: Add check for ctime.
577         * Makefile.am: Add ctime.c
578         * configure: Regenerate.
579         * config.h.in: Regenerate.
580         * Makefile.in: Regenerate.
581
582 2005-11-05  Richard Guenther  <rguenther@suse.de>
583
584         * configure.ac: Use AM_FCFLAGS for extra flags, not FCFLAGS.
585         * configure: Regenerate.
586
587 2005-11-05  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
588
589         * intrinsics/tty.c (ttynam): New function.
590
591 2005-11-04  Steven G. Kargl <kargls@comcast.net>
592
593         PR fortran/24636
594         * runtime/stop.c (stop_numeric): Use stop_code = -1.
595
596 2005-11-04  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
597
598         PR libfortran/22298
599         * runtime/main.c (stupid_function_name_for_static_linking): New
600         function.
601         * runtime/error.c (internal_error): Call
602         stupid_function_name_for_static_linking.
603         * libgfortran.h: Add prototype for
604         stupid_function_name_for_static_linking.
605
606 2005-11-01  Paul Thomas  <pault@gcc.gnu.org>
607
608         PR fortran/14994
609         * libgfortran/intrinsics/date_and_time.c: Add interface to
610         the functions date_and_time for the intrinsic function secnds.
611
612 2005-10-31  Jerry DeLisle  <jvdelisle@verizon.net>
613
614         PR libfortran/24584
615         * io/list_read.c (free_saved): Set saved_used to zero.
616
617 2005-10-30  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
618
619         PR libfortran/20179
620         * io/unix.c (flush_if_preconnected): New function.
621         * io/io.h: Add prototype for flush_if_preconnected.
622         * io/transfer.c (data_transfer_init): Use flush_if_preconnected
623         to workaround buggy mixed C-Fortran code.
624
625 2005-10-30  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
626
627         * Makefile.am: Add intrinsics/malloc.c file.
628         * Makefile.in: Regenerate.
629         * intrinsics/malloc.c: New file, with implementations for free
630         and malloc library functions.
631
632 2005-10-29  Mike Stump  <mrs@apple.com>
633
634         * Makefile.am (kinds.h): Remove target, if command fails.
635         (selected_int_kind.inc): Likewise.
636         (selected_real_kind.inc): Likewise.
637         * Makefile.in: Regenerate.
638
639 2005-10-28  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
640
641
642         * Makefile.am (intrinsics): Add signal.c.
643         * Makefile.in: Regenerate.
644         * configure.ac: Checks for signal and alarm.
645         * config.h.in: Regenerate.
646         * configure: Regenerate.
647         * intrinsics/signal.c: New file for SIGNAL and ALARM intrinsics.
648
649 2005-10-28  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
650
651         * acinclude.m4 (LIBGFOR_CHECK_FPSETMASK): New check.
652         * configure.ac: Check for floatingpoint.h, fptrap.h and float.h
653         headers. Use LIBGFOR_CHECK_FPSETMASK. Check for fp_trap and
654         fp_enable functions.
655         * configure.host: Add case for systems with fpsetmask and systems
656         with fp_trap/fp_enable.
657         * config/fpu-sysv.h: New file, FPU code using fpsetmask.
658         * config/fpu-aix.h: New file, FPU code for AIX using fp_trap and
659         fp_enable.
660         * aclocal.m4: Regenerate.
661         * configure: Regenerate.
662         * config.h.in: Regenerate.
663
664 2005-10-24  Jerry DeLisle  <jvdelisle@verizon.net>
665
666         PR libfortran/24224
667         * libgfortran.h: Remove array stride error code.
668         * runtime/error.c: Remove array stride error.
669         * io/io.h: Change name of 'nml_loop_spec' to 'array_loop_spec' to be
670         generic.  Add pointer to array_loop_spec and rank to gfc_unit
671         structure.
672         * io/list_read.c: Revise nml_loop_spec references to array_loop_spec.
673         * io/transfer.c (init_loop_spec): New function to initialize
674         an array_loop_spec.
675         (next_array_record): New function to return the index to the next array
676         record by incrementing through the array_loop_spec.
677         (next_record_r): Use new function.
678         (next_record_w): Use new function.
679         (finalize_transfer): Free memory allocated for array_loop_spec.
680         * io/unit.c (get_array_unit_len): Delete this function. Use new
681         function init_loop_spec to initialize the array_loop_spec.
682
683 2005-10-24  Paul Thomas  <pault@gcc.gnu.org>
684
685         PR fortran/24416
686         * libgfortran/io/list_read.c (namelist_read): Exit with call to
687         free_saved () so that character strings do not accumulate.
688
689 2005-10-23  Jerry DeLisle  <jvdelisle@verizon.net>
690
691         PR libfortran/24489
692         * io/transfer.c (read_block): Change the order of execution to not read
693         past end-of-record.
694         (read_block_direct): Same change.
695
696 2005-10-23  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
697
698         PR libfortran/23272
699         * acinclude.m4 (LIBGFOR_CHECK_WORKING_STAT): New check.
700         * configure.ac: Use LIBGFOR_CHECK_WORKING_STAT.
701         * Makefile.in: Regenerate.
702         * configure: Regenerate.
703         * config.h.in: Regenerate.
704         * aclocal.m4: Regenerate.
705         * io/unix.c (compare_file_filename): Add fallback case for
706         systems without working stat.
707         * io/open.c (already_open): Correct call to
708         compare_file_filename.
709         * io/io.h: Correct proto for compare_file_filename.
710
711 2005-10-23  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
712
713         * runtime/fpu.c: Add _GNU_SOURCE definition.
714         * config/fpu-glibc.h: Remove __USE_GNU definition.
715
716 2005-10-23  Paul Thomas  <pault@gcc.gnu.org>
717
718         PR fortran/24384
719         * intrinsics/spread_generic.c (spread_internal_scalar): New
720         function that handles the special case of spread with a scalar
721         source. This has new interface functions -
722         (spread_scalar, spread_char_scalar): New functions to interface
723         with the calls specified in gfc_resolve_spread.
724
725 2005-10-21  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
726
727         PR libfortran/24383
728         * io/unix.c: Add fallback definition for SSIZE_MAX.
729
730 2005-10-19  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
731
732         * c99_protos.h: Define preprocessor HAVE_ macros with value 1
733         instead of empty value.
734         * intrinsics/c99_functions.c: Likewise.
735         * intrinsics/getXid.c: Define HAVE_GETPID with value 1 instead of
736         empty value.
737         * intrinsics/sleep.c: Define HAVE_SLEEP with value 1 instead of
738         empty value.
739
740 2005-10-19  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
741
742         PR libfortran/24432
743         * c99_protos.h: Define HAVE_ macros for all provided functions.
744
745 2005-10-14  Uros Bizjak  <uros@kss-loka.si>
746
747         * config/fpu-387.h (set_fpu): Remove extra ":" in stmxcsr.
748         Change cw and cw_sse variables to unsigned.
749         (SSE): New definition.
750         (has_sse): Use it.
751
752 2005-10-13  Thomas Koenig  <Thomas.Koenig@online.de>
753
754         * io/unix.c(fd_alloc_r_at):  Use read() instead of do_read()
755         only in case of special files (e.g. terminals).
756
757 2005-10-13  Uros Bizjak  <uros@kss-loka.si>
758
759         * config/fpu-387.h (set_fpu): Add "=m" for stmxcsr.
760
761 2005-10-12  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
762
763         * Makefile.am: Add fpu.c to the build process, and
764         target-dependent code as fpu-target.h.
765         * Makefile.in: Regenerate.
766         * configure.ac: Add call to configure.host to set
767         FPU_HOST_HEADER.
768         * configure: Regenerate.
769         * configure.host: New script to determine which host-dependent
770         code should go in.
771         * libgfortran.h: Add fpe option, remove previous fpu_ options.
772         Add bitmasks for different FPE traps. Add prototype for set_fpu.
773         * runtime/environ.c: Remove environment variables to control
774         fpu behaviour.
775         * runtime/fpu.c (set_fpe): New function for the front-end.
776         * runtime/main.c (init): Set FPU state.
777         * config: New directory to store host-dependent code.
778         * config/fpu-387.h: New file with code handling the i387 FPU.
779         * config/fpu-glibc.h: New file with code for glibc systems.
780         * config/fpu-generic.h: Fallback for the most generic host. Issue
781         warnings.
782
783 2005-10-12  Janne Blomqvist <jblomqvi@cc.hut.fi>
784
785         * io/unix.c(fd_alloc_r_at): Remove parts of patch of 2005/10/07 that
786         cause input from the terminal to hang.
787
788 2005-10-11  Steven G. Kargl  <kargls@comcast.net>
789
790         PR libfortran/24313
791         *  c99_functions.c (csqrtf, csqrt): Fix choice of branch cut.  Note
792         csqrt{f} were imported from glibc, and this bug is still present
793         there. glibc PR is 1146.
794
795 2005-10-07  Janne Blomqvist <jblomqvi@cc.hut.fi>
796
797         PR fortran/16339
798         PR fortran/23363
799         * io/io.h: Add read and write members to stream, define access
800         macros.
801         * io/transfer.c (read_block_direct): New function.
802         (write_block_direct): New function.
803         (unformatted_read): Change to use read_block_direct.
804         (unformatted_write): Change to use write_block_direct.
805         * io/unix.c: Remove mmap includes and defines.
806         (writen): Remove.
807         (readn): Remove.
808         (reset_stream): New function.
809         (do_read): New function.
810         (do_write): New function.
811         (fd_flush): Change to use do_write() instead of writen().
812         (fd_alloc_r_at): Change to use do_read().
813         (fd_seek): Change return type to try, as the prototype. Add check
814         to avoid syscall overhead if possible.
815         (fd_read): New function.
816         (fd_write): New function.
817         (fd_open): Set pointers for new functions.
818         (mem_read): New function.
819         (mem_write): New function.
820         (open_internal): Set pointers for new functions.
821         (is_seekable): Clean up comment.
822
823 2005-10-07  Jerry DeLisle  <jvdelisle@verizon.net>
824
825         * io/transfer.c (write_block): Add test for end-of-file condition,
826         removed from mem_alloc_w_at. (next_record_w): Clean up checks for
827         NULL pointer returns from s_alloc_w.
828         * io/unix.c (mem_alloc_w_at): Remove call to generate_error end-of-file.
829         * io/write.c (write_float): Add checks for NULL pointer returns from
830         write_block calls. (write_integer): Same.
831
832 2005-10-03  Jakub Jelinek  <jakub@redhat.com>
833
834         * runtime/memory.c (allocate_size): Malloc 1 byte if size == 0.
835
836 2005-10-03  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
837
838         PR libfortran/19308
839         PR libfortran/22437
840         * Makefile.am: Add generated files for large real and integers
841         kinds. Add a rule to create the kinds.inc c99_protos.inc files.
842         Use kinds.inc to preprocess Fortran generated files.
843         * libgfortran.h: Add macro definitions for GFC_INTEGER_16_HUGE,
844         GFC_REAL_10_HUGE and GFC_REAL_16_HUGE. Add types gfc_array_i16,
845         gfc_array_r10, gfc_array_r16, gfc_array_c10, gfc_array_c16,
846         gfc_array_l16.
847         * mk-kinds-h.sh: Define macros HAVE_GFC_LOGICAL_* and
848         HAVE_GFC_COMPLEX_* when these types are available.
849         * intrinsics/ishftc.c (ishftc16): New function for GFC_INTEGER_16.
850         * m4/all.m4, m4/any.m4, m4/count.m4, m4/cshift1.m4, m4/dotprod.m4,
851         m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4, m4/eoshift3.m4,
852         m4/exponent.m4, m4/fraction.m4, m4/in_pack.m4, m4/in_unpack.m4,
853         m4/matmul.m4, m4/matmull.m4, m4/maxloc0.m4, m4/maxloc1.m4,
854         m4/maxval.m4, m4/minloc0.m4, m4/minloc1.m4, m4/minval.m4, m4/mtype.m4,
855         m4/nearest.m4, m4/pow.m4, m4/product.m4, m4/reshape.m4,
856         m4/set_exponent.m4, m4/shape.m4, m4/specific.m4, m4/specific2.m4,
857         m4/sum.m4, m4/transpose.m4: Protect generated functions with
858         appropriate "#if defined (HAVE_GFC_type_kind)" preprocessor directives.
859         * Makefile.in: Regenerate.
860         * all files in generated/: Regenerate.
861
862 2005-10-01  Jakub Jelinek  <jakub@redhat.com>
863
864         * runtime/memory.c (malloc_t): Remove.
865         (GFC_MALLOC_MAGIC, HEADER_SIZE, DATA_POINTER, DATA_HEADER): Remove.
866         (mem_root, runtime_cleanup, malloc_with_header): Remove.
867         (internal_malloc_size): Use just get_mem if size != 0, return NULL
868         otherwise.
869         (internal_free): Just free if non-NULL.
870         (internal_realloc_size): Remove debugging stuff.
871         (allocate_size): Use malloc directly, remove debugging stuff.
872         (deallocate): Use free directly, fix error message wording.
873
874         * libgfortran.h (GFC_ITOA_BUF_SIZE, GFC_XTOA_BUF_SIZE,
875         GFC_OTOA_BUF_SIZE, GFC_BTOA_BUF_SIZE): Define.
876         (gfc_itoa, xtoa): Add 2 extra arguments.
877         * runtime/environ.c: Include stdio.h.
878         (check_buffered): Use sprintf.
879         * runtime/error.c: Include assert.h.
880         (gfc_itoa, xtoa): Add 2 extra arguments, avoid using static
881         buffers.
882         (st_printf, st_sprintf): Adjust callers.
883         * io/write.c (otoa, btoa): Add 2 extra arguments, avoid using
884         static buffers.
885         (write_int, write_decimal): Add 2 extra arguments to conv
886         function pointer, adjust caller.
887         (write_integer): Adjust gfc_itoa caller.
888
889         * io/unit.c (get_array_unit_len): Return 0 rather than NULL.
890
891         * io/read.c (read_f): Remove spurious pointer dereference.
892
893 2005-09-30  Janne Blomqvist <jblomqvi@cc.hut.fi>
894
895         PR 24112
896         * io/open.c (edit_modes): Check for correct flag.
897
898 2005-09-29  Jakub Jelinek  <jakub@redhat.com>
899
900         * runtime/string.c (find_option): Change 3rd argument to
901         const st_option *.
902         * libgfortran.h (find_option): Likewise.
903         * runtime/environ.c (rounding, precision, signal_choices): Constify.
904         (init_choice, show_choice): Change 2nd argument to const choice *.
905         * io/open.c (access_opt, action_opt, blank_opt, delim_opt, form_opt,
906         position_opt, status_opt, pad_opt): Constify.
907         * io/transfer.c (advance_opt): Likewise.
908         * io/inquire.c (undefined): Likewise.
909         * io/close.c (status_opt): Likewise.
910         * io/format.c (posint_required, period_required, nonneg_required,
911         unexpected_element, unexpected_end, bad_string, bad_hollerith,
912         reversion_error): Likewise.
913         * io/unix.c (yes, no, unknown): Change from const char *
914         into const char [].
915
916 2005-09-27  Steve Ellcey  <sje@cup.hp.com>
917
918         PR target/23552
919         * acinclude.m4 (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE): New.
920         (LIBGFOR_CHECK_FOR_BROKEN_ISNAN): New.
921         (LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): New.
922         * configure.ac (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE): Add use.
923         (LIBGFOR_CHECK_FOR_BROKEN_ISNAN): Add use.
924         (LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): Add use.
925         * configure: Regenerate.
926         * config.h.in: Regenerate.
927         * libgfortan.h (isfinite): undef if broken, set if needed.
928         (isnan): undef if broken, set if needed.
929         (fpclassify): undef if broken, set if needed.
930         * io/write.c: Remove TODO comment about working isfinite.
931         * intrinsics/c99_functions.c (round): Use isfinite instead
932         of fpclassify.
933         * intrinsics/c99_functions.c (roundf): Ditto.
934
935 2005-09-24  Janne Blomqvist <jblomqvi@cc.hut.fi>
936
937         * io.h: Changed prototypes of list_formatted_{read|write}.
938         * list_read.c (list_formatted_read): Renamed to
939         list_formatted_read_scalar and made static.
940         (list_formatted_read): New function.
941         * transfer.c: Prototype for transfer_array. Changed transfer
942         function pointer.
943         (unformatted_read): Add nelems argument, use it.
944         (unformatted_write): Likewise.
945         (formatted_transfer): Changed name to formatted_transfer_scalar.
946         (formatted_transfer): New function.
947         (transfer_integer): Add nelems argument to transfer call, move
948         updating item count to transfer functions.
949         (transfer_real): Likewise.
950         (transfer_logical): Likewise.
951         (transfer_character): Likewise.
952         (transfer_complex): Likewise.
953         (transfer_array): New function.
954         (data_transfer_init): Call formatted_transfer with new argument.
955         (iolength_transfer): New argument, use it.
956         * write.c (list_formatted_write): Renamed to
957         list_formatted_write_scalar, made static.
958         (list_formatted_write): New function.
959
960 2005-09-26  David Edelsohn  <edelsohn@gnu.org>
961
962         * configure.ac: Add check for __clog.
963         * configure: Regenerate.
964
965 2005-09-25  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
966
967         * c99_protos.h: Add prototypes for C99 complex functions.
968         * libgfortran.h: Include complex.h before c99_protos.h.
969         * intrinsics/c99_functions.c: Define HAVE_ macros for the
970         fallback functions we provide.
971         (cabsf, cabs, cabsl, cargf, carg, cargl, cexpf, cexp, cexpl,
972         clogf, clog, clogl, clog10f, clog10, clog10l, cpowf, cpow, cpowl,
973         cqsrtf, csqrt, csqrtl, csinhf, csinh, csinhl, ccoshf, ccosh,
974         ccoshl, ctanhf, ctanh, ctanhl, csinf, csin, csinl, ccosf, ccos,
975         ccosl, ctanf, ctan, ctanl): New fallback functions.
976         * Makefile.am (gfor_math_trig_c, gfor_math_trig_obj,
977         gfor_specific_c, gfor_cmath_src, gfor_cmath_obj): Remove.
978         * Makefile.in: Regenerate.
979         * configure.ac: Remove checks for csin. Add checks for all C99
980         complex functions.
981         * config.h.in: Regenerate.
982         * configure: Regenerate.
983         * aclocal.m4: Regenerate.
984
985 2005-09-25  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
986             Danny Smith  <dannysmith@users.sourceforge.net>
987
988         PR libfortran/23803
989         * intrinsics/getXid.c: Add getpid wrapper for MinGW.
990         * intrinsics/getlog.c: Add getlogin wrapper for MinGW.
991         * intrinsics/hostnm.c: Add gethostname wrapper for MinGW.
992
993 2005-09-24  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
994
995         PR libfortran/23802
996         * intrinsics/sleep.c: Add correct sleep macro for MinGW.
997
998 2005-09-24  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
999
1000         PR libfortran/23380
1001         * intrinsics/cpu_time.c (__cpu_time_1): Provide a MS Windows
1002         version.
1003
1004 2005-09-14  Jerry DeLisle  <jvdelisle@verizon.net
1005
1006         PR fortran/21875 Internal Unit Array I/O, NIST
1007         * libgfortran.h: Add run time error code for array stride.
1008         * runtime/error.c (translate_error): Add error message for
1009         array stride.
1010         * io/io.h: Add array descriptor pointer to IOPARM structure.
1011         Add prtotypes for two new functions.
1012         * io/transfer.c (data_transfer_init): Removed initialization and
1013         moved to unit.c (get_unit)
1014         * io/transfer.c (next_record_r): Include internal unit read
1015         functionality.
1016         * io/transfer.c (next_record_w): Include internal unit write
1017         functionality, including padding of character array records.
1018         * io/unit.c (get_array_unit_len): New function to return the number
1019         of records in the character array 'file' from the array descriptor.
1020         * io/unit.c (get_unit): Gathered initialization code from
1021         init_data_transfer for internal units and added initialization of
1022         character array unit.
1023         * io/unit.c (is_array_io): New function to determine if internal unit
1024         is an array.
1025         * io/unix.c (mem_alloc_w_at): Add error checks for bad record length
1026         and end of file.
1027
1028 2005-09-13  Richard Sandiford  <richard@codesourcery.com>
1029
1030         PR target/19269
1031         * intrinsics/cshift0.c (cshift0): Add an extra size argument.
1032         (cshift0_1, cshift0_2, cshift0_4, cshift0_8): Replace explicit
1033         implementations with...
1034         (DEFINE_CSHIFT): ...this new macro.  Define character versions too.
1035         * intrinsics/eoshift0.c (zeros): Delete.
1036         (eoshift0): Add extra size and filler arguments.  Use memset if no
1037         bound is provided.
1038         (eoshift0_1, eoshift0_2, eoshift0_4, eoshift0_8): Replace explicit
1039         implementations with...
1040         (DEFINE_EOSHIFT): ...this new macro.  Define character versions too.
1041         * intrinsics/eoshift2.c (zeros): Delete.
1042         (eoshift2): Add extra size and filler arguments.  Use memset if no
1043         bound is provided.
1044         (eoshift2_1, eoshift2_2, eoshift2_4, eoshift2_8): Replace explicit
1045         implementations with...
1046         (DEFINE_EOSHIFT): ...this new macro.  Define character versions too.
1047         * intrinsics/pack.c (pack_internal): New static function, reusing
1048         the contents of pack and adding an extra size argument.  Change
1049         "mptr" rather than "m" when calculating the array size.
1050         (pack): Redefine as a forwarder to pack_internal.
1051         (pack_s_internal): New static function, reusing the contents of
1052         pack_s and adding an extra size argument.
1053         (pack_s): Redefine as a forwarder to pack_s_internal.
1054         (pack_char, pack_s_char): New functions.
1055         * intrinsics/reshape.c (reshape_internal): New static function,
1056         reusing the contents of reshape and adding an extra size argument.
1057         (reshape): Redefine as a forwarder to reshape_internal.
1058         (reshape_char): New function.
1059         * intrinsics/spread.c (spread_internal): New static function,
1060         reusing the contents of spread and adding an extra size argument.
1061         (spread): Redefine as a forwarder to spread_internal.
1062         (spread_char): New function.
1063         * intrinsics/transpose.c (transpose_internal): New static function,
1064         reusing the contents of transpose and adding an extra size argument.
1065         (transpose): Redefine as a forwarder to transpose_internal.
1066         (transpose_char): New function.
1067         * intrinsics/unpack.c (unpack_internal): New static function, reusing
1068         the contents of unpack1 and adding extra size and fsize arguments.
1069         (unpack1): Redefine as a forwarder to unpack_internal.
1070         (unpack0): Call unpack_internal instead of unpack1.
1071         (unpack1_char, unpack0_char): New functions.
1072         * m4/cshift1.m4 (cshift1): New static function, reusing the contents
1073         of cshift1_<kind> and adding an extra size argument.
1074         (cshift1_<kind>): Redefine as a forwarder to cshift1.
1075         (cshift1_<kind>_char): New function.
1076         * m4/eoshift1.m4 (zeros): Delete.
1077         (eoshift1): New static function, reusing the contents of
1078         eoshift1_<kind> and adding extra size and filler arguments.
1079         Fix calculation of hstride.  Use memset if no bound is provided.
1080         (eoshift1_<kind>): Redefine as a forwarder to eoshift1.
1081         (eoshift1_<kind>_char): New function.
1082         * m4/eoshift3.m4 (zeros): Delete.
1083         (eoshift3): New static function, reusing the contents of
1084         eoshift3_<kind> and adding extra size and filler arguments.
1085         Use memset if no bound is provided.
1086         (eoshift3_<kind>): Redefine as a forwarder to eoshift3.
1087         (eoshift3_<kind>_char): New function.
1088         * generated/cshift1_4.c, generated/cshift1_8.c,
1089         * generated/eoshift1_4.c, generated/eoshift1_8.c,
1090         * generated/eoshift3_4.c, generated/eoshift3_8.c: Regenerate.
1091
1092 2005-09-11  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1093
1094         PR libfortran/20179
1095         * io/unix.c (is_preconnected): Add function to test if a stream
1096         corresponds to a preconnected unit.
1097         * io/io.h: Add prototype for is_preconnected.
1098         * io/transfer.c (data_transfer_init): Do not truncate
1099         preconnected units.
1100
1101 2005-09-10  Janne Blomqvist  <jblomqvi@cc.hut.fi>
1102
1103         * io/unix.c: Remove mmap code.
1104
1105 2005-09-09  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1106
1107         PR libfortran/23784
1108         * io/close.c (st_close): Call library_end even in case of error.
1109
1110 2005-09-09  Thomas Koenig  <Thomas.Koenig@online.de>
1111
1112         * io/io.h:  Add iomsg as last field of st_parameter.
1113         * runtime/error.c (generate_error):  If iomsg is present, copy
1114         the message there.
1115
1116 2005-09-09  Richard Sandiford  <richard@codesourcery.com>
1117
1118         PR fortran/12840
1119         * runtime/memory.c (internal_malloc_size): Return a null pointer
1120         if the size is zero.
1121         (internal_free): Do nothing if the pointer is null.
1122         (internal_realloc_size, internal_realloc, internal_realloc64): New.
1123
1124 2005-09-07  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1125
1126         PR libfortran/23262
1127         * acinclude.m4 (LIBGFOR_CHECK_CRLF): New check.
1128         * configure.ac: Use new check.
1129         * configure.in: Regenerate.
1130         * config.h.in: Regenerate.
1131         * configure: Regenerate.
1132         * io/transfer.c (next_record_w): Add case for CRLF as line
1133         terminator.
1134         * io/unix.c (tempfile, regular_file): Open files with
1135         O_BINARY on systems with CRLF.
1136
1137 2005-09-07  Steve Ellcey  <sje@cup.hp.com>
1138
1139         PR libfortran/23419
1140         * io/write.c (extract_int): Use memcpy to access buffer.
1141         (extract_uint): Ditto.
1142         (extract_real): Ditto.
1143
1144 2005-09-05  Thomas Koenig  <Thomas.Koenig@online.de>
1145
1146         * io/list_read.c:  Adjust size of of value to 32 (to hold
1147         kind=16 complex values).
1148
1149 2005-09-04  Thomas Koenig  <Thomas.Koenig@online.de>
1150
1151         PR libfortran/23321
1152         * io/transfer.c(data_transfer_init):  Check for a too-large
1153         record number.  Return if sseek failed.
1154
1155 2005-09-03  Jakub Jelinek  <jakub@redhat.com>
1156
1157         * io/read.c (read_x): Take int argument instead of fnode * and
1158         digging the N from F->u.n.
1159         * io/io.h (read_x): Adjust prototype.
1160         * io/transfer.c (formatted_transfer): Adjust callers.  Don't clobber
1161         f->u.n for FMT_T.
1162
1163 2005-09-02  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1164
1165         * io/unix.c (stream_ttyname): Protect use of ttyname by
1166         HAVE_TTYNAME macro.
1167         * configure.ac: Add check for ttyname.
1168         * config.h.in: Regenerate.
1169         * configure: Regenerate.
1170
1171 2005-09-02  Andreas Jaeger  <aj@suse.de>
1172
1173         * libgfortran.h: Add prototype for init_compile_options.
1174
1175         * io/io.h: Add prototype for notify_std.
1176
1177 2005-08-31  Steve Ellcey  <sje@cup.hp.com>
1178
1179         * io/read.c (set_integer): Use memcpy to fill buffer.
1180
1181 2005-08-31  Steve Ellcey  <sje@cup.hp.com>
1182
1183         PR target/23556
1184         * io/read.c (convert_real): Use memcpy to fill buffer.
1185
1186 2005-08-29  Thomas Koenig  <Thomas.Koenig@online.de>
1187
1188         PR libfortran/23598
1189         * io/lock.c(library_start):  If ioparm.iostat is present, clear
1190         it unconditionally.
1191
1192 2005-08-27  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1193
1194         * acinclude.m4 (LIBGFOR_CHECK_UNLINK_OPEN_FILE): Add check to see
1195         if target can unlink open files.
1196         * configure.ac: Use this new test.
1197         * config.h.in: Regenerate.
1198         * configure: Regenerate.
1199         * Makefile.in: Regenerate.
1200         * aclocal.ac: Regenerate.
1201         * io/io.h: Add prototype for unpack_filename.
1202         * io/close.c (st_close): Delete file after closing unit if
1203         HAVE_UNLINK_OPEN_FILE is not defined.
1204         * io/unix.c (unpack_filename): Unlink scratch file after opening
1205         it only if HAVE_UNLINK_OPEN_FILE is defined.
1206
1207 2005-08-17  Kelley Cook  <kcook@gcc.gnu.org>
1208
1209         * All files: Update FSF address.
1210
1211 2005-08-16  Thomas Koenig  <Thomas.Koenig@online.de>
1212
1213         PR libfortran/23428
1214         * io/transfer.c (iolength_transfer):  Remove __attribute__ ((unused))
1215         from type.  Return correct length for inquire(iolength=)
1216         for complex variables.
1217
1218 2005-08-11  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1219             Steven Bosscher  <stevenb@suse.de>
1220
1221         PR libfortran/20006
1222         * Makefile.am: Add file runtime/compile_options.c.
1223         * Makefile.in: Regenerate.
1224         * libgfortran.h: Create structure compile_options_t. Define the
1225         compile_options variable and GFC_STD_ macros.
1226         * runtime/compile_options.c: New file.
1227         * runtime/error.c (notify_std): New function.
1228         * runtime/main.c (init): Call init_compile_options during
1229         initialization.
1230         * io/format.c: Use the new notify_std function for the $
1231         descriptor extension.
1232
1233 2005-08-09  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1234         * Makefile.am: Add file intrinsics/tty.c to Makefile process.
1235         * Makefile.in: Regenerate.
1236         * io/io.h: Prototypes for new functions stream_isatty and
1237         stream_ttyname.
1238         * io/unix (stream_isatty, stream_ttyname): New functions to call
1239         isatty() and ttyname() on a given unit.
1240         * intrinsics/tty.c: New file to implement g77 intrinsics TTYNAM
1241         and ISATTY.
1242
1243 2005-08-08  Jerry DeLisle  <jvdelisle@verizon.net>
1244
1245         PR libfortran/23154
1246         * io/transfer.c (data_transfer_init): Initialize
1247         current_unit->bytes_left for a read.
1248
1249 2005-08-07  Janne Blomqvist  <jblomqvi@cc.hut.fi>
1250
1251         PR fortran/22390
1252         * io/backspace.c: File removed, contents moved to ...
1253         * io/endfile.c: Ditto.
1254         * io/rewind.c: Ditto.
1255         * io/file_pos.c: New file, ... here.
1256         * Makefile.am: Add file_pos.c to list, remove obsolete files.
1257         * Makefile.in: Regenerated.
1258
1259 2005-08-07  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1260
1261         * io/io.h: Change DEFAULT_TEMPDIR to /tmp instead of /var/tmp.
1262         * io/unix.c (tempfile): Look at the TEMP environment variable
1263         to find the temporary files directory. Whitespace correction.
1264
1265 2005-08-06  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1266
1267         * io/unix.c: Add O_RDWR to open() call.
1268
1269 2005-08-04 Paul Thomas  <pault@gcc.gnu.org>
1270
1271         * transfer.c (data_transfer_init): Truncate file in
1272         sequential WRITE when last_record == 0, rather than
1273         current_record.  Cures problem on RH9.
1274
1275 2005-08-03  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1276
1277         * libgfortran.h: When isfinite is not provided by the system,
1278         define it as a macro, so that it can accept any floating point
1279         type.
1280
1281 2005-08-01  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1282
1283         PR libfortran/23178
1284         * intrinsics/flush.c (flush_i8): Add function flush_i8. Update
1285         copyright years.
1286
1287 2005-07-31  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1288
1289         PR libfortran/21787
1290         * intrinsics/abort.c (abort): Close units before aborting.
1291         Updated copyright years.
1292
1293 2005-07-30  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1294
1295         PR libfortran/22436
1296         * io/write.c (write_real): Add default formats for real(10) and
1297         real(16).
1298
1299 2005-07-30 Paul Thomas  <pault@gcc.gnu.org>
1300
1301         PR fortran/22570 and related issues.
1302         * transfer.c (formatted_transfer): Make sure that there
1303         really is data present before X- or T- editing. Move all
1304         treatment of tabbing during writes to start of next data
1305         producing format. Suppress incorrect zeroing of bytes_left
1306         in slash formating. Insert int cast for assignment of a
1307         difference of two gfc_offsets.
1308
1309 2005-07-23  Jerry DeLisle  <jvdelisle@verizon.net>
1310
1311         * io/write.c (write_float): Revise output of IEEE exceptional
1312         values to comply with F95 and F2003 standards.
1313
1314 2005-07-22 Jerry DeLisle <jvdelisle@verizon.net>
1315
1316         PR libfortran/22570
1317         * io/unit.c (init_units): Replace BLANK_ZERO with
1318         BLANK_UNSPECIFIED.
1319
1320 2005-07-22 Jerry DeLisle <jvdelisle@verizon.net>
1321
1322         PR libfortran/21875  (FM111.f)
1323         * io/read.c (next_char): Return a ' ' character when BLANK_ZERO
1324         or BLANK_NULL are active.
1325         (read_decimal): Interpret ' ' character correctly for BZ or BN.
1326         (read_radix): Interpret ' ' character correctly for BZ or BN.
1327         (read_f): Interpret ' ' character correctly for BZ or BN.
1328
1329 2005-07-22 Paul Thomas  <pault@gcc.gnu.org>
1330
1331         PR libfortran/22570
1332         * read.c (read_x): Correct the condition for doing the
1333         x-editing during formatted input.
1334         * transfer.c (formatted_transfer): Cast offset difference
1335         as int, clean-up arithmetic with new variable, bytes_used,
1336         zero counters for FMT_SLASH,
1337         (data_transfer_init) Zero X- and T-editing counters
1338         unconditionally.
1339         (next_record_w) Zero X- and T-editing counters.
1340         unconditionally.
1341
1342 2005-07-17  Jerry DeLisle  <jvdelisle@verizon.net>
1343
1344         * io/write.c (write_float): Fix field width checks for
1345         printing 'Infinity' or 'Inf'.
1346         (output_float): Fix typo in comment.
1347
1348 2005-07-12 Paul Thomas  <pault@gcc.gnu.org>
1349
1350         PR libfortran/16435
1351         * transfer.c (formatted_transfer): Correct the problems
1352         with X- and T-editting that caused TLs followed by TRs
1353         to overwrite data, which caused NIST FM908.FOR to fail
1354         on many tests.
1355         (data_transfer_init): Zero X- and T-editting counters at
1356         the start of formatted IO.
1357         * write.c (write_x): Write specified number of skips with
1358         specified number of spaces at the end.
1359
1360 2005-07-13 Paul Thomas  <pault@gcc.gnu.org>
1361
1362         * io/read.c (read_complex): Prevent X formatting during reads
1363         from going beyond EOR to fix NIST fm908.FOR failure.
1364         * io/list_read.c (read_complex): Allow complex data in list-
1365         directed reads to have eols either side of the comma to
1366         fix NIST FM906.FOR failure.
1367
1368 2005-07-12  Thomas Koenig  <Thomas.Koenig@online.de>
1369
1370         PR libfortran/21593
1371         * io/unix.c:  Add member special_file to type unix_stream.
1372         (fd_truncate):  Don't call ftruncate or chsize if
1373         s refers to a special file.
1374         (fd_to_stream):  initialize s->special_file.
1375
1376 2005-07-11  David Edelsohn  <edelsohn@gnu.org>
1377
1378         PR libfortran/22412
1379         * io/write.c (otoa): Bias p by SCRATCH_SIZE, not
1380         sizeof (SCRATCH_SIZE).
1381         (btoa): Same.
1382
1383 2005-07-09  Jerry DeLisle  <jvdelisle@verizon.net>
1384
1385         PR libfortran/21875  (FM111.f)
1386         * io/read.c (next_char): Return a ' ' character when BLANK_ZERO or
1387         BLANK_NULL are active.
1388         (read_decimal): Interpret ' ' character correctly for BZ or BN.
1389         (read_radix): Interpret ' ' character correctly for BZ or BN.
1390         (read_f): Interpret ' ' character correctly for BZ or BN.
1391         * gfortran.dg/test (fmt_read_bz_bn.f90): New test case.
1392
1393 2005-07-09  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1394             Thomas Koenig  <Thomas.Koenig@online.de>
1395
1396         PR libfortran/22217
1397         * io/write.c (extract_unit):  New function; extract
1398         ints as unsigned signed int of the correct size.
1399         (write_int):  Use it.
1400         * runtime/error.c:  Adjust copyright years.
1401         Adjust size of buffer to maximum that can occur.
1402
1403 2005-07-07  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de>
1404
1405         * libgfortran.h (GFC_ARRAY_DESCRIPTOR): Replace 'type *base' by
1406         'size_t offset'.
1407         * intrinsics/cshift0.c, intrinsics/eoshift0.c,
1408         intrinsics/eoshift2.c,intrinsics/pack_generic.c,
1409         intrinsics/reshape_generic.c, intrinsics/spread_generic.c,
1410         intrinsics/transpose_generic.c, intrinsics/unpack_generic,
1411         m4/cshift1.m4, m4/eoshift1.m4, m4/eoshift3.m4, m4/iforeach.m4,
1412         m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4, m4/reshape.m4,
1413         m4,transpose.m4: Set renamed field 'offset' to zero instead of
1414         'base'.
1415         * generated/all_l4.c, generated/all_l8.c,
1416         generated/any_l4.c, generated/any_l8.c, generated/count_4_l4.c,
1417         generated/count_4_l8.c, generated/count_8_l4.c,
1418         generated/count_8_l8.c, generated/chift1_4.c,
1419         generated/cshift1_8.c, generated/eoshift1_4.c,
1420         generated/eoshift1_8.c, generated/eoshift3_4.c,
1421         generated/eoshift3_8.c, generated/matmul_c4.c,
1422         generated/matmul_c8.c, generated/matmul_i4.c, matmul_i8.c,
1423         generated/matmul_l4.c, generated/matmul_l8.c,
1424         generated/matmul_r4.c, generated/matmul_r8.c,
1425         generated/maxloc0_4_i4.c, generated/maxloc0_4_i8.c,
1426         generated/maxloc0_4_r4.c, generated/maxloc0_4_r8.c,
1427         generated/maxloc0_8_i4.c, generated/maxloc0_8_i8.c,
1428         generated/maxloc0_8_r4.c, generated/maxloc0_8_r8.c,
1429         generated/maxloc1_4_i4.c, generated/maxloc1_4_i8.c,
1430         generated/maxloc1_4_r4.c, generated/maxloc1_4_r8.c,
1431         generated/maxloc1_8_i4.c, generated/maxloc1_8_i8.c,
1432         generated/maxloc1_8_r4.c, generated/maxloc1_8_r8.c,
1433         generated/maxval_i4.c, generated/maxval_i8.c,
1434         generated/maxval_r4.c, generated/maxval_r8.c,
1435         generated/minloc0_4_i4.c, generated/minloc0_4_i8.c,
1436         generated/minloc0_4_r4.c, generated/minloc0_4_r8.c,
1437         generated/minloc0_8_i4.c, generated/minloc0_8_i8.c,
1438         generated/minloc0_8_r4.c, generated/minloc0_8_r8.c,
1439         generated/minloc1_4_i4.c, generated/minloc1_4_i8.c,
1440         generated/minloc1_4_r4.c, generated/minloc1_4_r8.c,
1441         generated/minloc1_8_i4.c, generated/minloc1_8_i8.c,
1442         generated/minloc1_8_r4.c, generated/minloc1_8_r8.c,
1443         generated/minval_i4.c, generated/minval_i8.c,
1444         generated/minval_r4.c, generated/minval_r8.c,
1445         generated/product_c4.c, generated/product_c8.c,
1446         generated/product_i4.c, generated/product_i8.c,
1447         generated/product_r4.c, generated/product_r8.c,
1448         generated/reshape_c4.c, generated/reshape_c8.c,
1449         generated/reshape_i4.c, generated/reshape_i8.c,
1450         generated/sum_c4.c, generated/sum_c8.c, generated/sum_i4.c,
1451         generated/sum_i8.c, generated/sum_r4.c, generated/sum_r8.c,
1452         generated/transpose_c4.c, generated/transpose_c8.c,
1453         generated/transpose_i4.c, generated/transpose_i8.c: Regenerate:
1454
1455 2005-07-07  Thomas Koenig  <Thomas.Koenig@online.de>
1456
1457         PR libfortran/21594
1458         * intrinsics/eoshift0.c:  If abs(shift) > len, fill the
1459         the whole array with the boundary value, but don't overrun it.
1460         * intrinsics/eoshift2.c:  Likewise.
1461         * m4/eoshift1.m4:  Likewise.
1462         * m4/eoshift3.m4:  Likewise.
1463         * generated/eoshift1_4.c:  Regenerated.
1464         * generated/eoshift1_8.c:  Regenerated.
1465         * generated/eoshift3_4.c:  Regenerated.
1466         * generated/eoshift3_8.c:  Regenerated.
1467
1468 2005-07-07  Feng Wang  <fengwang@nudt.edu.cn>
1469
1470         PR fortran/16531
1471         * io/transfer.c (formatted_transfer): Enable FMT_A on other types to
1472         support Hollerith constants.
1473
1474 2005-07-01  Andreas Jaeger  <aj@suse.de>
1475
1476         * intrinsics/unpack_generic.c: Remove const from parameter.
1477
1478         * io/transfer.c (formatted_transfer): Remove unused variable.
1479
1480 2005-06-28  Thomas Koenig  <Thomas.Koenig@online.de>
1481
1482         PR libfortran/22142
1483         * m4/eoshift1.m4:  Correct bstride (it needs to be multiplied
1484         by size since it's a char pointer).
1485         * m4/eoshift1_4.c:  Regenerated.
1486         * m4/eoshift1_8.c:  Regenerated.
1487
1488 2005-06-28  Thomas Koenig  <Thomas.Koenig@online.de>
1489
1490         PR libfortran/22142
1491         * m4/eoshift3.m4:  Correct bstride (it needs to be multiplied
1492         by size since it's a char pointer).
1493         * m4/eoshift3_4.c:  Regenerated.
1494         * m4/eoshift3_8.c:  Regenerated.
1495
1496 2005-06-28  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1497
1498         PR libfortran/22170
1499         * io/transfer.c (formatted_transfer): Do not iterate on the
1500         repeat count of a FMT_SLASH, since this is already done in
1501         next_format().
1502
1503 2005-06-25  Thomas Koenig  <Thomas.Koenig@online.de>
1504
1505         PR libfortran/22144
1506         * m4/cshift1.m4: Remove const from argument ret.
1507         Populate return array descriptor if ret->data is NULL.
1508         * m4/eoshift1.m4: Likewise.
1509         * m4/eoshift3.m4: Likewise.
1510         * generated/cshift1_4.c:  Regenerated.
1511         * generated/cshift1_8.c:  Regenerated.
1512         * generated/eoshift1_4.c:  Regenerated.
1513         * generated/eoshift1_8.c:  Regenerated.
1514         * generated/eoshift3_4.c:  Regenerated.
1515         * generated/eoshift3_8.c:  Regenerated.
1516
1517 2005-06-24  Jerry DeLisle <jvdelisle@verizon.net>
1518
1519         PR libfortran/21915
1520         * Makefile.am: Include intrinsics/hyper.c.
1521         * c99_protos.h: Add prototypes for single precision versions of
1522         acosh, asinh, and atanh for platforms that do not have these.
1523         * config.h.in: Add #undef for wrappers.
1524         * configure.ac: Add checks for single precision versions.
1525         * aclocal.m4: Regenerated.
1526         * Makefile.in: Regenerated.
1527         * configure: Regenerated.
1528         * intrinsics/hyper.c: New file, adds new wrapper functions.
1529
1530 2005-06-23  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1531
1532         * intrinsics/c99_functions.c (log10l): New log10l function for
1533         systems where this is not available.
1534         * c99_protos.h: Prototype for log10l function.
1535         * libgfortran.h: Use generated kinds.h to define GFC_INTEGER_*,
1536         GFC_UINTEGER_*, GFC_LOGICAL_*, GFC_REAL_*, GFC_COMPLEX_*. Update
1537         prototypes for gfc_itoa and xtoa.
1538         * io/io.h: Update prototypes for set_integer and max_value.
1539         * io/list_read.c (convert_integer): Use new
1540         GFC_(INTEGER|REAL)_LARGEST type.
1541         * io/read.c (set_integer): Likewise.
1542         (max_value): Likewise.
1543         (convert_real): Likewise.
1544         (real_l): Likewise.
1545         (next_char): Likewise.
1546         (read_decimal): Likewise.
1547         (read_radix): Likewise.
1548         (read_f): Likewise.
1549         * io/write.c (extract_int): Use new GFC_INTEGER_LARGEST type.
1550         (extract_real): Use new GFC_REAL_LARGEST type.
1551         (calculate_exp): Likewise.
1552         (calculate_G_format): Likewise.
1553         (output_float): Likewise. Use log10l for long double values.
1554         Add comment for sprintf format. Use GFC_REAL_LARGEST_FORMAT.
1555         (write_l): Use new GFC_INTEGER_LARGEST type.
1556         (write_float): Use new GFC_REAL_LARGEST type.
1557         (write_int): Remove useless special case for (len < 8).
1558         (write_decimal): Use GFC_INTEGER_LARGEST.
1559         (otoa): Use GFC_UINTEGER_LARGEST as argument.
1560         (btoa): Use GFC_UINTEGER_LARGEST as argument.
1561         * runtime/error.c (gfc_itoa): Use GFC_INTEGER_LARGEST as
1562         argument.
1563         (xtoa): Use GFC_UINTEGER_LARGEST as argument.
1564         * Makefile.am: Use mk-kinds-h.sh to generate header kinds.h
1565         with all Fortran kinds available.
1566         * configure.ac: Check for strtold and log10l.
1567         * Makefile.in: Regenerate.
1568         * aclocal.m4: Regenerate.
1569         * configure: Regenerate.
1570         * config.h.in: Regenerate.
1571         * mk-kinds-h.sh: Configuration script for available integer
1572         and real kinds.
1573
1574
1575 2005-06-18  Janne Blomqvist  <jblomqvi@cc.hut.fi>
1576
1577         * unix.c (stream_at_bof): Don't assume that all non-mmapped files
1578         are non-seekable.
1579         (stream_at_eof): Likewise.
1580
1581 2005-06-18  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1582
1583         PR libfortran/19155
1584         * io/read.c (convert_real): strtod can set errno to EINVAL on an
1585         empty string, but we shouldn't have an error in that case.
1586
1587 2005-06-17  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1588
1589         PR libfortran/19216
1590         * io/list_read.c (eat_separator): No need to call next_record,
1591         even in non-namelist_mode.
1592
1593 2005-06-17  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1594
1595         * io/transfer.c (formatted_transfer): Fix typo in error message.
1596
1597 2005-06-17  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1598
1599         PR libfortran/16436
1600         * io/transfer.c (read_sf): Correct updating of bytes_left field.
1601         (formatted_transfer): Correct updating of bytes_left field and
1602         reformatting code (comments and whitespace).
1603         * io/unix.c (move_pos_offset): "active" field should not be
1604         changed here. Whitespace corrections.
1605
1606 2005-06-15  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1607
1608         PR libfortran/21950
1609         * intrinsics/c99_functions.c (scalbn): Provide fallback
1610         implementation for scalbn.
1611         * c99_protos.h: Prototype for scalbn.
1612         * configure.ac: Add check for scalbn.
1613         * configure: Regenerate.
1614         * config.h.in: Regenerate.
1615
1616 2005-06-14  Thomas Koenig  <Thomas.Koenig@online.de>
1617
1618         * intrinsics/eoshift0.c:  Removed prototype for eoshift0.
1619         * intrinsics/eoshift2.c:  Removed prototype for eoshift2.
1620
1621 2005-06-14  Tom Tromey  <tromey@redhat.com>
1622
1623         PR libgcj/19877:
1624         * configure, aclocal.m4, Makefile.in: Rebuilt.
1625
1626 2005-06-12  Thomas Koenig  <Thomas.Koenig@online.de>
1627
1628         PR libfortran/21594
1629         * intrinsics/eoshift0.c:  Add prototype for eoshift0.
1630         * intrinsics/eoshift2.c:  Add prototype for eoshift2.
1631
1632 2005-06-12  Steven G. Kargl <kargls@comcast.net>
1633             Thomas Koenig  <Thomas.Koenig@online.de>
1634
1635         PR libfortran/PR21797
1636         * m4/cexp.m4 (csqrt`'q):  Add type qualifyer to
1637         sqrt and fabs.
1638         * generated/exp_c4.c:  Regenerated.
1639
1640 2005-06-12  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1641
1642         PR libfortran/19155
1643         * io/read.c (read_f): Take care of spaces after initial sign.
1644
1645 2005-06-11  Thomas Koenig  <Thomas.Koenig@onlinde.de>
1646
1647         PR libfortran/21333
1648         * Makefile.am: Add in_pack_c4.c, in_pack_c8.c, in_unpack_c4.c
1649         and in_unpack_c8.c.
1650         * Makefile.in: Regenerate.
1651         * libgfortran.h:  Declare internal_pack_c4, internal_pack_c8,
1652         internal_unpack_c4 and internal_unpack_c8.
1653         * m4/in_pack.m4: Use rtype_ccode insteald of rtype_kind
1654         in function name.
1655         Use sizeof (rtype_name) as size for memory allocation.
1656         * m4/in_unpack.m4: Use rtype_ccode insteald of rtype_kind
1657         in function name.
1658         Use sizeof (rtype_name) for calculation of sizes for memcpy.
1659         * runtime/in_pack_generic.c:  For real, integer and logical
1660         call internal_pack_4 if size==4 and internal_pack_8 if
1661         size==8.
1662         For complex, call internal_pack_c4 if size==8 and
1663         internal_pack_c8 if size==16.
1664         * runtime/in_unpack_generic.c: For real, integer and logical
1665         call internal_unpack_4 if size==4 and internal_unpack_8 if
1666         size==8.
1667         For complex, call internal_unpack_c4 if size==8 and
1668         internal_unpack_c8 if size==16.
1669         * generated/in_pack_i4.c:  Regenerated.
1670         * generated/in_pack_i8.c:  Regenerated.
1671         * generated/in_unpack_i4.c:  Regenerated.
1672         * generated/in_unpack_i8.c:  Regenerated.
1673         * generated/in_pack_c4.c:  New file.
1674         * generated/in_pack_c8.c:  New file.
1675         * generated/in_unpack_c4.c:  New file.
1676         * generated/in_unpack_c8.c:  New file.
1677
1678 2005-06-09  Thomas Koenig  <Thomas.Koenig@online.de>
1679
1680         PR libfortran/21480
1681         * m4/reshape.m4:  Use sizeof (rtype_name) for sizes to be passed
1682         to reshape_packed.
1683         * generated/reshape_c4.c:  Regenerated.
1684         * generated/reshape_c8.c:  Regenerated.
1685         * generated/reshape_i4.c:  Regenerated.
1686         * generated/reshape_i8.c:  Regenerated.
1687
1688 2005-06-07  Thomas Koenig  <Thomas.Koenig@online.de>
1689
1690         PR libfortran/21926
1691         * m4/matmul.m4:  Correct zeroing of result for non-packed
1692         arrays with lowest stride is one.
1693         * generated/matmul_c4.c:  Regenerated.
1694         * generated/matmul_c8.c:  Regenerated.
1695         * generated/matmul_i4.c:  Regenerated.
1696         * generated/matmul_i8.c:  Regenerated.
1697         * generated/matmul_r4.c:  Regenerated.
1698         * generated/matmul_r8.c:  Regenerated.
1699
1700 2005-05-30  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1701
1702         PR libfortran/20179
1703         * io/unix.c (fd_close): Add test so that we don't close()
1704         stdout and stderr.
1705
1706 2005-05-29  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1707
1708         PR libfortran/20006
1709         * io/format.c (parse_format_list): Set repeat count of $ format
1710         node to 1.
1711         * io/transfer.c (read_sf): Add g.seen_dollar to the test
1712         concerning advancing I/O.
1713         (data_transfer_init): Likewise.
1714         (finalize_transfer): Likewise.
1715
1716 2005-05-27  Thomas Koenig  <Thomas.Koenig@online.de>
1717
1718         * runtime/in_pack_generic.c:  Adjust copyright years.
1719         (in_pack_generic):  Change dimension of auxiliary arrays from
1720         GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
1721         * runtime/in_unpack_generic.c:  Adjust copyright years.
1722         (in_unpack_generic):  Change dimension of auxiliary arrays from
1723         GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
1724
1725 2005-05-26  Thomas Koenig  <Thomas.Koenig@online.de>
1726
1727         PR libfortran/17283
1728         * intrinsics/unpack_generic.c:  Fix name of routine
1729         on top.  Update copyright years.
1730         (unpack1):  Remove const from return array descriptor.
1731         rs:  New variable, for calculating return sizes.
1732         Populate return array descriptor if ret->data is NULL.
1733
1734 2005-05-22  Peter Wainwright  <prw@ceiriog1.demon.co.uk>
1735
1736         PR libfortran/21376
1737         * io/write.c (output_float): Rework logic to avoid call to log10
1738         with argument equal to zero.
1739
1740 2005-05-21  Eric Botcazou  <ebotcazou@libertysurf.fr>
1741
1742         * configure.ac: Check for trunc and truncf in libm.
1743         * configure: Regenerate.
1744         * config.h.in: Likewise.
1745         * intrinsics/c99_functions.c (trunc, truncf): New functions.
1746         * c99_protos.h (trunc, truncf): Declare them.
1747
1748 2005-05-18  Thomas Koenig  <Thomas.Koenig@online.de>
1749
1750         PR libfortran/21127
1751         * Makefile.am:  Really commit.
1752         * Makefile.in:  Really commit.
1753
1754 2005-05-18  Thomas Koenig  <Thomas.Koenig@online.de>
1755
1756         PR libfortran/21127
1757         * Makefile.am:  Add generated/reshape_c4.c and
1758         generated/reshape_c8.c.
1759         * Makefile.in:  Regenerated.
1760         * m4/iparm.m4:  Define rtype_ccode to be c4 or c8 for
1761         complex types, 4 or 8 otherwise.
1762         * m4/reshape.m4:  Use rtype_ccode instead of rtype_kind
1763         in function name.
1764         * generated/reshape_c4.c: New file.
1765         * generated/reshape_c8.c: New file.
1766
1767 2005-05-16  Andreas Jaeger  <aj@suse.de>
1768
1769         * configure.ac: Add additional warning flags.
1770         * configure: Regenerate.
1771
1772         * io/write.c (calculate_G_format): Remove unused parameter.
1773         (output_float): Remove unused parameter.
1774         (write_float): Change callers.
1775         (nml_write_obj): Avoid signed warning.
1776         Make variable const to support -Wwrite-strings.
1777
1778         * io/unix.c (fd_alloc, mmap_open, mmap_sfree, mem_sfree,
1779         mem_truncate): Mark argument as unused.
1780
1781         * io/unit.c (get_unit): Mark argument as unused.
1782         (init_units): Avoid warning about signed comparision.
1783
1784         * io/transfer.c (next_record_r): Remove unused parameter.
1785         (next_record_w): Remove unused parameter.
1786         (next_record): Change callers.
1787         (iolength_transfer): Mark arguments as unused.
1788
1789         * io/open.c: Add initializer.
1790
1791         * io/list_read.c (read_character): Mark argument as unused.
1792         (nml_match_name): Add const to make compile with -Wwrite-strings.
1793
1794         * io/format.c: Add initializer.
1795
1796 2005-05-15  Andreas Jaeger  <aj@suse.de>
1797
1798         * m4/eoshift1.m4: Initialize variables to avoid warnings.
1799         * m4/eoshift3.m4: Initialize variables to avoid warnings.
1800         * generated/eoshift1_4.c, generated/eoshift1_8.c,
1801         generated/eoshift3_4.c, generated/eoshift3_8.c: Regenerated.
1802
1803         * intrinsics/spread_generic.c (spread): Initialize variables to
1804         avoid warnings.
1805
1806         * intrinsics/eoshift0.c (eoshift0): Initialize variables to avoid
1807         warnings.
1808         * intrinsics/eoshift2.c (eoshift2): Initialize variables to avoid
1809         warnings.
1810
1811         * io/list_read.c (nml_get_obj_data): Initialize variables to avoid
1812         warnings.
1813
1814         * intrinsics/pack_generic.c (pack): Remove unneeded calculation.
1815
1816         * m4/matmull.m4 (matmul_): Remove unneeded calculations, fix
1817         pointer cast to avoid warning.
1818         * generated/matmul_l4.c: Regenerated.
1819         * generated/matmul_l8.c: Regenerated.
1820
1821         * Makefile.am: Remove AM_CFLAGS here.
1822         * configure.ac: Define AM_CFLAGS and AM_FCFLAGS so that warnings
1823         are set.  Set additionally -Wstrict-prototypes for CFLAGS.
1824         * Makefile.in: Regenerated.
1825         * aclocal.m4: Regenerated.
1826         * configure: Regenerated.
1827
1828         * intrinsics/system_clock.c (system_clock_4, system_clock_8): Add
1829         missing returns, reformat a bit.
1830
1831         * io/write.c (nml_write_obj): Use %d again - and cast to int,
1832         st_sprintf does not handle %ld.
1833
1834         * io/unit.c (is_internal_unit): Add void as parameter list.
1835
1836         * io/transfer.c: Move prototype declarations before the functions.
1837
1838         * runtime/normalize.c (almostone_r4, almostone_r8): Fix parameter
1839         list.
1840
1841         * intrinsics/random.c (KISS_DEFAULT_SEED): Remove extra semicolon.
1842
1843         * io/transfer.c: Do not use empty initializers for global objects.
1844         Add missing initializers.
1845
1846         * io/lock.c: Do not use empty initializers for global objects.
1847
1848         * io/close.c: Add missing initializers.
1849
1850         * runtime/environ.c: Add missing initializers. Do not use empty
1851         initializers for global object.
1852         (init_string): Mark argument as unused.
1853
1854         * runtime/main.c (cleanup): Fix parameter list.
1855
1856         * io/io.h: Fix parameter lists.
1857
1858         * m4/transpose.m4, m4/matmul.m4: Fix pointer cast to avoid
1859         warning.
1860
1861         * generated/transpose_c4.c, generated/transpose_c8.c,
1862         generated/transpose_i4.c, generated/transpose_i8.c,
1863         generated/matmul_c4.c, generated/matmul_c8.c,
1864         generated/matmul_i4.c, generated/matmul_i8.c,
1865         generated/matmul_r4.c, generated/matmul_r8.c: Regenerated.
1866
1867         * io/write.c (nml_write_obj): Fix 64-bit problem.
1868
1869         * io/list_read.c (nml_get_obj_data): Add missing braces around
1870         initializer to avoid warnings.
1871
1872         * intrinsics/etime.c (etime_sub): Remove unused variable.
1873
1874         * intrinsics/chdir.c, intrinsics/getlog.c, intrinsics/link.c,
1875         intrinsics/symlnk.c, intrinsics/perror.c: Include <string.h> for
1876         prototypes.
1877
1878         * runtime/string.c (compare0): Remove unused variable.
1879         * io/unit.c (init_units): Remove unused variables.
1880         * intrinsics/getcwd.c (getcwd_i4_sub): Remove unused variable.
1881         * intrinsics/unlink.c (unlink_i4_sub): Remove unused variable.
1882         * intrinsics/stat.c (stat_i4_sub, fstat_i8_sub, fstat_i4_sub,
1883         stat_i8_sub): Remove unused variable.
1884
1885 2005-05-12  Thomas Koenig  <Thomas.Koenig@online.de>
1886
1887         PR libfortran/21324
1888         * runtime/memory.c:  Don't define GFC_CLEAR_MEMORY (it's a
1889         performance hog).
1890         * io/open.c (new_unit): Zero freshly allocated memory for
1891         unit structure.
1892         * io/unit.c (init_units):  Zero freshly allocated memory for
1893         STDIN, STDOUT and STDERR.
1894         * io/unix.c (open_internal):  Zero freshly allocated memory
1895         for unix_stream.
1896         (fd_to_stream):  Likewise.
1897
1898 2005-05-11  Bud Davis  <bdavis@gfortran.org>
1899
1900         PR fortran/19478
1901         * io/unix.c (fd_truncate): update positions when ftruncate
1902         fails (like writing to /dev/null).
1903
1904 2005-05-10  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1905
1906         PR libfortran/21471
1907         * open.c (new_unit): Take care of the case where POSITION_APPEND
1908         is specified (sseek to the end, and set u>-endfile).
1909
1910 2005-05-10  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de>
1911
1912         PR fortran/20178
1913         * Makefile.am (gfor_specific_src): Add 'intrinsics/f2c_intrinsics.F90'
1914         to dependencies.
1915         * Makefile.in: Regenerate.
1916         * intrinsics/f2c_specific.F90: New file.
1917
1918 2005-05-10  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1919
1920         PR libfortran/20788
1921         * io/unix.c (fd_to_stream): Add an avoid_mmap argument indicating
1922         we don't we to mmap this stream. Use fd_open instead of mmap_open
1923         in that case.
1924         (open_external): Call fd_to_stream with avoid_mmap = 0.
1925         (input_stream): Call fd_to_stream with avoid_mmap = 1.
1926         (output_stream): Likewise.
1927         (error_stream): Likewise.
1928
1929 2005-05-09  Mike Stump  <mrs@apple.com>
1930
1931         * configure: Regenerate.
1932
1933 2005-05-09  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
1934
1935         PR libfortran/19155
1936         * io/read.c (read_f): Accept 'e', 'E', 'd' and 'D' as first
1937         non-blank characters of a real number.
1938
1939 2005-05-04  Thomas Koenig  <Thomas.Koenig@online.de>
1940
1941         PR libfortran/21354
1942         * m4/cshift1.m4: Change dimension of auxiliary arrays from
1943         GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION.
1944         * m4/eoshift1.m4: Likewise.
1945         * m4/eoshift3.m4: Likewise.
1946         * m4/ifunction.m4: Likewise.
1947         * m4/in_pack.m4: Likewise.
1948         * m4/in_unpack.m4: Likewise.
1949         * intrinsics/cshift0.c: Likewise.
1950         * intrinsics/eoshift0.c: Likewise.
1951         * intrinsics/eoshift2.c: Likewise.
1952         * intrinsics/random.c: Likewise.
1953         * intrinsics/spread_generic.c: Likewise.
1954         * intrinsics/stat.c: Likewise.
1955         * generated/all_l4.c: Regenerated.
1956         * generated/all_l8.c: Regenerated.
1957         * generated/any_l4.c: Regenerated.
1958         * generated/any_l8.c: Regenerated.
1959         * generated/count_4_l4.c: Regenerated.
1960         * generated/count_4_l8.c: Regenerated.
1961         * generated/count_8_l4.c: Regenerated.
1962         * generated/count_8_l8.c: Regenerated.
1963         * generated/cshift1_4.c: Regenerated.
1964         * generated/cshift1_8.c: Regenerated.
1965         * generated/eoshift1_4.c: Regenerated.
1966         * generated/eoshift1_8.c: Regenerated.
1967         * generated/eoshift3_4.c: Regenerated.
1968         * generated/eoshift3_8.c: Regenerated.
1969         * generated/in_pack_i4.c: Regenerated.
1970         * generated/in_pack_i8.c: Regenerated.
1971         * generated/in_unpack_i4.c: Regenerated.
1972         * generated/in_unpack_i8.c: Regenerated.
1973         * generated/maxloc0_4_i4.c: Regenerated.
1974         * generated/maxloc0_4_i8.c: Regenerated.
1975         * generated/maxloc0_4_r4.c: Regenerated.
1976         * generated/maxloc0_4_r8.c: Regenerated.
1977         * generated/maxloc0_8_i4.c: Regenerated.
1978         * generated/maxloc0_8_i8.c: Regenerated.
1979         * generated/maxloc0_8_r4.c: Regenerated.
1980         * generated/maxloc0_8_r8.c: Regenerated.
1981         * generated/maxloc1_4_i4.c: Regenerated.
1982         * generated/maxloc1_4_i8.c: Regenerated.
1983         * generated/maxloc1_4_r4.c: Regenerated.
1984         * generated/maxloc1_4_r8.c: Regenerated.
1985         * generated/maxloc1_8_i4.c: Regenerated.
1986         * generated/maxloc1_8_i8.c: Regenerated.
1987         * generated/maxloc1_8_r4.c: Regenerated.
1988         * generated/maxloc1_8_r8.c: Regenerated.
1989         * generated/maxval_i4.c: Regenerated.
1990         * generated/maxval_i8.c: Regenerated.
1991         * generated/maxval_r4.c: Regenerated.
1992         * generated/maxval_r8.c: Regenerated.
1993         * generated/minloc0_4_i4.c: Regenerated.
1994         * generated/minloc0_4_i8.c: Regenerated.
1995         * generated/minloc0_4_r4.c: Regenerated.
1996         * generated/minloc0_4_r8.c: Regenerated.
1997         * generated/minloc0_8_i4.c: Regenerated.
1998         * generated/minloc0_8_i8.c: Regenerated.
1999         * generated/minloc0_8_r4.c: Regenerated.
2000         * generated/minloc0_8_r8.c: Regenerated.
2001         * generated/minloc1_4_i4.c: Regenerated.
2002         * generated/minloc1_4_i8.c: Regenerated.
2003         * generated/minloc1_4_r4.c: Regenerated.
2004         * generated/minloc1_4_r8.c: Regenerated.
2005         * generated/minloc1_8_i4.c: Regenerated.
2006         * generated/minloc1_8_i8.c: Regenerated.
2007         * generated/minloc1_8_r4.c: Regenerated.
2008         * generated/minloc1_8_r8.c: Regenerated.
2009         * generated/minval_i4.c: Regenerated.
2010         * generated/minval_i8.c: Regenerated.
2011         * generated/minval_r4.c: Regenerated.
2012         * generated/minval_r8.c: Regenerated.
2013         * generated/product_c4.c: Regenerated.
2014         * generated/product_c8.c: Regenerated.
2015         * generated/product_i4.c: Regenerated.
2016         * generated/product_i8.c: Regenerated.
2017         * generated/product_r4.c: Regenerated.
2018         * generated/product_r8.c: Regenerated.
2019         * generated/sum_c4.c: Regenerated.
2020         * generated/sum_c8.c: Regenerated.
2021         * generated/sum_i4.c: Regenerated.
2022         * generated/sum_i8.c: Regenerated.
2023         * generated/sum_r4.c: Regenerated.
2024         * generated/sum_r8.c: Regenerated.
2025
2026 2005-04-30  Thomas Koenig  <Thomas.Koenig@online.de>
2027
2028         PR libfortran/18958
2029         libgfortran.h:  Change typedef of index_type from size_t
2030         to ssize_t.
2031
2032 2005-04-30  Paul Thomas  <pault@gcc.gnu.org>
2033
2034         PR libfortran/18857
2035         * generated/matmul_r8.c: Remove incorrect assertions.
2036         * generated/matmul_c4.c: Regenerate
2037         * generated/matmul_c8.c: Regenerate
2038         * generated/matmul_i4.c: Regenerate
2039         * generated/matmul_i8.c: Regenerate
2040         * generated/matmul_r4.c: Regenerate
2041         * generated/matmul_r8.c: Regenerate
2042
2043 2005-04-29  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2044
2045         * configure.ac: Check for ftruncate and chsize.
2046         * io/unix.c (fd_truncate): Provide chsize as alternative to
2047         ftruncate.
2048         * config.h.in: Regenerate.
2049         * configure: Regenerate.
2050
2051 2005-04-29  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de>
2052
2053         * intrinsics/rename.c: Add missing #includes.
2054
2055 2005-04-28  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de>
2056
2057         * AUTHORS, COPYING, INSTALL, NEWS, README: Remove.
2058
2059 2005-04-26  David Edelsohn  <edelsohn@gnu.org>
2060
2061         PR libfortran/20930
2062         * io/rewind.c (st_rewind): Flush the stream when resetting the mode
2063         from WRITING to READING.
2064
2065 2005-04-22  Paul Thomas  <pault@gcc.gnu.org>
2066             Jerry DeLisle  <jvdelisle@verizon.net>
2067
2068         * io/write.c (nml_write_obj): Provide 1 more byte for ext_name.
2069         * io/list_read.c (nml_get_obj_data): Put extra brackets in get_mem
2070         call for ext_name.  These fix the bug reported by Jerry DeLisle to
2071         the fortran list and are based on his suggested fix.
2072
2073 2005-04-22  Thomas Koenig  <Thomas.Koenig@online.de>
2074
2075         PR libfortran/20074
2076         PR libfortran/20436
2077         PR libfortran/21108
2078         * m4/reshape.m4 (reshape_`'rtype_kind):  rs, rex:  New
2079         variables, to be used in calculation of return array sizes.
2080         Populate return array descriptor if ret->data is NULL.
2081         Fix condition for early return (it used to test something
2082         undefined if order was used).
2083         Remove duplicate check wether pad is used.
2084         * intrinsics/reshape_generic.c (reshape_generic): Likewise.
2085         Fix a few places where the wrong variables were set.
2086         * generated/reshape_i4.c: Regenerated.
2087         * generated/reshape_i8.c: Regenerated.
2088
2089 2005-04-18  Paul  Thomas <pault@gcc.gnu.org>
2090
2091         * io/list_read.c (nml_touch_nodes, nml_read_obj,
2092         nml_get_obj_data): Fix memory leaks in code for derived types.
2093
2094 2005-04-11  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2095
2096         PR libfortran/20950
2097         * io/inquire.c (inquire_via_unit): Check for the gfc_unit being
2098         NULL when setting ioparm.sequential.
2099
2100 2005-04-17  Thomas Koenig  <Thomas.Koenig@online.de>
2101
2102         PR libfortran/21075
2103         * m4/reshape.m4 (reshape_`'rtype_kind):  Change dimension
2104         of auxiliary arrays from GFC_MAX_DIMENSIONS - 1 to
2105         GFC_MAX_DIMENSIONS.
2106         * intrinsics/reshape_generic.c (reshape_generic):  Likewise.
2107         * generated/reshape_i4.c:  Regenerated.
2108         * generated/reshape_i8.c:  Regenerated.
2109
2110 2005-04-17 Paul Thomas <pault@gcc.gnu.org>
2111
2112         * io/list_read.c (eat_separator): at_eol = 1 replaced
2113         (zapped at some time?).
2114
2115 2005-04-17 Paul Thomas <pault@gcc.gnu.org>
2116
2117         PR libfortran/12884
2118         PR libfortran/17285
2119         PR libfortran/18122
2120         PR libfortran/18210
2121         PR libfortran/18392
2122         PR libfortran/18591
2123         PR libfortran/18879
2124         * io/io.h (nml_ls): Declare.
2125         (namelist_info): Modify for arrays.
2126         * io/list_read.c (namelist_read): Reduced to call to new functions.
2127         (match_namelist_name): Simplified.
2128         (nml_query): Handles stdin queries ? and =?. New function.
2129         (nml_get_obj_data): Parses object name. New function.
2130         (touch_nml_nodes): Marks objects for read. New function.
2131         (untouch_nml_nodes): Resets objects. New function.
2132         (parse_qualifier): Parses and checks qualifiers. New function
2133         (nml_read_object): Reads and stores object data. New function.
2134         (eat_separator): No new_record on '/' in namelist.
2135         (finish_separator): No new_record on '/' in namelist.
2136         (read_logical): Error return for namelist.
2137         (read_integer): Error return for namelist.
2138         (read_complex): Error return for namelist.
2139         (read_real): Error return for namelist.
2140         * io/lock.c (library_end): Free extended namelist_info types.
2141         * io/transfer.c (st_set_nml_var): Modified for arrays.
2142         (st_set_nml_var_dim): Dimension descriptors. New function.
2143         * io/write.c (namelist_write): Reduced to call to new functions.
2144         (nml_write_obj): Writes output for object. New function.
2145         (write_integer): Suppress leading blanks for repeat counts.
2146         (write_int): Suppress leading blanks for repeat counts.
2147         (write_float): Suppress leading blanks for repeat counts.
2148         (output_float): Suppress leading blanks for repeat counts.
2149
2150 2005-04-15  Thomas Koenig  <Thomas.Koenig@online.de>
2151
2152         PR libfortran/18495
2153         * intrinsics/spread_generic.c (spread):  Remove const from
2154         return array descriptor.
2155         New variables: rrank (rank of return array),  rs (for
2156         calculating the size of the return array), srank (rank
2157         of the source array).
2158         Generate runtime error if the dim= argument is larger than
2159         the rank of the return array.
2160         Generate runtime error if the needed rank of the return
2161         array is larger than 7.
2162         If ret->data is null, populate the return array descriptor
2163         and initialize the variables for the actual operation.
2164         Otherwise, set ret->dim[0].stride to one if it is zero.
2165         Change second, independent use of variable dim to srank.
2166
2167 2005-04-12  Mike Stump  <mrs@apple.com>
2168
2169         * configure: Regenerate.
2170
2171 2005-04-13  Thomas Koenig  <Thomas.Koenig@online.de>
2172
2173         PR libfortran/19106
2174         * m4/iforeach.c (name`'rtype_qual`_'atype_code):  Add TODO
2175         that setting correct strides is a front end job.
2176         (`m'name`'rtype_qual`_'atype_code):  Likewise.  If mask has
2177         a lowest stride of 0, adjust to 1.
2178         * m4/ifunction.c (name`'rtype_qual`_'atype_code):  Add TODO
2179         that setting correct strides is a front end job.
2180         (`m'name`'rtype_qual`_'atype_code):  Likewise.  If mask has
2181         a lowest stride of 0, adjust to 1.
2182         * maxloc0_4_i4.c: Regenerated
2183         * maxloc0_4_i8.c: Regenerated
2184         * maxloc0_4_r4.c: Regenerated
2185         * maxloc0_4_r8.c: Regenerated
2186         * maxloc0_8_i4.c: Regenerated
2187         * maxloc0_8_i8.c: Regenerated
2188         * maxloc0_8_r4.c: Regenerated
2189         * maxloc0_8_r8.c: Regenerated
2190         * maxloc1_4_i4.c: Regenerated
2191         * maxloc1_4_i8.c: Regenerated
2192         * maxloc1_4_r4.c: Regenerated
2193         * maxloc1_4_r8.c: Regenerated
2194         * maxloc1_8_i4.c: Regenerated
2195         * maxloc1_8_i8.c: Regenerated
2196         * maxloc1_8_r4.c: Regenerated
2197         * maxloc1_8_r8.c: Regenerated
2198         * maxval_i4.c: Regenerated
2199         * maxval_i8.c: Regenerated
2200         * maxval_r4.c: Regenerated
2201         * maxval_r8.c: Regenerated
2202         * minloc0_4_i4.c: Regenerated
2203         * minloc0_4_i8.c: Regenerated
2204         * minloc0_4_r4.c: Regenerated
2205         * minloc0_4_r8.c: Regenerated
2206         * minloc0_8_i4.c: Regenerated
2207         * minloc0_8_i8.c: Regenerated
2208         * minloc0_8_r4.c: Regenerated
2209         * minloc0_8_r8.c: Regenerated
2210         * minloc1_4_i4.c: Regenerated
2211         * minloc1_4_i8.c: Regenerated
2212         * minloc1_4_r4.c: Regenerated
2213         * minloc1_4_r8.c: Regenerated
2214         * minloc1_8_i4.c: Regenerated
2215         * minloc1_8_i8.c: Regenerated
2216         * minloc1_8_r4.c: Regenerated
2217         * minloc1_8_r8.c: Regenerated
2218         * minval_i4.c: Regenerated
2219         * minval_i8.c: Regenerated
2220         * minval_r4.c: Regenerated
2221         * minval_r8.c: Regenerated
2222         * product_c4.c: Regenerated
2223         * product_c8.c: Regenerated
2224         * product_i4.c: Regenerated
2225         * product_i8.c: Regenerated
2226         * product_r4.c: Regenerated
2227         * product_r8.c: Regenerated
2228         * sum_c4.c: Regenerated
2229         * sum_c8.c: Regenerated
2230         * sum_i4.c: Regenerated
2231         * sum_i8.c: Regenerated
2232         * sum_r4.c: Regenerated
2233         * sum_r8.c: Regenerated
2234
2235 2005-04-10  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2236
2237         PR libfortran/20788
2238         * runtime/environ.c (init_unsigned_integer): Function for
2239         environment variables we want to be positive.
2240         (init_integer): Function to allow negative environment
2241         variables (e.g. for GFORTRAN_STDIN_UNIT).
2242
2243 2005-04-10  Thomas Koenig <Thomas.Koenig@online.de>
2244
2245         PR libfortran/17992
2246         PR libfortran/19568
2247         PR libfortran/19595
2248         PR libfortran/20005
2249         PR libfortran/20092
2250         PR libfortran/20131
2251         PR libfortran/20661
2252         PR libfortran/20744
2253         * io/transfer.c (top level): eor_condition: New static variable.
2254         (read_sf): Remove unnecessary zeroing of buffer (there is enough
2255         information in its length).
2256         Return a string of length 0 (to be padded by caller) if EOR was
2257         seen previously.
2258         Remove erroneous special casing of EOR for standard input.
2259         Set eor_condition for non-advancing I/O if an end of line was
2260         detected.
2261         Increment ioparm.size if necessary.
2262         (formatted_transfer):  Skip the function if there is an EOR condition.
2263         (data_transfer_init):  Initialize eor_condition to zero (false).
2264         (next_record_r):  Clear sf_seen_eor if a \n has been seen already.
2265         (finalize_transfer):  If there is an EOR condition, raise the error.
2266
2267 2005-04-09  Bud Davis  <bdavis@gfortran.org>
2268             Steven G. Kargl <kargls@comcast.net>
2269
2270         PR fortran/19872
2271         * io/transfer.c (data_transfer_init): truncate an existing
2272         file on the first write.
2273
2274 2005-04-09  Thomas Koenig  <Thomas.Koenig@online.de>
2275
2276         PR libfortran/19106
2277         PR libfortran/19014
2278         * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): ditto.
2279         If retarray->data is NULL (i.e. the front end does not
2280         know the rank and dimenson of the array), fill in its
2281         properties and allocate memory.
2282         Change the assertions about rank and dimension of retarray into
2283         runtime errors and only check them for retarray->data != NULL.
2284         Do the same for correcting the stride from 0 to 1 in retarray.
2285         (`m'name`'rtype_qual`_'atype_code): Likewise.
2286         * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Likewise.
2287         Change assertion about rank of array to runtime error.
2288         (`m'name`'rtype_qual`_'atype_code): Likewise.
2289         * generated/all_l4.c: Regenerated.
2290         * generated/all_l8.c: Regenerated.
2291         * generated/any_l4.c: Regenerated.
2292         * generated/any_l8.c: Regenerated.
2293         * generated/count_4_l4.c: Regenerated.
2294         * generated/count_4_l8.c: Regenerated.
2295         * generated/count_8_l4.c: Regenerated.
2296         * generated/count_8_l8.c: Regenerated.
2297         * generated/maxloc0_4_i4.c: Regenerated.
2298         * generated/maxloc0_4_i8.c: Regenerated.
2299         * generated/maxloc0_4_r4.c: Regenerated.
2300         * generated/maxloc0_4_r8.c: Regenerated.
2301         * generated/maxloc0_8_i4.c: Regenerated.
2302         * generated/maxloc0_8_i8.c: Regenerated.
2303         * generated/maxloc0_8_r4.c: Regenerated.
2304         * generated/maxloc0_8_r8.c: Regenerated.
2305         * generated/maxloc1_4_i4.c: Regenerated.
2306         * generated/maxloc1_4_i8.c: Regenerated.
2307         * generated/maxloc1_4_r4.c: Regenerated.
2308         * generated/maxloc1_4_r8.c: Regenerated.
2309         * generated/maxloc1_8_i4.c: Regenerated.
2310         * generated/maxloc1_8_i8.c: Regenerated.
2311         * generated/maxloc1_8_r4.c: Regenerated.
2312         * generated/maxloc1_8_r8.c: Regenerated.
2313         * generated/maxval_i4.c: Regenerated.
2314         * generated/maxval_i8.c: Regenerated.
2315         * generated/maxval_r4.c: Regenerated.
2316         * generated/maxval_r8.c: Regenerated.
2317         * generated/minloc0_4_i4.c: Regenerated.
2318         * generated/minloc0_4_i8.c: Regenerated.
2319         * generated/minloc0_4_r4.c: Regenerated.
2320         * generated/minloc0_4_r8.c: Regenerated.
2321         * generated/minloc0_8_i4.c: Regenerated.
2322         * generated/minloc0_8_i8.c: Regenerated.
2323         * generated/minloc0_8_r4.c: Regenerated.
2324         * generated/minloc0_8_r8.c: Regenerated.
2325         * generated/minloc1_4_i4.c: Regenerated.
2326         * generated/minloc1_4_i8.c: Regenerated.
2327         * generated/minloc1_4_r4.c: Regenerated.
2328         * generated/minloc1_4_r8.c: Regenerated.
2329         * generated/minloc1_8_i4.c: Regenerated.
2330         * generated/minloc1_8_i8.c: Regenerated.
2331         * generated/minloc1_8_r4.c: Regenerated.
2332         * generated/minloc1_8_r8.c: Regenerated.
2333         * generated/minval_i4.c: Regenerated.
2334         * generated/minval_i8.c: Regenerated.
2335         * generated/minval_r4.c: Regenerated.
2336         * generated/minval_r8.c: Regenerated.
2337         * generated/product_c4.c: Regenerated.
2338         * generated/product_c8.c: Regenerated.
2339         * generated/product_i4.c: Regenerated.
2340         * generated/product_i8.c: Regenerated.
2341         * generated/product_r4.c: Regenerated.
2342         * generated/product_r8.c: Regenerated.
2343         * generated/sum_c4.c: Regenerated.
2344         * generated/sum_c8.c: Regenerated.
2345         * generated/sum_i4.c: Regenerated.
2346         * generated/sum_i8.c: Regenerated.
2347         * generated/sum_r4.c: Regenerated.
2348         * generated/sum_r8.c: Regenerated.
2349
2350 2005-04-09  Thomas Koenig <Thomas.Koenig@online.de>
2351
2352         PR libfortran/20163
2353         * runtime/string.c (compare0): Use fstrlen() to
2354         strip trailing blanks from option string.
2355
2356 2005-04-09  Andrew Pinski  <pinskia@physics.uc.edu>
2357
2358         PR fortran/13257
2359         * format.c (parse_format_list): Allow an optional comma
2360         between descriptors.
2361
2362 2005-04-08  Eric Botcazou  <ebotcazou@libertysurf.fr>
2363
2364         * io/backspace.c (unformatted_backspace): Do not dereference
2365         the pointer to the stream.
2366
2367 2005-04-07  Andrew Pinski  <pinskia@physics.uc.edu>
2368
2369         PR libfortran/20766
2370         * configure.ac (extra_ldflags_libgfortran): Set for *-darwin* to
2371         "-Wl,-single_module".
2372         * configure: Regenerate.
2373         * Makefile.am (libgfortran_la_LDFLAGS): Add extra_ldflags_libgfortran.
2374         * Makefile.in: Regenerate.
2375
2376 2005-04-05  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2377
2378         PR libfortran/20755
2379         * write.c (write_float): A G edit descriptor may locally change
2380         the scale factor, but it needs to be restored afterwards.
2381
2382 2005-04-03  Dale Ranta  <dir@lanl.gov>
2383             Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2384
2385         PR libfortran/20068
2386         PR libfortran/20125
2387         PR libfortran/20156
2388         PR libfortran/20471
2389         * io/backspace.c (unformatted_backspace): Fix error in arithmetic.
2390         (st_backspace): When in WRITING mode, we flush and falling back
2391         into READING mode. In all cases, correctly position the stream.
2392
2393 2005-03-31  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2394
2395         PR libfortran/20660
2396         * io/inquire.c (inquire_via_unit): Non-opened units should still be
2397         reported by an INQUIRE statement as existing.
2398         * io/transfer.c (data_transfer_init): Never accept negative units.
2399
2400 2005-03-29  Dale Ranta  <dir@lanl.gov>
2401             Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2402
2403         PR libfortran/20163
2404         * io/open.c (st_open): call library_end() before returning even if
2405         an error arises.
2406
2407 2005-03-25  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2408
2409         PR libfortran/19678
2410         * list_read.c (next_char, eat_separator, finish_separator, read_real)
2411         (namelist_read): Add support for '\r' as well as '\n' as EOL
2412         character.
2413
2414         PR libfortran/19679
2415         * list_read.c (read_sf): Add a '\r' in a test to support DOS
2416         line-endings when line length is exceeded.
2417
2418 2005-03-25  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2419
2420         PR libfortran/15332
2421         * io/format.c (parse_format_list): format node for colon edit
2422         descriptor needs a repeat counter set to 1.
2423
2424 2005-02-24  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2425
2426         * config.h.in: Regenerate.
2427
2428 2005-02-23  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2429
2430         PR libfortran/18025
2431         * write.c (output_float): Handling the "F0.d" format similarly as
2432         commercial compilers.
2433
2434 2005-03-22  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2435
2436         * Makefile.am: Added new files.
2437         * Makefile.in: Regenerate.
2438         * aclocal.m4: Regenerate.
2439         * configure.ac: add checks for signal.h headers file, as well as
2440         following functions: chdir, strerror, getlogin, gethostname, kill,
2441         link, symlink, perror, sleep, time.
2442         * configure: Regenerate.
2443         * intrinsics/chdir.c, intrinsics/gerror.c, intrinsics/getlog.c,
2444         intrinsics/hostnm.c, intrinsics/ierrno.c, intrinsics/kill.c,
2445         intrinsics/link.c, intrinsics/perror.c, intrinsics/rename.c,
2446         intrinsics/sleep.c, intrinsics/symlnk.c, intrinsics/time.c: Newly
2447         implementend g77 intrinsics.
2448
2449 2005-03-21  Zack Weinberg  <zack@codesourcery.com>
2450
2451         * configure.ac: Do not invoke TL_AC_GCC_VERSION.
2452         In all substitutions, leave gcc_version to be expanded by the Makefile.
2453         * aclocal.m4, configure: Regenerate.
2454         * Makefile.am: Set gcc_version.
2455         * Makefile.in: Regenerate.
2456
2457 2005-03-16  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2458
2459         PR libfortran/20257
2460         * open.c (new_unit): set record length to max_offset rather than
2461           using a hard-coded limit (which was too low).
2462
2463 2005-03-16  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2464
2465         PR libfortran/20480
2466         * write.c (output_float): special check when writing 0.0 with
2467           EN and ES formats.
2468
2469 2005-03-11  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2470
2471         PR libfortran/20124
2472         * write.c (output_float): Adds a nzero_real variable to store
2473         the number of leading zeros whatever the format width is. Corrects
2474         the rounding of numbers less than 10^(-width). Fixes typo in an
2475         error message. Updates copyright years
2476
2477 2005-02-27  Toon Moene  <toon@moene.indiv.nluug.nl>
2478
2479         * runtime/environ.c: Update copyright years.
2480
2481 2005-02-27  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de>
2482
2483         * io/write.c: Update copyright years.
2484
2485 2005-02-27  Francois-Xavier Coudert  <coudert@clipper.ens.fr>
2486
2487         PR libfortran/20101
2488         * io/write.c (output_float): Added special check for value 0.0 in
2489         PE format.
2490
2491 2005-02-27  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de>
2492
2493         * io/write.c (output_float): Fix typo in condition.
2494
2495 2005-02-25  Peter O'Gorman  <peter@pogma.com>
2496             Toon Moene  <toon@moene.indiv.nluug.nl>
2497
2498         PR libfortran/17748
2499         * runtime/environ.c: Remove references to environ.
2500         (show_variables): remove GFORTRAN_UNBUFFERED_* and
2501         GFORTRAN_NAME_* because they require environ.
2502         (pattern_scan): Remove function.
2503
2504 2005-02-22  Paul Thomas <paulthomas2@wannado.fr>
2505             Bud Davis  <bdavis@gfortran.org>
2506
2507         * io/list_read.c (read_real): Handle separators properly
2508         in list directed read.
2509
2510 2005-02-21  Bud Davis  <bdavis@gfortran.org>
2511
2512         PR fortran/20086
2513         * io/transfer.c (write_constant_string): accept an 'h' as
2514         the start of a hollerith format string.
2515
2516 2005-02-21  Eric Botcazou  <ebotcazou@libertysurf.fr>
2517
2518         PR libfortran/19302
2519         * intrinsics/c99_functions.c (nextafterf): Special-case infinite
2520         numbers.
2521
2522 2005-02-21  Steven G. Kargl  <kargls@comcast.net>
2523
2524         * io/write.c (output_float):  Typo in error meesage.
2525
2526 2005-02-20  Steven G. Kargl  <kargls@comcast.net>
2527
2528         PR 20085
2529         * intrinsic/args.c (iargc): Off by 1.
2530
2531 2005-02-19  Steven G. Kargl  <kargls@comcast.net>
2532
2533         *  intrinsic/date_and_time.c: Fix conformance problems.
2534
2535 2005-02-01  Paul Thomas <paulthomas2@wanadoo.fr>
2536
2537         PR libfortran/19363
2538         PR libfortran/19691
2539         * libgfortran.h (isfinite): Work around broken isfinite(x) in Cygwin.
2540
2541 2005-01-30  Bud Davis  <bdavis@gfortran.org>
2542
2543         PR fortran/19647
2544         * io/inquire.c (inquire_via_unit): Use correct variable for
2545         pad.
2546
2547 2005-01-29  Thomas Koenig  <Thomas.Koenig@online.de>
2548
2549         PR libfortran/19595
2550         * io/transfer.c (data_transfer_init): eor requires advance="NO".
2551
2552 2005-01-25  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de>
2553
2554         PR libfortran/19524
2555         * io/read.c (read_f): Don't free uninitialized pointer.
2556
2557 2005-01-23  James A. Morrison  <phython@gcc.gnu.org>
2558         Paul Brook  <paul@codesourcery.com>
2559
2560         PR fortran/19294
2561         * Makefile.am: Add transpose_c4.c and transpose_c8.c.
2562         * intrinsics/cshift0.c: Use separate optimized loops for complex types.
2563         * m4/transpose.m4: Include type letter in function name.
2564         * Makefile.in: Regenerate.
2565         * generated/transpose_*.c: Regenerate.
2566
2567 2005-01-22  Thomas Koenig  <Thomas.Koenig@online.de>
2568
2569         PR libfortran/19451
2570         * io/transfer.c (finalize_transfer):  Don't do anything if
2571         there is an error condition.
2572
2573 2005-01-22  David Edelsohn  <edelsohn@gnu.org>
2574
2575         PR libfortran/19052
2576         * libgfortran.h (options_t): Add stderr_unit.
2577         * io/io.h (error_stream): Declare.
2578         * io/open.c (new_unit): Do not terminate abnormally if opening
2579         file preconnected to stdin, stdout, or stderr.
2580         * io/unit.c (init_units): Initialize stderr_unit.
2581         * io/unix.c (error_stream): New function.
2582         * runtime/environ.c (GFORTRAN_STDERR_UNIT): New environment variable.
2583
2584 2005-01-22  Thomas Koenig  <Thomas.Koenig@online.de>
2585
2586         PR libfortran/18982
2587         * io/unix.c (regular_file):  No need to change flags->action
2588         if an error occurs.  Document this.
2589         No need to call stat() for STATUS_OLD, open() will
2590         fail anyway.
2591         For ACTION_UNSPECIFIED, try open for read-write, then for
2592         read-only if open fails with EACCES, then for write-only
2593         if that fails with EACCES again.
2594         * io/unix.c (open_external): Document changed behavior of
2595         regular_file.
2596
2597 2005-01-22  Tobias Schl"uter  <tobias.schlueter@physik.uni-muenchen.de>
2598
2599         PR fortran/19194
2600         * io/io.h (st_parameter): Use 'GFC_INTEGER_4' instead of 'int',
2601         use CHARACTER macro for definition of string valued paramters.
2602
2603 2005-01-22  Bud Davis  <bdavis9659@comcast.net>
2604
2605         PR fortran/19314
2606         * io/inquire.c(inquire_via_unit): implement POSITION=.
2607         * io/transfer.c(next_record): update position for
2608         INQUIRE.
2609         * io/rewind.c(st_rewind): update position for
2610         INQUIRE.
2611
2612 2005-01-16  Bud Davis  <bdavis9659@comcast.net>
2613
2614         PR fortran/18778
2615         * io/transfer.c (us_read): no bytes available is not a
2616         runtime error.
2617
2618 2005-01-15  Bud Davis  <bdavis9659@comcast.net>
2619
2620         PR fortran/18983
2621         * io/transfer.c (st_write_done): only truncate when it
2622         is required.
2623
2624 2005-01-12  Toon Moene  <toon@moene.indiv.nluug.nl>
2625
2626         PR libfortran/19280
2627         c99_protos.h: License changed to GPL+exception.
2628         libgfortran.h: Ditto.
2629         intrinsics/abort.c: Ditto.
2630         intrinsics/args.c: Ditto.
2631         intrinsics/associated.c: Ditto.
2632         intrinsics/bessel.c: Ditto.
2633         intrinsics/c99_functions.c: Ditto.
2634         intrinsics/cpu_time.c: Ditto.
2635         intrinsics/cshift0.c: Ditto.
2636         intrinsics/date_and_time.c: Ditto.
2637         intrinsics/env.c: Ditto.
2638         intrinsics/eoshift0.c: Ditto.
2639         intrinsics/eoshift2.c: Ditto.
2640         intrinsics/erf.c: Ditto.
2641         intrinsics/etime.c: Ditto.
2642         intrinsics/exit.c: Ditto.
2643         intrinsics/flush.c: Ditto.
2644         intrinsics/fnum.c: Ditto.
2645         intrinsics/getXid.c: Ditto.
2646         intrinsics/getcwd.c: Ditto.
2647         intrinsics/ishftc.c: Ditto.
2648         intrinsics/mvbits.c: Ditto.
2649         intrinsics/pack_generic.c: Ditto.
2650         intrinsics/rand.c: Ditto.
2651         intrinsics/random.c: Ditto.
2652         intrinsics/reshape_generic.c: Ditto.
2653         intrinsics/reshape_packed.c: Ditto.
2654         intrinsics/size.c: Ditto.
2655         intrinsics/spread_generic.c: Ditto.
2656         intrinsics/stat.c: Ditto.
2657         intrinsics/string_intrinsics.c: Ditto.
2658         intrinsics/system.c: Ditto.
2659         intrinsics/system_clock.c: Ditto.
2660         intrinsics/transpose_generic.c: Ditto.
2661         intrinsics/umask.c: Ditto.
2662         intrinsics/unlink.c: Ditto.
2663         intrinsics/unpack_generic.c: Ditto.
2664         io/backspace.c: Ditto.
2665         io/close.c: Ditto.
2666         io/endfile.c: Ditto.
2667         io/format.c: Ditto.
2668         io/inquire.c: Ditto.
2669         io/io.h: Ditto.
2670         io/list_read.c: Ditto.
2671         io/lock.c: Ditto.
2672         io/open.c: Ditto.
2673         io/read.c: Ditto.
2674         io/rewind.c: Ditto.
2675         io/transfer.c: Ditto.
2676         io/unit.c: Ditto.
2677         io/unix.c: Ditto.
2678         io/write.c: Ditto.
2679         m4/all.m4: Ditto.
2680         m4/any.m4: Ditto.
2681         m4/cexp.m4: Ditto.
2682         m4/chyp.m4: Ditto.
2683         m4/count.m4: Ditto.
2684         m4/cshift1.m4: Ditto.
2685         m4/ctrig.m4: Ditto.
2686         m4/dotprod.m4: Ditto.
2687         m4/dotprodc.m4: Ditto.
2688         m4/dotprodl.m4: Ditto.
2689         m4/eoshift1.m4: Ditto.
2690         m4/eoshift3.m4: Ditto.
2691         m4/exponent.m4: Ditto.
2692         m4/fraction.m4: Ditto.
2693         m4/head.m4: Ditto.
2694         m4/iforeach.m4: Ditto.
2695         m4/ifunction.m4: Ditto.
2696         m4/in_pack.m4: Ditto.
2697         m4/in_unpack.m4: Ditto.
2698         m4/iparm.m4: Ditto.
2699         m4/matmul.m4: Ditto.
2700         m4/matmull.m4: Ditto.
2701         m4/maxloc0.m4: Ditto.
2702         m4/maxloc1.m4: Ditto.
2703         m4/maxval.m4: Ditto.
2704         m4/minloc0.m4: Ditto.
2705         m4/minloc1.m4: Ditto.
2706         m4/minval.m4: Ditto.
2707         m4/mtype.m4: Ditto.
2708         m4/nearest.m4: Ditto.
2709         m4/pow.m4: Ditto.
2710         m4/product.m4: Ditto.
2711         m4/reshape.m4: Ditto.
2712         m4/set_exponent.m4: Ditto.
2713         m4/shape.m4: Ditto.
2714         m4/specific.m4: Ditto.
2715         m4/specific2.m4: Ditto.
2716         m4/sum.m4: Ditto.
2717         m4/transpose.m4: Ditto.
2718         m4/types.m4: Ditto.
2719         runtime/environ.c: Ditto.
2720         runtime/error.c: Ditto.
2721         runtime/in_pack_generic.c: Ditto.
2722         runtime/in_unpack_generic.c: Ditto.
2723         runtime/main.c: Ditto.
2724         runtime/memory.c: Ditto.
2725         runtime/normalize.c: Ditto.
2726         runtime/pause.c: Ditto.
2727         runtime/select.c: Ditto.
2728         runtime/stop.c: Ditto.
2729         runtime/string.c: Ditto.
2730         generated/_abs_c4.f90: Regenerated.
2731         generated/_abs_c8.f90: Regenerated.
2732         generated/_abs_i4.f90: Regenerated.
2733         generated/_abs_i8.f90: Regenerated.
2734         generated/_abs_r4.f90: Regenerated.
2735         generated/_abs_r8.f90: Regenerated.
2736         generated/_acos_r4.f90: Regenerated.
2737         generated/_acos_r8.f90: Regenerated.
2738         generated/_aint_r4.f90: Regenerated.
2739         generated/_aint_r8.f90: Regenerated.
2740         generated/_anint_r4.f90: Regenerated.
2741         generated/_anint_r8.f90: Regenerated.
2742         generated/_asin_r4.f90: Regenerated.
2743         generated/_asin_r8.f90: Regenerated.
2744         generated/_atan2_r4.f90: Regenerated.
2745         generated/_atan2_r8.f90: Regenerated.
2746         generated/_atan_r4.f90: Regenerated.
2747         generated/_atan_r8.f90: Regenerated.
2748         generated/_conjg_c4.f90: Regenerated.
2749         generated/_conjg_c8.f90: Regenerated.
2750         generated/_cos_c4.f90: Regenerated.
2751         generated/_cos_c8.f90: Regenerated.
2752         generated/_cos_r4.f90: Regenerated.
2753         generated/_cos_r8.f90: Regenerated.
2754         generated/_cosh_r4.f90: Regenerated.
2755         generated/_cosh_r8.f90: Regenerated.
2756         generated/_dim_i4.f90: Regenerated.
2757         generated/_dim_i8.f90: Regenerated.
2758         generated/_dim_r4.f90: Regenerated.
2759         generated/_dim_r8.f90: Regenerated.
2760         generated/_exp_c4.f90: Regenerated.
2761         generated/_exp_c8.f90: Regenerated.
2762         generated/_exp_r4.f90: Regenerated.
2763         generated/_exp_r8.f90: Regenerated.
2764         generated/_log10_r4.f90: Regenerated.
2765         generated/_log10_r8.f90: Regenerated.
2766         generated/_log_c4.f90: Regenerated.
2767         generated/_log_c8.f90: Regenerated.
2768         generated/_log_r4.f90: Regenerated.
2769         generated/_log_r8.f90: Regenerated.
2770         generated/_mod_i4.f90: Regenerated.
2771         generated/_mod_i8.f90: Regenerated.
2772         generated/_mod_r4.f90: Regenerated.
2773         generated/_mod_r8.f90: Regenerated.
2774         generated/_sign_i4.f90: Regenerated.
2775         generated/_sign_i8.f90: Regenerated.
2776         generated/_sign_r4.f90: Regenerated.
2777         generated/_sign_r8.f90: Regenerated.
2778         generated/_sin_c4.f90: Regenerated.
2779         generated/_sin_c8.f90: Regenerated.
2780         generated/_sin_r4.f90: Regenerated.
2781         generated/_sin_r8.f90: Regenerated.
2782         generated/_sinh_r4.f90: Regenerated.
2783         generated/_sinh_r8.f90: Regenerated.
2784         generated/_sqrt_c4.f90: Regenerated.
2785         generated/_sqrt_c8.f90: Regenerated.
2786         generated/_sqrt_r4.f90: Regenerated.
2787         generated/_sqrt_r8.f90: Regenerated.
2788         generated/_tan_r4.f90: Regenerated.
2789         generated/_tan_r8.f90: Regenerated.
2790         generated/_tanh_r4.f90: Regenerated.
2791         generated/_tanh_r8.f90: Regenerated.
2792         generated/all_l4.c: Regenerated.
2793         generated/all_l8.c: Regenerated.
2794         generated/any_l4.c: Regenerated.
2795         generated/any_l8.c: Regenerated.
2796         generated/count_4_l4.c: Regenerated.
2797         generated/count_4_l8.c: Regenerated.
2798         generated/count_8_l4.c: Regenerated.
2799         generated/count_8_l8.c: Regenerated.
2800         generated/cshift1_4.c: Regenerated.
2801         generated/cshift1_8.c: Regenerated.
2802         generated/dotprod_c4.c: Regenerated.
2803         generated/dotprod_c8.c: Regenerated.
2804         generated/dotprod_i4.c: Regenerated.
2805         generated/dotprod_i8.c: Regenerated.
2806         generated/dotprod_l4.c: Regenerated.
2807         generated/dotprod_l8.c: Regenerated.
2808         generated/dotprod_r4.c: Regenerated.
2809         generated/dotprod_r8.c: Regenerated.
2810         generated/eoshift1_4.c: Regenerated.
2811         generated/eoshift1_8.c: Regenerated.
2812         generated/eoshift3_4.c: Regenerated.
2813         generated/eoshift3_8.c: Regenerated.
2814         generated/exp_c4.c: Regenerated.
2815         generated/exp_c8.c: Regenerated.
2816         generated/exponent_r4.c: Regenerated.
2817         generated/exponent_r8.c: Regenerated.
2818         generated/fraction_r4.c: Regenerated.
2819         generated/fraction_r8.c: Regenerated.
2820         generated/hyp_c4.c: Regenerated.
2821         generated/hyp_c8.c: Regenerated.
2822         generated/in_pack_i4.c: Regenerated.
2823         generated/in_pack_i8.c: Regenerated.
2824         generated/in_unpack_i4.c: Regenerated.
2825         generated/in_unpack_i8.c: Regenerated.
2826         generated/matmul_c4.c: Regenerated.
2827         generated/matmul_c8.c: Regenerated.
2828         generated/matmul_i4.c: Regenerated.
2829         generated/matmul_i8.c: Regenerated.
2830         generated/matmul_l4.c: Regenerated.
2831         generated/matmul_l8.c: Regenerated.
2832         generated/matmul_r4.c: Regenerated.
2833         generated/matmul_r8.c: Regenerated.
2834         generated/maxloc0_4_i4.c: Regenerated.
2835         generated/maxloc0_4_i8.c: Regenerated.
2836         generated/maxloc0_4_r4.c: Regenerated.
2837         generated/maxloc0_4_r8.c: Regenerated.
2838         generated/maxloc0_8_i4.c: Regenerated.
2839         generated/maxloc0_8_i8.c: Regenerated.
2840         generated/maxloc0_8_r4.c: Regenerated.
2841         generated/maxloc0_8_r8.c: Regenerated.
2842         generated/maxloc1_4_i4.c: Regenerated.
2843         generated/maxloc1_4_i8.c: Regenerated.
2844         generated/maxloc1_4_r4.c: Regenerated.
2845         generated/maxloc1_4_r8.c: Regenerated.
2846         generated/maxloc1_8_i4.c: Regenerated.
2847         generated/maxloc1_8_i8.c: Regenerated.
2848         generated/maxloc1_8_r4.c: Regenerated.
2849         generated/maxloc1_8_r8.c: Regenerated.
2850         generated/maxval_i4.c: Regenerated.
2851         generated/maxval_i8.c: Regenerated.
2852         generated/maxval_r4.c: Regenerated.
2853         generated/maxval_r8.c: Regenerated.
2854         generated/minloc0_4_i4.c: Regenerated.
2855         generated/minloc0_4_i8.c: Regenerated.
2856         generated/minloc0_4_r4.c: Regenerated.
2857         generated/minloc0_4_r8.c: Regenerated.
2858         generated/minloc0_8_i4.c: Regenerated.
2859         generated/minloc0_8_i8.c: Regenerated.
2860         generated/minloc0_8_r4.c: Regenerated.
2861         generated/minloc0_8_r8.c: Regenerated.
2862         generated/minloc1_4_i4.c: Regenerated.
2863         generated/minloc1_4_i8.c: Regenerated.
2864         generated/minloc1_4_r4.c: Regenerated.
2865         generated/minloc1_4_r8.c: Regenerated.
2866         generated/minloc1_8_i4.c: Regenerated.
2867         generated/minloc1_8_i8.c: Regenerated.
2868         generated/minloc1_8_r4.c: Regenerated.
2869         generated/minloc1_8_r8.c: Regenerated.
2870         generated/minval_i4.c: Regenerated.
2871         generated/minval_i8.c: Regenerated.
2872         generated/minval_r4.c: Regenerated.
2873         generated/minval_r8.c: Regenerated.
2874         generated/nearest_r4.c: Regenerated.
2875         generated/nearest_r8.c: Regenerated.
2876         generated/pow_c4_i4.c: Regenerated.
2877         generated/pow_c4_i8.c: Regenerated.
2878         generated/pow_c8_i4.c: Regenerated.
2879         generated/pow_c8_i8.c: Regenerated.
2880         generated/pow_i4_i4.c: Regenerated.
2881         generated/pow_i4_i8.c: Regenerated.
2882         generated/pow_i8_i4.c: Regenerated.
2883         generated/pow_i8_i8.c: Regenerated.
2884         generated/pow_r4_i4.c: Regenerated.
2885         generated/pow_r4_i8.c: Regenerated.
2886         generated/pow_r8_i4.c: Regenerated.
2887         generated/pow_r8_i8.c: Regenerated.
2888         generated/product_c4.c: Regenerated.
2889         generated/product_c8.c: Regenerated.
2890         generated/product_i4.c: Regenerated.
2891         generated/product_i8.c: Regenerated.
2892         generated/product_r4.c: Regenerated.
2893         generated/product_r8.c: Regenerated.
2894         generated/reshape_i4.c: Regenerated.
2895         generated/reshape_i8.c: Regenerated.
2896         generated/set_exponent_r4.c: Regenerated.
2897         generated/set_exponent_r8.c: Regenerated.
2898         generated/shape_i4.c: Regenerated.
2899         generated/shape_i8.c: Regenerated.
2900         generated/sum_c4.c: Regenerated.
2901         generated/sum_c8.c: Regenerated.
2902         generated/sum_i4.c: Regenerated.
2903         generated/sum_i8.c: Regenerated.
2904         generated/sum_r4.c: Regenerated.
2905         generated/sum_r8.c: Regenerated.
2906         generated/transpose_i4.c: Regenerated.
2907         generated/transpose_i8.c: Regenerated.
2908         generated/trig_c4.c: Regenerated.
2909         generated/trig_c8.c: Regenerated.
2910
2911 2005-01-07  Bud Davis  <bdavis9659@comcast.net>
2912
2913         PR fortran/18398
2914         * transfer.c (next_record_r): always skip the
2915         eol search if it was found during sf_read.
2916
2917 \f
2918 Copyright (C) 2005 Free Software Foundation, Inc.
2919
2920 Copying and distribution of this file, with or without modification,
2921 are permitted in any medium without royalty provided the copyright
2922 notice and this notice are preserved.