OSDN Git Service

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