OSDN Git Service

2010-06-28 Tobias Burnus <burnus@net-b.de>
[pf3gnuchains/gcc-fork.git] / libgfortran / ChangeLog
1 2010-06-28  Tobias Burnus  <burnus@net-b.de>
2
3         PR fortran/43298
4         * list_read.c (parse_real, read_real): Support NAN(alphanum).
5
6 2010-06-25  Tobias Burnus  <burnus@net-b.de>
7
8         * intrinsics/selected_real_kind.f90
9         (_gfortran_selected_real_kind2008): Add function.
10         (_gfortran_selected_real_kind): Stub which calls
11         _gfortran_selected_real_kind2008.
12         * gfortran.map (GFORTRAN_1.4): Add
13         _gfortran_selected_real_kind2008.
14         * mk-srk-inc.sh: Save also RADIX.
15
16 2010-06-25  Tobias Burnus  <burnus@net-b.de>
17
18         * runtime/compile_options.c (init_compile_options): Update
19         compile_options.allow_std for GFC_STD_F2008_OBS.
20         * io/transfer.c (formatted_transfer_scalar_read,
21         formatted_transfer_scalar_write): Fix allow_std check.
22         * io/list_read.c (nml_parse_qualifier): Ditto.
23
24 2010-06-18  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
25
26         PR libfortran/44477
27         * io/file_pos.c (st_endfile): Add check for ENDFILE when file is
28         already positioned after the EOF marker. Use find_or_create_unit
29         instead of find_unit. If unit is not connected, connect it and create 
30         the file with default settings.
31         * io/transfer.c (data_transfer_init):  Add check for attempted READ or
32         WRITE when file is already positioned after the EOF marker.
33
34 2010-06-10  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
35
36         * intrinsics/selected_char_kind.c (selected_char_kind): Fix
37         return value for ISO_10646.
38
39 2010-06-09  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
40
41         * mk-kinds-h.sh: Define GFC_REAL_*_LITERAL_SUFFIX and
42         GFC_REAL_*_LITERAL macros for each kind.
43         * intrinsics/cpu_time.c (cpu_time_4, cpu_time_8, cpu_time_10,
44         cpu_time_16): Use them.
45         * intrinsics/random.c (rnumber_4, rnumber_8, rnumber_10,
46         rnumber_16): Likewise.
47
48 2010-06-09  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
49
50         * intrinsics/system_clock.c (system_clock_4, system_clock_8):
51         Undefine TCK.
52
53 2010-06-04  Thomas Koenig  <tkoenig@gcc.gnu.org>
54
55         PR libfortran/34670
56         * intrinsics/date_and_time.c:  Replace assert with runtime_error
57         when VALUE is too small.
58
59 2010-05-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
60
61         PR fortran/43851
62         * runtime/stop.c (stop_string): Make sure nothing is emitted for
63         blank stop.
64
65 2010-05-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
66
67         PR fortran/43851
68         * runtime/stop.c (error_stop_numeric): New function and updated comment.
69         Add declaration for stop_numeric and remove declaration for stop_string.
70         (stop_string): Use for blank STOP.
71         (stop_numeric): Remove use of special -1 stop code.
72         * runtime/pause.c (do_pause): Use stop_string for blank stop.
73         (pause_numeric): Remove use of special -1 pause code.
74         * gfortran.map: Add new symbol to run-time library.
75         * libgfortran.h: Move declaration for stop_string to here to make
76         function visible for do_pause. Remove declaration for stop_numeric.
77
78 2010-05-08  Janne Blomqvist  <jb@gcc.gnu.org>
79
80         * io/unix.h (mem_alloc_r): Fix typo to reduce visibility.
81
82 2010-05-07  Janne Blomqvist  <jb@gcc.gnu.org>
83
84         * libgfortran.h (free_mem): Remove prototype.
85         * runtime/memory.c (free_mem): Remove function.
86         * intrinsics/date_and_time.c (secnds): Replace free_mem() with
87         free().
88         * io/fbuf.c (fbuf_destroy): Likewise.
89         * io/format.c (free_format_hash_table): Likewise.
90         (save_parsed_format): Likewise.
91         (free_format_data): Likewise.
92         * io/list_read.c (free_saved): Likewise.
93         (free_line): Likewise.
94         (nml_touch_nodes): Likewise.
95         (nml_read_obj): Likewise
96         * io/lock.c (free_ionml): Likewise.
97         * io/open.c (new_unit): Likewise.
98         (already_open): Likewise.
99         * io/unit.c (destroy_unit_mutex): Likewise.
100         (free_internal_unit): Likewise.
101         (close_unit_1): Likewise.
102         * io/unix.c (raw_close): Likewise.
103         (buf_close): Likewise.
104         (mem_close): Likewise.
105         (tempfile): Likewise.
106         * io/write.c (nml_write_obj): Likewise.
107         * io/write_float.def (output_float_FMT_G_##): Likewise.
108         * runtime/error.c (show_locus): Likewise.
109
110 2010-05-04  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
111
112         PR other/43620
113         * configure.ac (AM_INIT_AUTOMAKE): Add no-dist.
114         * configure: Regenerate.
115         * Makefile.in: Regenerate.
116
117 2010-04-30  Kai Tietz  <kai.tietz@onevision.com>
118
119         PR/43844
120         * io/unix.c (raw_truncate): Explicit cast from integer-scalar
121         to pointer.
122         (tempfile): Use for mingw GetTempPath and avoid double slash
123         for path.
124
125 2010-04-24  Kai Tietz  <kai.tietz@onevision.com>
126
127         PR/43844
128         * io/unix.c (tempfile): Correct logic for mktemp case.
129
130 2010-04-06  Tobias Burnus  <burnus@net-b.de>
131
132         PR fortran/39997
133         * runtime/stop.c (error_stop_string): New function.
134         * gfortran.map (_gfortran_error_stop_string): Add.
135
136 2010-04-02  Ralf Wildenhues  <Ralf.Wildenhues@gmx.de>
137
138         * Makefile.in: Regenerate.
139         * aclocal.m4: Regenerate.
140
141 2010-04-01  Janne Blomqvist  <jb@gcc.gnu.org>
142
143         PR libfortran/43605
144         * io/intrinsics.c (gf_ftell): New function, seek to correct offset.
145         (ftell): Call gf_ftell.
146         (FTELL_SUB): Likewise.
147
148 2010-04-01  Paul Thomas  <pault@gcc.gnu.org>
149
150         * io/transfer.c : Update copyright.
151         * io/unix.c : ditto
152         * io/read.c : ditto
153         * io/io.h : ditto
154         * io/unix.h : ditto
155         * io/inquire.c : ditto
156         * io/format.c : ditto
157         * io/list_read.c : ditto
158         * runtime/error.c : ditto
159         * libgfortran.h : ditto
160         * intrinsics/date_and_time.c: ditto
161         * intrinsics/args.c : ditto
162
163 2010-04-01  Janne Blomqvist  <jb@gcc.gnu.org>
164
165         PR libfortran/43605
166         * io/intrinsics.c (ftell): Reset fbuf, correct offset.
167         (FTELL_SUB): Likewise.
168
169 2010-03-29  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
170
171         PR libfortran/43265
172         * io/transfer.c (next_record_r): Only call hit_eof for specific
173         conditions when an EOF is encountered.
174
175 2010-03-29  Tobias Burnus  <burnus@net-b.de>
176
177         PR fortran/43551
178         * io/unix.c (buf_write): Set physical_offset after lseek.
179
180 2010-03-25  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
181
182         PR libfortran/43517
183         * io/read.c (read_x): Return if seen EOR condition.
184
185 2010-03-21  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
186
187         PR fortran/43409
188         * io/io.h: Fix type of size in st_parameter_inquire structure.
189
190 2010-03-20  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
191
192         PR fortran/43409
193         * io/unix.h: Add prototype for new function to return file size.
194         * io/unix.c (file_size): New function.
195         * io/inquire.c (inquire_via_unit): Use new function.
196         (inquire_via_filename): Use new function.
197
198 2010-03-17  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
199
200         * io/transfer.c (read_sf_internal): Remove stray function declaration
201         used during debugging.
202
203 2010-03-17  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
204
205         PR libfortran/43265
206         * io/io.h: Delete prototype for read_sf, making it static.
207         * io/read.c (read_x): Modify to call hit_eof if PAD="no".
208         * io/transfer.c (read_sf_internal): New static function extracted from
209         read_sf for use on internal units only. Handle empty string case.
210         (read_sf): New factoring of this function, make it static.  Add special
211         conditions for EOF based on ADVANCE="no", PAD="no", and whether any
212         bytes have been previously read from the record.
213         (read_block_form): Modify to call read_sf or read_sf_internal.
214         (next_record_r): Add a done flag similar to next_record_w. Call hit_eof
215         if internal array unit next record returns finished, meaning an EOF was
216         found and not done, ie not the last record expected.  For external
217         units call hit_eof if item_count is 1 or there are no pending spaces.
218         (next_record): Update call to next_record_r.
219
220 2010-03-12  Kai Tietz  <kai.tietz@onevision.com>
221
222         PR/42950
223         * io/format.c (parse_format_list): Add to ERROR, WARNING,
224         SILENT enumerators NOTIFICATION_ prefix.
225         * runtime/error.c (notification_std): Likewise.
226         * libgfortran.h (notification): Likewise.
227         (GFC_LARGEST_BUF): Check for HAVE_GFC_INTEGER_16.
228
229 2010-03-11  Tobias Burnus  <burnus@net-b.de>
230
231         PR fortran/43228
232         * io/list_read.c (nml_parse_qualifier): Disable expanded_read
233         for array sections.
234
235 2010-03-10  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
236
237         PR libfortran/43320
238         * io/transfer.c (next_record_r): Add hit_eof based on item_count
239         condition.
240
241 2010-03-09  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
242
243         PR libfortran/43265
244         * io/read.c: Include fbuf.h and unix.h to enable lower level I/O for
245         read_x. (read_x): Replace the use of read_sf with equivalent lower level
246         I/O, eliminating unneeded code and handling EOF and EOR conditions.
247         * io/io.h: Revise prototype for read_sf.
248         * io/transfer.c (read_sf): Delete no_error parameter and all uses of it.
249         (read_block_form): Likewise.
250         (next_record_r): Delete wrong code call to hit_eof.
251
252 2010-03-08  Kai TIetz  <kai.tietz@onevision.com>
253
254         PR/42950
255         * libgfortran.h (_POSIX): Define if __MINGW32__ is defined.
256         (gfc_printf): Define to gnu_printf for __MINGW32__ case,
257         otherwise to __printf__.
258         (gfc_strtof,gfc_strtod,gfc_strtold): Define for mingw case
259         to POSIX compatible converter functions.
260         (runtime_error): Use instead gfc_printf as formatter
261         attribute name.
262         (runtime_error_at): Likewise.
263         (runtime_warning_at): Likewise.
264         (st_printf): Likewise.
265         * intrinsics/date_and_time.c (localtime_r): Undefine
266         possible defined macro.
267         (gmtime_r): Likewise.
268         * io/read.c (convert_real): Use gfc_strtof, gfc_strtod,
269         and gfc_strtold.
270
271 2010-02-24  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
272
273         PR libfortran/43155
274         * io/transfer.c (require_type): Subtract one from item_count for output
275         of error message.  Add comment before formatted_transfer function
276         explaining why the item_count is off by one.
277
278 2010-02-24  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
279
280         * io/write_float.def (WRITE_FLOAT): Use __builtin_signbit.
281
282 2010-02-22  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
283
284         * io/list_read.c (list_formatted_read_scalar): Remove duplicate code.
285
286 2010-02-09  Tobias Burnus  <burnus@net-b.de>
287
288         PR fortran/42996
289         * intrinsics/args.c (get_command_argument_i4): Always return
290         commandline-argument length for length parameter.
291
292 2010-02-06  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
293
294         PR libfortran/42742
295         * io/format.c (reset_fnode_counters): Use the correct pointer to the
296         head of the fnode list. (parse_format): Remove previous hack that set
297         limit on size of format string for caching.
298
299 2010-02-06  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
300
301         PR libfortran
302         * io/transfer.c (read_sf): Handle EOR and EOF conditions for
303         ADVANCE="no" with PAD="yes" or PAD="no".
304
305 2010-02-03  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
306
307         PR libfortran/42901
308         * io/list_read.c (nml_get_obj_data): Add new qualifier flag, clean up
309         code, and adjust logic to set namelist info pointer correctly for array
310         qualifiers of derived type components.
311
312 2010-01-15  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
313
314         PR libfortran/42742
315         * io/format.c (parse_format): Set limit on size of format strings that
316         will be cached.
317
318 2010-01-05  Rainer Orth  <ro@CeBiTec.Uni-Bielefeld.DE>
319
320         * configure: Regenerate.
321
322 2010-01-03  Janne Blomqvist  <jb@gcc.gnu.org>
323
324         PR libfortran/42420
325         * io/unix.c: Defines for MINGW stat and fstat.
326         (gfstat_t): New typedef.
327         (id_from_fd): Use gfstat_t instead of struct stat.
328         (fd_to_stream): Likewise.
329         (compare_file_filename): Likewise.
330         (find_file): Likewise.
331         (file_exists): Likewise.
332         (inquire_sequential): Likewise.
333         (inquire_direct): Likewise.
334         (inquire_formatted): Likewise.
335
336 \f
337 Copyright (C) 2010 Free Software Foundation, Inc.
338
339 Copying and distribution of this file, with or without modification,
340 are permitted in any medium without royalty provided the copyright
341 notice and this notice are preserved.