1 2010-07-16 Jerry DeLisle <jvdelisle@gcc.gnu.org>
4 * io/read.c (read_default_char4): Add support for reading into a
5 kind-4 character variable from a character(kind=4) internal unit.
6 * io/io.h (read_block_form4): Add prototype.
7 * io/unit.c (get_internal_unit): Add call to fbuf_init.
8 (free_internal_unit): Add call to fbuf_destroy. (get_unit): Fix
10 * io/transfer.c (read_sf_internal): Use fbuf_alloc to allocate a string
11 to recieve the wide characters translated to single byte chracters.
12 (read_block_form): Fix whitespace. (read_block_form4): New function to
13 read from a character(kind=4) internal unit into a character(kind=4)
14 variable. (read_block_direct): Fix whitespace. (write_block): Fix
15 whitespace. (formatted_transfer_scalar_read): Likewise.
16 (formatted_transfer_scalar_write): Likewise.
17 * io/write.c (write_character): Add support for list directed write of
18 a kind=1 character string to a character(kind=4) internal unit.
20 2010-07-14 Jerry DeLisle <jvdelisle@gcc.gnu.org>
23 * io/file_pos.c (st_endfile): Correctly set unit flags for form.
24 * io/transfer.c (data_transfer_init): Fix indentation of whitespace.
26 2010-07-12 Jerry DeLisle <jvdelisle@gcc.gnu.org>
29 * io/read.c: Fix comment.
30 * io/io.h (is_char4_unit): New macro.
31 * io/unit.c (get_internal_unit): Call new function open_internal4.
32 * io/unix.c (mem_alloc_r4): New function. (mem_alloc_w4): New function.
33 (mem_read4): New function, temporary stub. (mem_write4): New function.
34 (open_internal4): New function to set stream pointers to use the new
36 * io/transfer.c (write_block): Use new mem_alloc_w4 to access internal
38 * io/unix.h: Add prototypes for open_internal4, mem_alloc_w4, and
40 * io/write.c (memset4): New helper function. (memcpy4): New helper
41 function. (write_default_char4): Use new helper functions.
42 (write_a): Likewise. (write_l): Likewise. (write_boz): Likewise.
43 (write_decimal): Likewise. (write_x): Likewise.
44 (write_integer): Likewise.
45 * io/write_float.def (output_float): Add code blocks to handle internal
46 unit kind=4 output utilizing gfc_char4_t pointers. (write_infnan): Use
47 new helper functions. (OUTPUT_FLOAT_FMT_G): Update this macro likewise.
49 2010-07-12 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
51 * config/fpu-387.h [__sun__ && __svr4__] Include <signal.h>,
54 (sigill_hdlr): New function
55 (has_sse) [__sun__ && __svr4__]: Check if SSE instruction causes
58 2010-07-11 Kai Tietz <kai.tietz@onevision.com>
61 * io/unix.c (flush_buf): Add _commit for WIN32.
63 2010-06-28 Tobias Burnus <burnus@net-b.de>
66 * list_read.c (parse_real): Do not pass (..) on for NAN(..).
67 * read.c (convert_real): Fix comment about NAN/INF.
69 2010-07-02 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
71 * configure.ac (gfortran_use_symver): Only check for Sun-style symbol
72 versioning on Solaris 2.
73 * configure: Regenerate.
75 2010-07-02 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
77 * configure.ac: Check for Sun symbol versioning.
78 * configure: Regenerate.
80 * Makefile.am [LIBGFOR_USE_SYMVER]: Protect version_arg with
81 LIBGFOR_USE_SYMVER_GNU.
83 [LIBGFOR_USE_SYMVER_SUN]: Handle Sun symbol versioning.
84 [!LIBGFOR_USE_SYMVER]: Add version_dep.
85 (libgfortran_la_DEPENDENCIES): Set to $(version_dep).
86 * Makefile.in: Regenerate.
88 2010-06-29 Jerry DeLisle <jvdelisle@gcc.gnu.org>
91 * io/read.c: Add code to parse and read Inf, Infinity, NaN, and Nan with
94 2010-06-28 Tobias Burnus <burnus@net-b.de>
97 * list_read.c (parse_real, read_real): Support NAN(alphanum).
99 2010-06-25 Tobias Burnus <burnus@net-b.de>
101 * intrinsics/selected_real_kind.f90
102 (_gfortran_selected_real_kind2008): Add function.
103 (_gfortran_selected_real_kind): Stub which calls
104 _gfortran_selected_real_kind2008.
105 * gfortran.map (GFORTRAN_1.4): Add
106 _gfortran_selected_real_kind2008.
107 * mk-srk-inc.sh: Save also RADIX.
109 2010-06-25 Tobias Burnus <burnus@net-b.de>
111 * runtime/compile_options.c (init_compile_options): Update
112 compile_options.allow_std for GFC_STD_F2008_OBS.
113 * io/transfer.c (formatted_transfer_scalar_read,
114 formatted_transfer_scalar_write): Fix allow_std check.
115 * io/list_read.c (nml_parse_qualifier): Ditto.
117 2010-06-18 Jerry DeLisle <jvdelisle@gcc.gnu.org>
120 * io/file_pos.c (st_endfile): Add check for ENDFILE when file is
121 already positioned after the EOF marker. Use find_or_create_unit
122 instead of find_unit. If unit is not connected, connect it and create
123 the file with default settings.
124 * io/transfer.c (data_transfer_init): Add check for attempted READ or
125 WRITE when file is already positioned after the EOF marker.
127 2010-06-10 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
129 * intrinsics/selected_char_kind.c (selected_char_kind): Fix
130 return value for ISO_10646.
132 2010-06-09 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
134 * mk-kinds-h.sh: Define GFC_REAL_*_LITERAL_SUFFIX and
135 GFC_REAL_*_LITERAL macros for each kind.
136 * intrinsics/cpu_time.c (cpu_time_4, cpu_time_8, cpu_time_10,
137 cpu_time_16): Use them.
138 * intrinsics/random.c (rnumber_4, rnumber_8, rnumber_10,
139 rnumber_16): Likewise.
141 2010-06-09 Francois-Xavier Coudert <fxcoudert@gcc.gnu.org>
143 * intrinsics/system_clock.c (system_clock_4, system_clock_8):
146 2010-06-04 Thomas Koenig <tkoenig@gcc.gnu.org>
149 * intrinsics/date_and_time.c: Replace assert with runtime_error
150 when VALUE is too small.
152 2010-05-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
155 * runtime/stop.c (stop_string): Make sure nothing is emitted for
158 2010-05-19 Jerry DeLisle <jvdelisle@gcc.gnu.org>
161 * runtime/stop.c (error_stop_numeric): New function and updated comment.
162 Add declaration for stop_numeric and remove declaration for stop_string.
163 (stop_string): Use for blank STOP.
164 (stop_numeric): Remove use of special -1 stop code.
165 * runtime/pause.c (do_pause): Use stop_string for blank stop.
166 (pause_numeric): Remove use of special -1 pause code.
167 * gfortran.map: Add new symbol to run-time library.
168 * libgfortran.h: Move declaration for stop_string to here to make
169 function visible for do_pause. Remove declaration for stop_numeric.
171 2010-05-08 Janne Blomqvist <jb@gcc.gnu.org>
173 * io/unix.h (mem_alloc_r): Fix typo to reduce visibility.
175 2010-05-07 Janne Blomqvist <jb@gcc.gnu.org>
177 * libgfortran.h (free_mem): Remove prototype.
178 * runtime/memory.c (free_mem): Remove function.
179 * intrinsics/date_and_time.c (secnds): Replace free_mem() with
181 * io/fbuf.c (fbuf_destroy): Likewise.
182 * io/format.c (free_format_hash_table): Likewise.
183 (save_parsed_format): Likewise.
184 (free_format_data): Likewise.
185 * io/list_read.c (free_saved): Likewise.
186 (free_line): Likewise.
187 (nml_touch_nodes): Likewise.
188 (nml_read_obj): Likewise
189 * io/lock.c (free_ionml): Likewise.
190 * io/open.c (new_unit): Likewise.
191 (already_open): Likewise.
192 * io/unit.c (destroy_unit_mutex): Likewise.
193 (free_internal_unit): Likewise.
194 (close_unit_1): Likewise.
195 * io/unix.c (raw_close): Likewise.
196 (buf_close): Likewise.
197 (mem_close): Likewise.
198 (tempfile): Likewise.
199 * io/write.c (nml_write_obj): Likewise.
200 * io/write_float.def (output_float_FMT_G_##): Likewise.
201 * runtime/error.c (show_locus): Likewise.
203 2010-05-04 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
206 * configure.ac (AM_INIT_AUTOMAKE): Add no-dist.
207 * configure: Regenerate.
208 * Makefile.in: Regenerate.
210 2010-04-30 Kai Tietz <kai.tietz@onevision.com>
213 * io/unix.c (raw_truncate): Explicit cast from integer-scalar
215 (tempfile): Use for mingw GetTempPath and avoid double slash
218 2010-04-24 Kai Tietz <kai.tietz@onevision.com>
221 * io/unix.c (tempfile): Correct logic for mktemp case.
223 2010-04-06 Tobias Burnus <burnus@net-b.de>
226 * runtime/stop.c (error_stop_string): New function.
227 * gfortran.map (_gfortran_error_stop_string): Add.
229 2010-04-02 Ralf Wildenhues <Ralf.Wildenhues@gmx.de>
231 * Makefile.in: Regenerate.
232 * aclocal.m4: Regenerate.
234 2010-04-01 Janne Blomqvist <jb@gcc.gnu.org>
237 * io/intrinsics.c (gf_ftell): New function, seek to correct offset.
238 (ftell): Call gf_ftell.
239 (FTELL_SUB): Likewise.
241 2010-04-01 Paul Thomas <pault@gcc.gnu.org>
243 * io/transfer.c : Update copyright.
248 * io/inquire.c : ditto
249 * io/format.c : ditto
250 * io/list_read.c : ditto
251 * runtime/error.c : ditto
252 * libgfortran.h : ditto
253 * intrinsics/date_and_time.c: ditto
254 * intrinsics/args.c : ditto
256 2010-04-01 Janne Blomqvist <jb@gcc.gnu.org>
259 * io/intrinsics.c (ftell): Reset fbuf, correct offset.
260 (FTELL_SUB): Likewise.
262 2010-03-29 Jerry DeLisle <jvdelisle@gcc.gnu.org>
265 * io/transfer.c (next_record_r): Only call hit_eof for specific
266 conditions when an EOF is encountered.
268 2010-03-29 Tobias Burnus <burnus@net-b.de>
271 * io/unix.c (buf_write): Set physical_offset after lseek.
273 2010-03-25 Jerry DeLisle <jvdelisle@gcc.gnu.org>
276 * io/read.c (read_x): Return if seen EOR condition.
278 2010-03-21 Jerry DeLisle <jvdelisle@gcc.gnu.org>
281 * io/io.h: Fix type of size in st_parameter_inquire structure.
283 2010-03-20 Jerry DeLisle <jvdelisle@gcc.gnu.org>
286 * io/unix.h: Add prototype for new function to return file size.
287 * io/unix.c (file_size): New function.
288 * io/inquire.c (inquire_via_unit): Use new function.
289 (inquire_via_filename): Use new function.
291 2010-03-17 Jerry DeLisle <jvdelisle@gcc.gnu.org>
293 * io/transfer.c (read_sf_internal): Remove stray function declaration
294 used during debugging.
296 2010-03-17 Jerry DeLisle <jvdelisle@gcc.gnu.org>
299 * io/io.h: Delete prototype for read_sf, making it static.
300 * io/read.c (read_x): Modify to call hit_eof if PAD="no".
301 * io/transfer.c (read_sf_internal): New static function extracted from
302 read_sf for use on internal units only. Handle empty string case.
303 (read_sf): New factoring of this function, make it static. Add special
304 conditions for EOF based on ADVANCE="no", PAD="no", and whether any
305 bytes have been previously read from the record.
306 (read_block_form): Modify to call read_sf or read_sf_internal.
307 (next_record_r): Add a done flag similar to next_record_w. Call hit_eof
308 if internal array unit next record returns finished, meaning an EOF was
309 found and not done, ie not the last record expected. For external
310 units call hit_eof if item_count is 1 or there are no pending spaces.
311 (next_record): Update call to next_record_r.
313 2010-03-12 Kai Tietz <kai.tietz@onevision.com>
316 * io/format.c (parse_format_list): Add to ERROR, WARNING,
317 SILENT enumerators NOTIFICATION_ prefix.
318 * runtime/error.c (notification_std): Likewise.
319 * libgfortran.h (notification): Likewise.
320 (GFC_LARGEST_BUF): Check for HAVE_GFC_INTEGER_16.
322 2010-03-11 Tobias Burnus <burnus@net-b.de>
325 * io/list_read.c (nml_parse_qualifier): Disable expanded_read
328 2010-03-10 Jerry DeLisle <jvdelisle@gcc.gnu.org>
331 * io/transfer.c (next_record_r): Add hit_eof based on item_count
334 2010-03-09 Jerry DeLisle <jvdelisle@gcc.gnu.org>
337 * io/read.c: Include fbuf.h and unix.h to enable lower level I/O for
338 read_x. (read_x): Replace the use of read_sf with equivalent lower level
339 I/O, eliminating unneeded code and handling EOF and EOR conditions.
340 * io/io.h: Revise prototype for read_sf.
341 * io/transfer.c (read_sf): Delete no_error parameter and all uses of it.
342 (read_block_form): Likewise.
343 (next_record_r): Delete wrong code call to hit_eof.
345 2010-03-08 Kai TIetz <kai.tietz@onevision.com>
348 * libgfortran.h (_POSIX): Define if __MINGW32__ is defined.
349 (gfc_printf): Define to gnu_printf for __MINGW32__ case,
350 otherwise to __printf__.
351 (gfc_strtof,gfc_strtod,gfc_strtold): Define for mingw case
352 to POSIX compatible converter functions.
353 (runtime_error): Use instead gfc_printf as formatter
355 (runtime_error_at): Likewise.
356 (runtime_warning_at): Likewise.
357 (st_printf): Likewise.
358 * intrinsics/date_and_time.c (localtime_r): Undefine
359 possible defined macro.
360 (gmtime_r): Likewise.
361 * io/read.c (convert_real): Use gfc_strtof, gfc_strtod,
364 2010-02-24 Jerry DeLisle <jvdelisle@gcc.gnu.org>
367 * io/transfer.c (require_type): Subtract one from item_count for output
368 of error message. Add comment before formatted_transfer function
369 explaining why the item_count is off by one.
371 2010-02-24 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
373 * io/write_float.def (WRITE_FLOAT): Use __builtin_signbit.
375 2010-02-22 Jerry DeLisle <jvdelisle@gcc.gnu.org>
377 * io/list_read.c (list_formatted_read_scalar): Remove duplicate code.
379 2010-02-09 Tobias Burnus <burnus@net-b.de>
382 * intrinsics/args.c (get_command_argument_i4): Always return
383 commandline-argument length for length parameter.
385 2010-02-06 Jerry DeLisle <jvdelisle@gcc.gnu.org>
388 * io/format.c (reset_fnode_counters): Use the correct pointer to the
389 head of the fnode list. (parse_format): Remove previous hack that set
390 limit on size of format string for caching.
392 2010-02-06 Jerry DeLisle <jvdelisle@gcc.gnu.org>
395 * io/transfer.c (read_sf): Handle EOR and EOF conditions for
396 ADVANCE="no" with PAD="yes" or PAD="no".
398 2010-02-03 Jerry DeLisle <jvdelisle@gcc.gnu.org>
401 * io/list_read.c (nml_get_obj_data): Add new qualifier flag, clean up
402 code, and adjust logic to set namelist info pointer correctly for array
403 qualifiers of derived type components.
405 2010-01-15 Jerry DeLisle <jvdelisle@gcc.gnu.org>
408 * io/format.c (parse_format): Set limit on size of format strings that
411 2010-01-05 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
413 * configure: Regenerate.
415 2010-01-03 Janne Blomqvist <jb@gcc.gnu.org>
418 * io/unix.c: Defines for MINGW stat and fstat.
419 (gfstat_t): New typedef.
420 (id_from_fd): Use gfstat_t instead of struct stat.
421 (fd_to_stream): Likewise.
422 (compare_file_filename): Likewise.
423 (find_file): Likewise.
424 (file_exists): Likewise.
425 (inquire_sequential): Likewise.
426 (inquire_direct): Likewise.
427 (inquire_formatted): Likewise.
430 Copyright (C) 2010 Free Software Foundation, Inc.
432 Copying and distribution of this file, with or without modification,
433 are permitted in any medium without royalty provided the copyright
434 notice and this notice are preserved.