OSDN Git Service

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