OSDN Git Service

* g++.dg/cast.C: Change fields of structures to "long" to pass
[pf3gnuchains/gcc-fork.git] / libgfortran / ChangeLog
1 2010-08-07  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
2
3         PR libfortran/45143
4         * io/format.c: Remove fnode storage structure definitions, moving these
5         to format.h. (parse_format_list): Add check for data descriptors,
6         taking care of nested formats. Adjust calling parameters to pass a
7         check flag. (parse_format): Likewise.
8         * io/format.h: Add structures moved from format.c.
9         
10 2010-08-02  Janne Blomqvist  <jb@gcc.gnu.org>
11
12         * io/unit.c (update_position): Don't update the position flag for
13         non-seekable files, check for stell() error.
14
15 2010-08-01  Janne Blomqvist  <jb@gcc.gnu.org>
16
17         * io/unix.c (file_exists): Use access(2) instead of stat(2) to
18         test file existence.
19         (fallback_access): Move up in file, implement F_OK.
20
21 2010-07-31  David Edelsohn  <edelsohn@gnu.org>
22
23         * io/inquire.c: Include io.h before string.h.
24
25 2010-07-28  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
26
27         PR libfortran/44931
28         * io/inquire.c (inquire_via_unit): Use ttyname to return actual device
29         file name for stdin, stdout, and stderr.  If ttyname does not succeed
30         fall back to default names for these units. Include string.h to allow
31         using strlen function.
32         * unix.c: Remove typedef of unix_stream structure, move to unix.h.
33         * unix.h: Add typedef of unix_stream structure so that it is
34         accessible to inquire.c.
35
36 2010-07-19  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
37
38         PR libfortran/44953
39         * io/unix.c (mem_alloc_w4): Return gfc_char4_t instead of char type
40         pointer. (mem_write4): Remove cast to gfc_char4_t.
41         * io/transfer.c (write_block): Use a gfc_char4_t pointer.
42         (memset4): New helper function. (next_record_w): Use new helper
43         function rather than sset for internal units.  Don't attempt to pad
44         with spaces if it is not needed.
45         * io/unix.h: Update prototype for mem_alloc_w4.
46         * io/write.c (memset4): Use gfc_char4_t pointer and chracter type.
47         Don't use multiply by 4 to compute offset. (memcpy4): Likewise.
48         (write_default_char4): Use a gfc_char4_t pointer and update memset4
49         and memcpy calls. (write_a): Likewise. (write_l): Likewise.
50         (write_boz): Likewise. (write_decimal): Likewise. (write_x): Likewise.
51         (write_char): Add support for character(kind=4) internal units that
52         was previously missed. (write_integer): Use a gfc_char4_t pointer and
53         update memset4 and memcpy calls. (write_character): Likewise.
54         (write_separator): Add support for character(kind=4) internal units
55         that was previously missed.
56         * write_float.def (output_float): Use a gfc_char4_t pointer and
57         update memset4 and memcpy calls. (write_infnan): Likewise.
58         (output_float_FMT_G_): Likewise.
59
60 2010-07-16  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
61
62         PR libfortran/37077
63         * io/read.c (read_default_char4): Add support for reading into a
64         kind-4 character variable from a character(kind=4) internal unit.
65         * io/io.h (read_block_form4): Add prototype.
66         * io/unit.c (get_internal_unit): Add call to fbuf_init.
67         (free_internal_unit): Add call to fbuf_destroy. (get_unit): Fix
68         whitespace.
69         * io/transfer.c (read_sf_internal): Use fbuf_alloc to allocate a string
70         to recieve the wide characters translated to single byte chracters.
71         (read_block_form): Fix whitespace. (read_block_form4): New function to
72         read from a character(kind=4) internal unit into a character(kind=4)
73         variable. (read_block_direct): Fix whitespace. (write_block): Fix
74         whitespace. (formatted_transfer_scalar_read): Likewise.
75         (formatted_transfer_scalar_write): Likewise.
76         * io/write.c (write_character): Add support for list directed write of
77         a kind=1 character string to a character(kind=4) internal unit.
78
79 2010-07-14  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
80
81         PR libfortran/44934
82         * io/file_pos.c (st_endfile): Correctly set unit flags for form.
83         * io/transfer.c (data_transfer_init): Fix indentation of whitespace.
84
85 2010-07-12  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
86
87         PR libfortran/37077
88         * io/read.c: Fix comment.
89         * io/io.h (is_char4_unit): New macro.
90         * io/unit.c (get_internal_unit): Call new function open_internal4.
91         * io/unix.c (mem_alloc_r4): New function. (mem_alloc_w4): New function.
92         (mem_read4): New function, temporary stub. (mem_write4): New function.
93         (open_internal4): New function to set stream pointers to use the new
94         mem functions.
95         * io/transfer.c (write_block): Use new mem_alloc_w4 to access internal
96         units of kind=4.
97         * io/unix.h: Add prototypes for open_internal4, mem_alloc_w4, and
98         mem_alloc_r4.
99         * io/write.c (memset4): New helper function. (memcpy4): New helper
100         function. (write_default_char4): Use new helper functions.
101         (write_a): Likewise. (write_l): Likewise. (write_boz): Likewise.
102         (write_decimal): Likewise. (write_x): Likewise.
103         (write_integer): Likewise.
104         * io/write_float.def (output_float): Add code blocks to handle internal
105         unit kind=4 output utilizing gfc_char4_t pointers. (write_infnan): Use
106         new helper functions. (OUTPUT_FLOAT_FMT_G): Update this macro likewise.
107
108 2010-07-12  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
109
110         * config/fpu-387.h [__sun__ && __svr4__] Include <signal.h>,
111         <ucontext.h>.
112         (sigill_caught): New.
113         (sigill_hdlr): New function
114         (has_sse) [__sun__ && __svr4__]: Check if SSE instruction causes
115         SIGILL.
116
117 2010-07-11  Kai Tietz  <kai.tietz@onevision.com>
118
119         PR libfortran/44698
120         * io/unix.c (flush_buf): Add _commit for WIN32.
121
122 2010-06-28  Tobias Burnus  <burnus@net-b.de>
123
124         PR fortran/43298
125         * list_read.c (parse_real): Do not pass (..) on for NAN(..).
126         * read.c (convert_real): Fix comment about NAN/INF.
127
128 2010-07-02  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
129
130         * configure.ac (gfortran_use_symver): Only check for Sun-style symbol
131         versioning on Solaris 2.
132         * configure: Regenerate.
133
134 2010-07-02  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
135
136         * configure.ac: Check for Sun symbol versioning.
137         * configure: Regenerate.
138
139         * Makefile.am [LIBGFOR_USE_SYMVER]: Protect version_arg with
140         LIBGFOR_USE_SYMVER_GNU.
141         Add version_dep.
142         [LIBGFOR_USE_SYMVER_SUN]: Handle Sun symbol versioning.
143         [!LIBGFOR_USE_SYMVER]: Add version_dep.
144         (libgfortran_la_DEPENDENCIES): Set to $(version_dep).
145         * Makefile.in: Regenerate.
146
147 2010-06-29  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
148
149         PR libfortran/43298
150         * io/read.c: Add code to parse and read Inf, Infinity, NaN, and Nan with
151         optional parenthesis.
152
153 2010-06-28  Tobias Burnus  <burnus@net-b.de>
154
155         PR fortran/43298
156         * list_read.c (parse_real, read_real): Support NAN(alphanum).
157
158 2010-06-25  Tobias Burnus  <burnus@net-b.de>
159
160         * intrinsics/selected_real_kind.f90
161         (_gfortran_selected_real_kind2008): Add function.
162         (_gfortran_selected_real_kind): Stub which calls
163         _gfortran_selected_real_kind2008.
164         * gfortran.map (GFORTRAN_1.4): Add
165         _gfortran_selected_real_kind2008.
166         * mk-srk-inc.sh: Save also RADIX.
167
168 2010-06-25  Tobias Burnus  <burnus@net-b.de>
169
170         * runtime/compile_options.c (init_compile_options): Update
171         compile_options.allow_std for GFC_STD_F2008_OBS.
172         * io/transfer.c (formatted_transfer_scalar_read,
173         formatted_transfer_scalar_write): Fix allow_std check.
174         * io/list_read.c (nml_parse_qualifier): Ditto.
175
176 2010-06-18  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
177
178         PR libfortran/44477
179         * io/file_pos.c (st_endfile): Add check for ENDFILE when file is
180         already positioned after the EOF marker. Use find_or_create_unit
181         instead of find_unit. If unit is not connected, connect it and create 
182         the file with default settings.
183         * io/transfer.c (data_transfer_init):  Add check for attempted READ or
184         WRITE when file is already positioned after the EOF marker.
185
186 2010-06-10  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
187
188         * intrinsics/selected_char_kind.c (selected_char_kind): Fix
189         return value for ISO_10646.
190
191 2010-06-09  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
192
193         * mk-kinds-h.sh: Define GFC_REAL_*_LITERAL_SUFFIX and
194         GFC_REAL_*_LITERAL macros for each kind.
195         * intrinsics/cpu_time.c (cpu_time_4, cpu_time_8, cpu_time_10,
196         cpu_time_16): Use them.
197         * intrinsics/random.c (rnumber_4, rnumber_8, rnumber_10,
198         rnumber_16): Likewise.
199
200 2010-06-09  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
201
202         * intrinsics/system_clock.c (system_clock_4, system_clock_8):
203         Undefine TCK.
204
205 2010-06-04  Thomas Koenig  <tkoenig@gcc.gnu.org>
206
207         PR libfortran/34670
208         * intrinsics/date_and_time.c:  Replace assert with runtime_error
209         when VALUE is too small.
210
211 2010-05-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
212
213         PR fortran/43851
214         * runtime/stop.c (stop_string): Make sure nothing is emitted for
215         blank stop.
216
217 2010-05-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
218
219         PR fortran/43851
220         * runtime/stop.c (error_stop_numeric): New function and updated comment.
221         Add declaration for stop_numeric and remove declaration for stop_string.
222         (stop_string): Use for blank STOP.
223         (stop_numeric): Remove use of special -1 stop code.
224         * runtime/pause.c (do_pause): Use stop_string for blank stop.
225         (pause_numeric): Remove use of special -1 pause code.
226         * gfortran.map: Add new symbol to run-time library.
227         * libgfortran.h: Move declaration for stop_string to here to make
228         function visible for do_pause. Remove declaration for stop_numeric.
229
230 2010-05-08  Janne Blomqvist  <jb@gcc.gnu.org>
231
232         * io/unix.h (mem_alloc_r): Fix typo to reduce visibility.
233
234 2010-05-07  Janne Blomqvist  <jb@gcc.gnu.org>
235
236         * libgfortran.h (free_mem): Remove prototype.
237         * runtime/memory.c (free_mem): Remove function.
238         * intrinsics/date_and_time.c (secnds): Replace free_mem() with
239         free().
240         * io/fbuf.c (fbuf_destroy): Likewise.
241         * io/format.c (free_format_hash_table): Likewise.
242         (save_parsed_format): Likewise.
243         (free_format_data): Likewise.
244         * io/list_read.c (free_saved): Likewise.
245         (free_line): Likewise.
246         (nml_touch_nodes): Likewise.
247         (nml_read_obj): Likewise
248         * io/lock.c (free_ionml): Likewise.
249         * io/open.c (new_unit): Likewise.
250         (already_open): Likewise.
251         * io/unit.c (destroy_unit_mutex): Likewise.
252         (free_internal_unit): Likewise.
253         (close_unit_1): Likewise.
254         * io/unix.c (raw_close): Likewise.
255         (buf_close): Likewise.
256         (mem_close): Likewise.
257         (tempfile): Likewise.
258         * io/write.c (nml_write_obj): Likewise.
259         * io/write_float.def (output_float_FMT_G_##): Likewise.
260         * runtime/error.c (show_locus): Likewise.
261
262 2010-05-04  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
263
264         PR other/43620
265         * configure.ac (AM_INIT_AUTOMAKE): Add no-dist.
266         * configure: Regenerate.
267         * Makefile.in: Regenerate.
268
269 2010-04-30  Kai Tietz  <kai.tietz@onevision.com>
270
271         PR/43844
272         * io/unix.c (raw_truncate): Explicit cast from integer-scalar
273         to pointer.
274         (tempfile): Use for mingw GetTempPath and avoid double slash
275         for path.
276
277 2010-04-24  Kai Tietz  <kai.tietz@onevision.com>
278
279         PR/43844
280         * io/unix.c (tempfile): Correct logic for mktemp case.
281
282 2010-04-06  Tobias Burnus  <burnus@net-b.de>
283
284         PR fortran/39997
285         * runtime/stop.c (error_stop_string): New function.
286         * gfortran.map (_gfortran_error_stop_string): Add.
287
288 2010-04-02  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
289
290         * Makefile.in: Regenerate.
291         * aclocal.m4: Regenerate.
292
293 2010-04-01  Janne Blomqvist  <jb@gcc.gnu.org>
294
295         PR libfortran/43605
296         * io/intrinsics.c (gf_ftell): New function, seek to correct offset.
297         (ftell): Call gf_ftell.
298         (FTELL_SUB): Likewise.
299
300 2010-04-01  Paul Thomas  <pault@gcc.gnu.org>
301
302         * io/transfer.c : Update copyright.
303         * io/unix.c : ditto
304         * io/read.c : ditto
305         * io/io.h : ditto
306         * io/unix.h : ditto
307         * io/inquire.c : ditto
308         * io/format.c : ditto
309         * io/list_read.c : ditto
310         * runtime/error.c : ditto
311         * libgfortran.h : ditto
312         * intrinsics/date_and_time.c: ditto
313         * intrinsics/args.c : ditto
314
315 2010-04-01  Janne Blomqvist  <jb@gcc.gnu.org>
316
317         PR libfortran/43605
318         * io/intrinsics.c (ftell): Reset fbuf, correct offset.
319         (FTELL_SUB): Likewise.
320
321 2010-03-29  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
322
323         PR libfortran/43265
324         * io/transfer.c (next_record_r): Only call hit_eof for specific
325         conditions when an EOF is encountered.
326
327 2010-03-29  Tobias Burnus  <burnus@net-b.de>
328
329         PR fortran/43551
330         * io/unix.c (buf_write): Set physical_offset after lseek.
331
332 2010-03-25  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
333
334         PR libfortran/43517
335         * io/read.c (read_x): Return if seen EOR condition.
336
337 2010-03-21  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
338
339         PR fortran/43409
340         * io/io.h: Fix type of size in st_parameter_inquire structure.
341
342 2010-03-20  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
343
344         PR fortran/43409
345         * io/unix.h: Add prototype for new function to return file size.
346         * io/unix.c (file_size): New function.
347         * io/inquire.c (inquire_via_unit): Use new function.
348         (inquire_via_filename): Use new function.
349
350 2010-03-17  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
351
352         * io/transfer.c (read_sf_internal): Remove stray function declaration
353         used during debugging.
354
355 2010-03-17  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
356
357         PR libfortran/43265
358         * io/io.h: Delete prototype for read_sf, making it static.
359         * io/read.c (read_x): Modify to call hit_eof if PAD="no".
360         * io/transfer.c (read_sf_internal): New static function extracted from
361         read_sf for use on internal units only. Handle empty string case.
362         (read_sf): New factoring of this function, make it static.  Add special
363         conditions for EOF based on ADVANCE="no", PAD="no", and whether any
364         bytes have been previously read from the record.
365         (read_block_form): Modify to call read_sf or read_sf_internal.
366         (next_record_r): Add a done flag similar to next_record_w. Call hit_eof
367         if internal array unit next record returns finished, meaning an EOF was
368         found and not done, ie not the last record expected.  For external
369         units call hit_eof if item_count is 1 or there are no pending spaces.
370         (next_record): Update call to next_record_r.
371
372 2010-03-12  Kai Tietz  <kai.tietz@onevision.com>
373
374         PR/42950
375         * io/format.c (parse_format_list): Add to ERROR, WARNING,
376         SILENT enumerators NOTIFICATION_ prefix.
377         * runtime/error.c (notification_std): Likewise.
378         * libgfortran.h (notification): Likewise.
379         (GFC_LARGEST_BUF): Check for HAVE_GFC_INTEGER_16.
380
381 2010-03-11  Tobias Burnus  <burnus@net-b.de>
382
383         PR fortran/43228
384         * io/list_read.c (nml_parse_qualifier): Disable expanded_read
385         for array sections.
386
387 2010-03-10  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
388
389         PR libfortran/43320
390         * io/transfer.c (next_record_r): Add hit_eof based on item_count
391         condition.
392
393 2010-03-09  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
394
395         PR libfortran/43265
396         * io/read.c: Include fbuf.h and unix.h to enable lower level I/O for
397         read_x. (read_x): Replace the use of read_sf with equivalent lower level
398         I/O, eliminating unneeded code and handling EOF and EOR conditions.
399         * io/io.h: Revise prototype for read_sf.
400         * io/transfer.c (read_sf): Delete no_error parameter and all uses of it.
401         (read_block_form): Likewise.
402         (next_record_r): Delete wrong code call to hit_eof.
403
404 2010-03-08  Kai TIetz  <kai.tietz@onevision.com>
405
406         PR/42950
407         * libgfortran.h (_POSIX): Define if __MINGW32__ is defined.
408         (gfc_printf): Define to gnu_printf for __MINGW32__ case,
409         otherwise to __printf__.
410         (gfc_strtof,gfc_strtod,gfc_strtold): Define for mingw case
411         to POSIX compatible converter functions.
412         (runtime_error): Use instead gfc_printf as formatter
413         attribute name.
414         (runtime_error_at): Likewise.
415         (runtime_warning_at): Likewise.
416         (st_printf): Likewise.
417         * intrinsics/date_and_time.c (localtime_r): Undefine
418         possible defined macro.
419         (gmtime_r): Likewise.
420         * io/read.c (convert_real): Use gfc_strtof, gfc_strtod,
421         and gfc_strtold.
422
423 2010-02-24  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
424
425         PR libfortran/43155
426         * io/transfer.c (require_type): Subtract one from item_count for output
427         of error message.  Add comment before formatted_transfer function
428         explaining why the item_count is off by one.
429
430 2010-02-24  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
431
432         * io/write_float.def (WRITE_FLOAT): Use __builtin_signbit.
433
434 2010-02-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
435
436         * io/list_read.c (list_formatted_read_scalar): Remove duplicate code.
437
438 2010-02-09  Tobias Burnus  <burnus@net-b.de>
439
440         PR fortran/42996
441         * intrinsics/args.c (get_command_argument_i4): Always return
442         commandline-argument length for length parameter.
443
444 2010-02-06  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
445
446         PR libfortran/42742
447         * io/format.c (reset_fnode_counters): Use the correct pointer to the
448         head of the fnode list. (parse_format): Remove previous hack that set
449         limit on size of format string for caching.
450
451 2010-02-06  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
452
453         PR libfortran
454         * io/transfer.c (read_sf): Handle EOR and EOF conditions for
455         ADVANCE="no" with PAD="yes" or PAD="no".
456
457 2010-02-03  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
458
459         PR libfortran/42901
460         * io/list_read.c (nml_get_obj_data): Add new qualifier flag, clean up
461         code, and adjust logic to set namelist info pointer correctly for array
462         qualifiers of derived type components.
463
464 2010-01-15  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
465
466         PR libfortran/42742
467         * io/format.c (parse_format): Set limit on size of format strings that
468         will be cached.
469
470 2010-01-05  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
471
472         * configure: Regenerate.
473
474 2010-01-03  Janne Blomqvist  <jb@gcc.gnu.org>
475
476         PR libfortran/42420
477         * io/unix.c: Defines for MINGW stat and fstat.
478         (gfstat_t): New typedef.
479         (id_from_fd): Use gfstat_t instead of struct stat.
480         (fd_to_stream): Likewise.
481         (compare_file_filename): Likewise.
482         (find_file): Likewise.
483         (file_exists): Likewise.
484         (inquire_sequential): Likewise.
485         (inquire_direct): Likewise.
486         (inquire_formatted): Likewise.
487
488 \f
489 Copyright (C) 2010 Free Software Foundation, Inc.
490
491 Copying and distribution of this file, with or without modification,
492 are permitted in any medium without royalty provided the copyright
493 notice and this notice are preserved.