1 2010-06-25 Tobias Burnus <burnus@net-b.de>
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.
11 2010-06-25 Tobias Burnus <burnus@net-b.de>
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.
19 2010-06-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
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.
29 2010-06-10 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
31 * intrinsics/selected_char_kind.c (selected_char_kind): Fix
32 return value for ISO_10646.
34 2010-06-09 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
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.
43 2010-06-09 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
45 * intrinsics/system_clock.c (system_clock_4, system_clock_8):
48 2010-06-04 Thomas Koenig <tkoenig@gcc.gnu.org>
51 * intrinsics/date_and_time.c: Replace assert with runtime_error
52 when VALUE is too small.
54 2010-05-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
57 * runtime/stop.c (stop_string): Make sure nothing is emitted for
60 2010-05-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
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.
73 2010-05-08 Janne Blomqvist <jb@gcc.gnu.org>
75 * io/unix.h (mem_alloc_r): Fix typo to reduce visibility.
77 2010-05-07 Janne Blomqvist <jb@gcc.gnu.org>
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
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.
105 2010-05-04 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
108 * configure.ac (AM_INIT_AUTOMAKE): Add no-dist.
109 * configure: Regenerate.
110 * Makefile.in: Regenerate.
112 2010-04-30 Kai Tietz <kai.tietz@onevision.com>
115 * io/unix.c (raw_truncate): Explicit cast from integer-scalar
117 (tempfile): Use for mingw GetTempPath and avoid double slash
120 2010-04-24 Kai Tietz <kai.tietz@onevision.com>
123 * io/unix.c (tempfile): Correct logic for mktemp case.
125 2010-04-06 Tobias Burnus <burnus@net-b.de>
128 * runtime/stop.c (error_stop_string): New function.
129 * gfortran.map (_gfortran_error_stop_string): Add.
131 2010-04-02 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
133 * Makefile.in: Regenerate.
134 * aclocal.m4: Regenerate.
136 2010-04-01 Janne Blomqvist <jb@gcc.gnu.org>
139 * io/intrinsics.c (gf_ftell): New function, seek to correct offset.
140 (ftell): Call gf_ftell.
141 (FTELL_SUB): Likewise.
143 2010-04-01 Paul Thomas <pault@gcc.gnu.org>
145 * io/transfer.c : Update copyright.
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
158 2010-04-01 Janne Blomqvist <jb@gcc.gnu.org>
161 * io/intrinsics.c (ftell): Reset fbuf, correct offset.
162 (FTELL_SUB): Likewise.
164 2010-03-29 Jerry DeLisle <jvdelisle@gcc.gnu.org>
167 * io/transfer.c (next_record_r): Only call hit_eof for specific
168 conditions when an EOF is encountered.
170 2010-03-29 Tobias Burnus <burnus@net-b.de>
173 * io/unix.c (buf_write): Set physical_offset after lseek.
175 2010-03-25 Jerry DeLisle <jvdelisle@gcc.gnu.org>
178 * io/read.c (read_x): Return if seen EOR condition.
180 2010-03-21 Jerry DeLisle <jvdelisle@gcc.gnu.org>
183 * io/io.h: Fix type of size in st_parameter_inquire structure.
185 2010-03-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
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.
193 2010-03-17 Jerry DeLisle <jvdelisle@gcc.gnu.org>
195 * io/transfer.c (read_sf_internal): Remove stray function declaration
196 used during debugging.
198 2010-03-17 Jerry DeLisle <jvdelisle@gcc.gnu.org>
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.
215 2010-03-12 Kai Tietz <kai.tietz@onevision.com>
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.
224 2010-03-11 Tobias Burnus <burnus@net-b.de>
227 * io/list_read.c (nml_parse_qualifier): Disable expanded_read
230 2010-03-10 Jerry DeLisle <jvdelisle@gcc.gnu.org>
233 * io/transfer.c (next_record_r): Add hit_eof based on item_count
236 2010-03-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>
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.
247 2010-03-08 Kai TIetz <kai.tietz@onevision.com>
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
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,
266 2010-02-24 Jerry DeLisle <jvdelisle@gcc.gnu.org>
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.
273 2010-02-24 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
275 * io/write_float.def (WRITE_FLOAT): Use __builtin_signbit.
277 2010-02-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
279 * io/list_read.c (list_formatted_read_scalar): Remove duplicate code.
281 2010-02-09 Tobias Burnus <burnus@net-b.de>
284 * intrinsics/args.c (get_command_argument_i4): Always return
285 commandline-argument length for length parameter.
287 2010-02-06 Jerry DeLisle <jvdelisle@gcc.gnu.org>
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.
294 2010-02-06 Jerry DeLisle <jvdelisle@gcc.gnu.org>
297 * io/transfer.c (read_sf): Handle EOR and EOF conditions for
298 ADVANCE="no" with PAD="yes" or PAD="no".
300 2010-02-03 Jerry DeLisle <jvdelisle@gcc.gnu.org>
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.
307 2010-01-15 Jerry DeLisle <jvdelisle@gcc.gnu.org>
310 * io/format.c (parse_format): Set limit on size of format strings that
313 2010-01-05 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
315 * configure: Regenerate.
317 2010-01-03 Janne Blomqvist <jb@gcc.gnu.org>
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.
332 Copyright (C) 2010 Free Software Foundation, Inc.
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.