1 1.1 mrg 2005-12-31 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 2 1.1 mrg 3 1.1 mrg PR libfortran/25594 4 1.1 mrg PR libfortran/25419 5 1.1 mrg * io/list_read.c (list_formatted_read_scalar): Test for comma to return 6 1.1 mrg a null value (default). Revert patch of 25419 on 2005-12-28. 7 1.1 mrg 8 1.1 mrg 2005-12-28 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 9 1.1 mrg 10 1.1 mrg PR libfortran/25139 11 1.1 mrg * io/unix.c (fd_truncate): Set s->active to zero. 12 1.1 mrg PR libfortran/25510 13 1.1 mrg * libgfortran.h: Add ERROR_INTERNAL and ERROR_INTERNAL_UNIT. 14 1.1 mrg * runtime/error.c (translate_error): Add messages for new errors. 15 1.1 mrg * io/list_read.c (next_char): Use new errors. 16 1.1 mrg * io/transfer.c (next_record_r) (next_record_w): Use new errors. 17 1.1 mrg 18 1.1 mrg 2005-12-28 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 19 1.1 mrg 20 1.1 mrg PR libfortran/25550 21 1.1 mrg * io/file_pos.c (st_rewind): Reset bytes left so no error occurs in 22 1.1 mrg next_record_r. 23 1.1 mrg 24 1.1 mrg 2005-12-28 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 25 1.1 mrg 26 1.1 mrg PR libfortran/25419 27 1.1 mrg * io/list_read.c (list_formatted_read_scalar): Allow comma to return a 28 1.1 mrg null value (default). 29 1.1 mrg 30 1.1 mrg 2005-12-21 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 31 1.1 mrg 32 1.1 mrg PR libfortran/25307 33 1.1 mrg * io/list_read.c (next_char): Handle end-of-file conditions for 34 1.1 mrg internal units and add support for internal character array units. 35 1.1 mrg 36 1.1 mrg 2005-12-18 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 37 1.1 mrg 38 1.1 mrg PR libfortran/25463 39 1.1 mrg * io/transfer.c (finalize_transfer): Fix execution order so that 40 1.1 mrg next_record is set to zero in all cases. 41 1.1 mrg 42 1.1 mrg 2005-12-16 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 43 1.1 mrg 44 1.1 mrg PR libfortran/25264 45 1.1 mrg PR libfortran/25349 46 1.1 mrg * io/unit.c (get_unit): Delete code that cleared the string when the 47 1.1 mrg unit was opened, which is too soon. 48 1.1 mrg * io/transfer.c (next_record_w): Pass done flag in. Change logic for 49 1.1 mrg setting max_pos. Add code to position unit and pad record as needed. 50 1.1 mrg 51 1.1 mrg 2005-12-13 Richard Sandiford <richard (a] codesourcery.com> 52 1.1 mrg Victor Leikehman <LEI (a] il.ibm.com> 53 1.1 mrg 54 1.1 mrg * m4/matmul.m4: Use a different order in the special case of a 55 1.1 mrg transposed first argument. 56 1.1 mrg * generated/matmul_c4.c, generated/matmul_c8.c, generated/matmul_c10.c, 57 1.1 mrg * generated/matmul_c16.c, generated/matmul_i4.c, generated/matmul_i8.c, 58 1.1 mrg * generated/matmul_i10.c, generated/matmul_r4.c, generated/matmul_r8.c 59 1.1 mrg * generated/matmul_r10.c, generated/matmul_r16.c: Regenerated. 60 1.1 mrg 61 1.1 mrg 2005-12-10 Janne Blomqvist <jb (a] gcc.gnu.org> 62 1.1 mrg 63 1.1 mrg * Makefile.am: Enable loop unrolling for matmul. 64 1.1 mrg * configure: Regenerated. 65 1.1 mrg * Makefile.in: Regenerated. 66 1.1 mrg * aclocal.m4: Regenerated. 67 1.1 mrg 68 1.1 mrg 2005-12-10 Thomas Koenig <Thomas.Koenig (a] online.de> 69 1.1 mrg 70 1.1 mrg PR fortran/23815 71 1.1 mrg * io/file_pos.c (unformatted_backspace): If flags.convert 72 1.1 mrg does not equal CONVERT_NATIVE, reverse the record marker. 73 1.1 mrg * io/open.c: Add convert_opt[]. 74 1.1 mrg (st_open): If no convert option is given, set CONVERT_NATIVE. 75 1.1 mrg If CONVERT_BIG or CONVERT_LITTLE are given, set flags.convert to 76 1.1 mrg CONVERT_NATIVE or CONVERT_SWAP (depending on wether we have 77 1.1 mrg a big- or little-endian system). 78 1.1 mrg * io/transfer.c (unformatted_read): Remove unused attribute 79 1.1 mrg from arguments. 80 1.1 mrg If we need to reverse 81 1.1 mrg bytes, break up large transfers into a loop. Split complex 82 1.1 mrg numbers into its two parts. 83 1.1 mrg (unformatted_write): Likewise. 84 1.1 mrg (us_read): If flags.convert does not equal CONVERT_NATIVE, 85 1.1 mrg reverse the record marker. 86 1.1 mrg (next_record_w): Likewise. 87 1.1 mrg (reverse_memcpy): New function. 88 1.1 mrg * io/inquire.c (inquire_via_unit): Implement convert. 89 1.1 mrg * io/io.h (top level): Add enum unit_convert. 90 1.1 mrg Add convert to st_parameter_open and st_parameter_inquire. 91 1.1 mrg Define IOPARM_OPEN_HAS_CONVERT and IOPARM_INQUIRE_HAS_CONVERT. 92 1.1 mrg Increase padding for st_parameter_dt. 93 1.1 mrg Declare reverse_memcpy(). 94 1.1 mrg 95 1.1 mrg 2005-12-09 Jakub Jelinek <jakub (a] redhat.com> 96 1.1 mrg 97 1.1 mrg PR libfortran/24991 98 1.1 mrg * acinclude.m4: Include acx.m4 and no-executables.m4. 99 1.1 mrg * configure.ac: Add GCC_TOPLEVEL_SUBDIRS. 100 1.1 mrg * configure: Rebuilt. 101 1.1 mrg * Makefile.am (AM_CPPFLAGS): Use $(host_subdir) in build dir 102 1.1 mrg path. 103 1.1 mrg * Makefile.in: Rebuilt. 104 1.1 mrg 105 1.1 mrg 2005-12-08 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 106 1.1 mrg 107 1.1 mrg PR libfortran/25039 108 1.1 mrg * io/io.h: Create a new flag sf_read_comma to control comma 109 1.1 mrg separators in numeric reads. 110 1.1 mrg * io/transfer.c (formatted_transfer_scalar): Initialize the flag. 111 1.1 mrg (read_sf): Check for commas coming in and if the flag is set, 112 1.1 mrg shortcut the read. 113 1.1 mrg * io/read.c (read_a) (read_x): Clear the flag for character reads and 114 1.1 mrg reset it after the reads. 115 1.1 mrg 116 1.1 mrg 2005-12-04 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 117 1.1 mrg 118 1.1 mrg * io/format.c: Removing unused code. 119 1.1 mrg * intrinsics/random.c: Likewise. 120 1.1 mrg 121 1.1 mrg 2005-12-02 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 122 1.1 mrg 123 1.1 mrg PR libfortran/25116 124 1.1 mrg * io/transfer.c (data_transfer_init): Don't set the default for 125 1.1 mrg namelist I/O on preconnected files to UNFORMATTED. 126 1.1 mrg 127 1.1 mrg 2005-11-30 Eric Botcazou <ebotcazou (a] libertysurf.fr> 128 1.1 mrg 129 1.1 mrg * libgfortran.h (ILP32 typedefs): Define _UINT8_T, _UINT32_T and 130 1.1 mrg _UINT64_T on Solaris. 131 1.1 mrg 132 1.1 mrg 2005-11-28 Steven G. Kargl <kargls (a] comcast.net> 133 1.1 mrg 134 1.1 mrg PR libfortran/25149 135 1.1 mrg * intrinsics/abort.c: Add external abort_ to allow linking when 136 1.1 mrg invoking -std=f95 in testsuite. 137 1.1 mrg 138 1.1 mrg 2005-11-28 Jakub Jelinek <jakub (a] redhat.com> 139 1.1 mrg 140 1.1 mrg PR libfortran/24991 141 1.1 mrg * acinclude.m4 (LIBGFOR_CHECK_PRAGMA_WEAK): Rename to... 142 1.1 mrg (LIBGFOR_GTHREAD_WEAK): ... this. Define SUPPORTS_WEAK rather 143 1.1 mrg than HAVE_PRAGMA_WEAK. Define GTHREAD_USE_WEAK to 0 on hosts 144 1.1 mrg that shouldn't use weak in gthr.h. 145 1.1 mrg * configure.ac: Use LIBGFOR_GTHREAD_WEAK instead of 146 1.1 mrg LIBGFOR_CHECK_PRAGMA_WEAK. 147 1.1 mrg * config.h.in: Regenerated. 148 1.1 mrg * configure: Regenerated. 149 1.1 mrg * io/io.h (SUPPORTS_WEAK): Don't define here. 150 1.1 mrg 151 1.1 mrg * intrinsics/ftell.c (ftell, FTELL_SUB): Add unlock_unit call. 152 1.1 mrg * intrinsics/fget.c (fgetc, fputs): Likewise. 153 1.1 mrg * intrinsics/tty.c (ttynam): Likewise. 154 1.1 mrg 155 1.1 mrg 2005-11-27 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 156 1.1 mrg 157 1.1 mrg PR libfortran/25109 158 1.1 mrg * io/unit.c (init_units): Set default flag to BLANK_NULL per 159 1.1 mrg requirement of F95 standard. Set PAD_YES for stdin. 160 1.1 mrg 161 1.1 mrg 2005-11-27 David Edelsohn <edelsohn (a] gnu.org> 162 1.1 mrg 163 1.1 mrg * intrinsics/random.c: Include config.h 164 1.1 mrg * io/size_from_kind.c: Include config.h and libgfortran.h 165 1.1 mrg * io/io.h: Revert 2005-11-21 change. 166 1.1 mrg 167 1.1 mrg 2005-11-27 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 168 1.1 mrg 169 1.1 mrg * io/write.c (namelist_write): Correct type in previous 170 1.1 mrg commit. 171 1.1 mrg 172 1.1 mrg 2005-11-27 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 173 1.1 mrg 174 1.1 mrg PR libfortran/24919 175 1.1 mrg * io/list_read.c (eat_separator, finish_separator, 176 1.1 mrg read_character): Handle CRLF separators correctly during reads. 177 1.1 mrg (nml_query): Use the HAVE_CRLF macro to print adequate newlines. 178 1.1 mrg * io/io.h (st_parameter_dt): Add comment about the possible 179 1.1 mrg values for sf_seen_eor. 180 1.1 mrg * io/unix.c (tempfile, regular_file): HAVE_CRLF doesn't imply 181 1.1 mrg that O_BINARY is defined, so we add that condition. 182 1.1 mrg (stream_at_bof): Fix typo in comment. 183 1.1 mrg * io/transfer.c (read_sf): Handle correctly CRLF, setting 184 1.1 mrg sf_seen_eor value to 2 instead of 1. 185 1.1 mrg (formatted_transfer_scalar): Use the sf_seen_eor value to 186 1.1 mrg handle CRLF the right way. 187 1.1 mrg * io/write.c (nml_write_obj, namelist_write): Use CRLF as newline 188 1.1 mrg when HAVE_CRLF is defined. 189 1.1 mrg 190 1.1 mrg 2005-11-27 Janne Blomqvist <jb (a] gcc.gnu.org> 191 1.1 mrg 192 1.1 mrg * m4/ifunction.m4: Add const restrict to function arguments. 193 1.1 mrg * m4/iforeach.m4: Likewise. 194 1.1 mrg * m4/eoshift1.m4: Likewise. 195 1.1 mrg * m4/eoshift3.m4: Likewise. 196 1.1 mrg * m4/dotprod.m4: Likewise. 197 1.1 mrg * m4/dotprodc.m4: Likewise. 198 1.1 mrg * m4/dotprodl.m4: Likewise. 199 1.1 mrg * m4/shape.m4: Likewise. 200 1.1 mrg * m4/cshift1.m4: Likewise. 201 1.1 mrg * m4/reshape.m4: Likewise. 202 1.1 mrg * m4/transpose.m4: Likewise. 203 1.1 mrg * generated/eoshift*: Regenerated 204 1.1 mrg * generated/dotprod*: Likewise. 205 1.1 mrg * generated/shape*: Likewise. 206 1.1 mrg * generated/cshift1*: Likewise. 207 1.1 mrg * generated/reshape*: Likewise. 208 1.1 mrg * generated/transpose*: Likewise. 209 1.1 mrg 210 1.1 mrg 2005-11-26 Richard Henderson <rth (a] redhat.com> 211 1.1 mrg 212 1.1 mrg * io/list_read.c (nml_parse_qualifier): Use ssize_t instead of int 213 1.1 mrg in dtp->u.p.value. 214 1.1 mrg 215 1.1 mrg 2005-11-26 Janne Blomqvist <jb (a] gcc.gnu.org> 216 1.1 mrg 217 1.1 mrg PR libfortran/24945 218 1.1 mrg * io/open.c (edit_modes): Check for STATUS_UNKNOWN flag. 219 1.1 mrg 220 1.1 mrg 2005-11-25 Richard Henderson <rth (a] redhat.com> 221 1.1 mrg 222 1.1 mrg * io/list_read.c (nml_parse_qualifier): Use memcpy to extract 223 1.1 mrg values from dtp->u.p.value. 224 1.1 mrg * io/io.h (struct st_parameter_dt): Change reversion_flag, first_item, 225 1.1 mrg seen_dollar, sf_seen_eor, eor_condition, no_leading_blank, char_flag, 226 1.1 mrg input_complete, at_eol, comma_flag, namelist_mode, nml_read_error to 227 1.1 mrg single-bit fields. Move value to where it'll be at least pointer 228 1.1 mrg aligned. 229 1.1 mrg 230 1.1 mrg 2005-11-23 Alan Modra <amodra (a] bigpond.net.au> 231 1.1 mrg 232 1.1 mrg * io/open.c (new_unit): Use the right unit number when checking 233 1.1 mrg for stdin, stdout, stderr. 234 1.1 mrg 235 1.1 mrg 2005-11-22 Jerry DeLisle <jvdelisle (a] gcc.gnu.org> 236 1.1 mrg 237 1.1 mrg PR libfortran/24794 238 1.1 mrg * io/list_read.c (read_character): Add auto completion on short 239 1.1 mrg namelist reads. 240 1.1 mrg 241 1.1 mrg 2005-11-21 David Edelsohn <edelsohn (a] gnu.org> 242 1.1 mrg 243 1.1 mrg * io/io.h (_LARGE_FILES): Undefine for AIX. 244 1.1 mrg (_LARGE_FILE_API): Define for AIX. 245 1.1 mrg 246 1.1 mrg 2005-11-21 Jakub Jelinek <jakub (a] redhat.com> 247 1.1 mrg 248 1.1 mrg PR fortran/24774 249 1.1 mrg PR fortran/14943 250 1.1 mrg PR fortran/21647 251 1.1 mrg * Makefile.am (AM_CPPFLAGS): Add gcc directories as -I paths, 252 1.1 mrg add -D_GNU_SOURCE. 253 1.1 mrg * Makefile.in: Regenerated. 254 1.1 mrg * acinclude.m4 (LIBGFOR_CHECK_SYNC_FETCH_AND_ADD, 255 1.1 mrg LIBGFOR_CHECK_GTHR_DEFAULT, LIBGFOR_CHECK_PRAGMA_WEAK): New macros. 256 1.1 mrg * configure.ac: Add them. 257 1.1 mrg * configure: Rebuilt. 258 1.1 mrg * config.h.in: Rebuilt. 259 1.1 mrg * libtool-version: Bump libgfortran.so SONAME to libgfortran.so.1. 260 1.1 mrg * libgfortran.h (library_start, show_locus, internal_error, 261 1.1 mrg generate_error, find_option): Add st_parameter_common * argument. 262 1.1 mrg (library_end): Change into a dummy macro. 263 1.1 mrg * io/io.h: Include gthr.h. 264 1.1 mrg (SUPPORTS_WEAK): Define if HAVE_PRAGMA_WEAK. 265 1.1 mrg (CHARACTER): Remove define. 266 1.1 mrg (st_parameter, global_t): Remove typedef. 267 1.1 mrg (ioparm, g, ionml, current_unit): Remove variables. 268 1.1 mrg (init_error_stream): Remove prototype. 269 1.1 mrg (CHARACTER1, CHARACTER2): Define. 270 1.1 mrg (st_parameter_common, st_parameter_open, st_parameter_close, 271 1.1 mrg st_parameter_filepos, st_parameter_inquire, st_parameter_dt): New 272 1.1 mrg typedefs. 273 1.1 mrg (IOPARM_LIBRETURN_MASK, IOPARM_LIBRETURN_OK, IOPARM_LIBRETURN_ERROR, 274 1.1 mrg IOPARM_LIBRETURN_END, IOPARM_LIBRETURN_EOR, IOPARM_ERR, IOPARM_END, 275 1.1 mrg IOPARM_EOR, IOPARM_HAS_IOSTAT, IOPARM_HAS_IOMSG, IOPARM_COMMON_MASK, 276 1.1 mrg IOPARM_OPEN_HAS_RECL_IN, IOPARM_OPEN_HAS_FILE, IOPARM_OPEN_HAS_STATUS, 277 1.1 mrg IOPARM_OPEN_HAS_ACCESS, IOPARM_OPEN_HAS_FORM, IOPARM_OPEN_HAS_BLANK, 278 1.1 mrg IOPARM_OPEN_HAS_POSITION, IOPARM_OPEN_HAS_ACTION, 279 1.1 mrg IOPARM_OPEN_HAS_DELIM, IOPARM_OPEN_HAS_PAD, IOPARM_CLOSE_HAS_STATUS, 280 1.1 mrg IOPARM_INQUIRE_HAS_EXIST, IOPARM_INQUIRE_HAS_OPENED, 281 1.1 mrg IOPARM_INQUIRE_HAS_NUMBER, IOPARM_INQUIRE_HAS_NAMED, 282 1.1 mrg IOPARM_INQUIRE_HAS_NEXTREC, IOPARM_INQUIRE_HAS_RECL_OUT, 283 1.1 mrg IOPARM_INQUIRE_HAS_FILE, IOPARM_INQUIRE_HAS_ACCESS, 284 1.1 mrg IOPARM_INQUIRE_HAS_FORM, IOPARM_INQUIRE_HAS_BLANK, 285 1.1 mrg IOPARM_INQUIRE_HAS_POSITION, IOPARM_INQUIRE_HAS_ACTION, 286 1.1 mrg IOPARM_INQUIRE_HAS_DELIM, IOPARM_INQUIRE_HAS_PAD, 287 1.1 mrg IOPARM_INQUIRE_HAS_NAME, IOPARM_INQUIRE_HAS_SEQUENTIAL, 288 1.1 mrg IOPARM_INQUIRE_HAS_DIRECT, IOPARM_INQUIRE_HAS_FORMATTED, 289 1.1 mrg IOPARM_INQUIRE_HAS_UNFORMATTED, IOPARM_INQUIRE_HAS_READ, 290 1.1 mrg IOPARM_INQUIRE_HAS_WRITE, IOPARM_INQUIRE_HAS_READWRITE, 291 1.1 mrg IOPARM_DT_LIST_FORMAT, IOPARM_DT_NAMELIST_READ_MODE, 292 1.1 mrg IOPARM_DT_HAS_REC, IOPARM_DT_HAS_SIZE, IOPARM_DT_HAS_IOLENGTH, 293 1.1 mrg IOPARM_DT_HAS_FORMAT, IOPARM_DT_HAS_ADVANCE, 294 1.1 mrg IOPARM_DT_HAS_INTERNAL_UNIT, IOPARM_DT_HAS_NAMELIST_NAME, 295 1.1 mrg IOPARM_DT_IONML_SET): Define. 296 1.1 mrg (gfc_unit): Add lock, waiting and close fields. Change file 297 1.1 mrg from flexible array member into pointer to char. 298 1.1 mrg (open_external): Add st_parameter_open * argument. 299 1.1 mrg (find_file, file_exists): Add file and file_len arguments. 300 1.1 mrg (flush_all_units): New prototype. 301 1.1 mrg (max_offset, unit_root, unit_lock): New variable. 302 1.1 mrg (is_internal_unit, is_array_io, next_array_record, 303 1.1 mrg parse_format, next_format, unget_format, format_error, 304 1.1 mrg read_block, write_block, next_record, convert_real, 305 1.1 mrg read_a, read_f, read_l, read_x, read_radix, read_decimal, 306 1.1 mrg list_formatted_read, finish_list_read, namelist_read, 307 1.1 mrg namelist_write, write_a, write_b, write_d, write_e, write_en, 308 1.1 mrg write_es, write_f, write_i, write_l, write_o, write_x, write_z, 309 1.1 mrg list_formatted_write, get_unit): Add st_parameter_dt * argument. 310 1.1 mrg (insert_unit): Remove prototype. 311 1.1 mrg (find_or_create_unit, unlock_unit): New prototype. 312 1.1 mrg (new_unit): Return gfc_unit *. Add st_parameter_open * 313 1.1 mrg and gfc_unit * arguments. 314 1.1 mrg (free_fnodes): Remove prototype. 315 1.1 mrg (free_format_data): New prototype. 316 1.1 mrg (scratch): Remove. 317 1.1 mrg (init_at_eol): Remove prototype. 318 1.1 mrg (free_ionml): New prototype. 319 1.1 mrg (inc_waiting_locked, predec_waiting_locked, dec_waiting_unlocked): 320 1.1 mrg New inline functions. 321 1.1 mrg * io/unit.c (max_offset, unit_root, unit_lock): New variables. 322 1.1 mrg (insert): Adjust os_error caller. 323 1.1 mrg (insert_unit): Made static. Allocate memory here, initialize 324 1.1 mrg lock and after inserting it return it, locked. 325 1.1 mrg (delete_unit): Adjust for deletion of g. 326 1.1 mrg (find_unit_1): New function. 327 1.1 mrg (find_unit): Use it. 328 1.1 mrg (find_or_create_unit): New function. 329 1.1 mrg (get_unit): Add dtp argument, change meaning of the int argument 330 1.1 mrg as creation request flag. Adjust for different st_* calling 331 1.1 mrg conventions, lock internal unit's lock before returning it 332 1.1 mrg and removal of g. Call find_unit_1 instead of find_unit. 333 1.1 mrg (is_internal_unit, is_array_io): Add dtp argument, adjust for 334 1.1 mrg removal of most of global variables. 335 1.1 mrg (init_units): Initialize unit_lock. Adjust insert_unit callers 336 1.1 mrg and adjust for g removal. 337 1.1 mrg (close_unit_1): New function. 338 1.1 mrg (close_unit): Use it. 339 1.1 mrg (unlock_unit): New function. 340 1.1 mrg (close_units): Lock unit_lock, use close_unit_1 rather than 341 1.1 mrg close_unit. 342 1.1 mrg * io/close.c (st_close): Add clp argument. Adjust for new 343 1.1 mrg st_* calling conventions and internal function API changes. 344 1.1 mrg * io/file_pos.c (st_backspace, st_endfile, st_rewind, st_flush): 345 1.1 mrg Add fpp argument. Adjust for new st_* calling conventions and 346 1.1 mrg internal function API changes. 347 1.1 mrg (formatted_backspace, unformatted_backspace): Likewise. Add 348 1.1 mrg u argument. 349 1.1 mrg * io/open.c (edit_modes, st_open): Add opp argument. Adjust for 350 1.1 mrg new st_* calling conventions and internal function API changes. 351 1.1 mrg (already_open): Likewise. If not HAVE_UNLINK_OPEN_FILE, unlink 352 1.1 mrg scratch file. Instead of calling close_unit just call sclose, 353 1.1 mrg free u->file if any and clear a few u fields before calling 354 1.1 mrg new_unit. 355 1.1 mrg (new_unit): Return gfc_unit *. Add opp and u arguments. 356 1.1 mrg Adjust for new st_* calling conventions and internal function 357 1.1 mrg API changes. Don't allocate unit here, rather than work with 358 1.1 mrg already created unit u already locked on entry. In case 359 1.1 mrg of failure, close_unit it. 360 1.1 mrg * io/unix.c: Include unix.h. 361 1.1 mrg (BUFFER_SIZE, unix_stream): Moved to unix.h. 362 1.1 mrg (unit_to_fd): Add unlock_unit call. 363 1.1 mrg (tempfile): Add opp argument, use its fields rather than ioparm. 364 1.1 mrg (regular_file): Likewise. 365 1.1 mrg (open_external): Likewise. Only unlink file if fd >= 0. 366 1.1 mrg (init_error_stream): Add error argument, set structure it points 367 1.1 mrg to rather than filling static variable and returning its address. 368 1.1 mrg (FIND_FILE0_DECL, FIND_FILE0_ARGS): Define. 369 1.1 mrg (find_file0): Use them. Don't crash if u->s == NULL. 370 1.1 mrg (find_file): Add file and file_len arguments, use them instead 371 1.1 mrg of ioparm. Add locking. Pass either an array of 2 struct stat 372 1.1 mrg or file and file_len pair to find_file0. 373 1.1 mrg (flush_all_units_1, flush_all_units): New functions. 374 1.1 mrg (file_exists): Add file and file_len arguments, use them instead 375 1.1 mrg of ioparm. 376 1.1 mrg * io/unix.h: New file. 377 1.1 mrg * io/lock.c (ioparm, g, ionml): Remove variables. 378 1.1 mrg (library_start): Add cmp argument, adjust for new st_* calling 379 1.1 mrg conventions. 380 1.1 mrg (library_end): Remove. 381 1.1 mrg (free_ionml): New function. 382 1.1 mrg * io/inquire.c (inquire_via_unit, inquire_via_filename, 383 1.1 mrg st_inquire): Add iqp argument, adjust for new st_* calling 384 1.1 mrg conventions and internal function API changes. 385 1.1 mrg * io/format.c (FARRAY_SIZE): Decrease to 64. 386 1.1 mrg (fnode_array, format_data): New typedefs. 387 1.1 mrg (avail, array, format_string, string, error, saved_token, value, 388 1.1 mrg format_string_len, reversion_ok, saved_format): Remove variables. 389 1.1 mrg (colon_node): Add const. 390 1.1 mrg (free_fnode, free_fnodes): Remove. 391 1.1 mrg (free_format_data): New function. 392 1.1 mrg (next_char, unget_char, get_fnode, format_lex, parse_format_list, 393 1.1 mrg format_error, parse_format, revert, unget_format, next_test): Add 394 1.1 mrg fmt or dtp arguments, pass it all around, adjust for internal 395 1.1 mrg function API changes and adjust for removal of global variables. 396 1.1 mrg (next_format): Likewise. Constify return type. 397 1.1 mrg (next_format0): Constify return type. 398 1.1 mrg * io/transfer.c (current_unit, sf_seen_eor, eor_condition, max_pos, 399 1.1 mrg skips, pending_spaces, scratch, line_buffer, advance_status, 400 1.1 mrg transfer): Remove variables. 401 1.1 mrg (transfer_integer, transfer_real, transfer_logical, 402 1.1 mrg transfer_character, transfer_complex, transfer_array, current_mode, 403 1.1 mrg read_sf, read_block, read_block_direct, write_block, 404 1.1 mrg write_block_direct, unformatted_read, unformatted_write, 405 1.1 mrg type_name, write_constant_string, require_type, 406 1.1 mrg formatted_transfer_scalar, us_read, us_write, pre_position, 407 1.1 mrg data_transfer_init, next_record_r, next_record_w, next_record, 408 1.1 mrg finalize_transfer, iolength_transfer, iolength_transfer_init, 409 1.1 mrg st_iolength, st_iolength_done, st_read, st_read_done, st_write, 410 1.1 mrg st_write_done, st_set_nml_var, st_set_nml_var_dim, 411 1.1 mrg next_array_record): Add dtp argument, pass it all around, adjust for 412 1.1 mrg internal function API changes and removal of global variables. 413 1.1 mrg * io/list_read.c (repeat_count, saved_length, saved_used, 414 1.1 mrg input_complete, at_eol, comma_flag, last_char, saved_string, 415 1.1 mrg saved_type, namelist_mode, nml_read_error, value, parse_err_msg, 416 1.1 mrg nml_err_msg, prev_nl): Remove variables. 417 1.1 mrg (push_char, free_saved, next_char, unget_char, eat_spaces, 418 1.1 mrg eat_separator, finish_separator, nml_bad_return, convert_integer, 419 1.1 mrg parse_repeat, read_logical, read_integer, read_character, 420 1.1 mrg parse_real, read_complex, read_real, check_type, 421 1.1 mrg list_formatted_read_scalar, list_formatted_read, finish_list_read, 422 1.1 mrg find_nml_node, nml_untouch_nodes, nml_match_name, nml_query, 423 1.1 mrg namelist_read): Add dtp argument, pass it all around, adjust for 424 1.1 mrg internal function API changes and removal of global variables. 425 1.1 mrg (nml_parse_qualifier): Likewise. Add parse_err_msg argument. 426 1.1 mrg (nml_read_obj): Likewise. Add pprev_nl, nml_err_msg, clow and 427 1.1 mrg chigh arguments. 428 1.1 mrg (nml_get_obj_data): Likewise. Add pprev_nl and nml_err_msg 429 1.1 mrg arguments. 430 1.1 mrg (init_at_eol): Removed. 431 1.1 mrg * io/read.c (convert_real, read_l, read_a, next_char, read_decimal, 432 1.1 mrg read_radix, read_f, read_x): Add dtp argument, pass it all around, 433 1.1 mrg adjust for internal function API changes and removal of global 434 1.1 mrg variables. 435 1.1 mrg (set_integer): Adjust internal_error caller. 436 1.1 mrg * io/write.c (no_leading_blank, nml_delim): Remove variables. 437 1.1 mrg (write_a, calculate_sign, calculate_G_format, output_float, 438 1.1 mrg write_l, write_float, write_int, write_decimal, write_i, write_b, 439 1.1 mrg write_o, write_z, write_d, write_e, write_f, write_en, write_es, 440 1.1 mrg write_x, write_char, write_logical, write_integer, write_character, 441 1.1 mrg write_real, write_complex, write_separator, 442 1.1 mrg list_formatted_write_scalar, list_formatted_write, nml_write_obj, 443 1.1 mrg namelist_write): Add dtp argument, pass it all around, adjust for 444 1.1 mrg internal function API changes and removal of global variables. 445 1.1 mrg (extract_int, extract_uint, extract_real): Adjust internal_error 446 1.1 mrg callers. 447 1.1 mrg * runtime/fpu.c (_GNU_SOURCE): Don't define here. 448 1.1 mrg * runtime/error.c: Include ../io/unix.h. 449 1.1 mrg (filename, line): Remove variables. 450 1.1 mrg (st_printf): Pass address of a local variable to init_error_stream. 451 1.1 mrg (show_locus): Add cmp argument. Use fields it points to rather than 452 1.1 mrg filename and line variables. 453 1.1 mrg (os_error, runtime_error): Remove show_locus calls. 454 1.1 mrg (internal_error): Add cmp argument. Pass it down to show_locus. 455 1.1 mrg (generate_error): Likewise. Use flags bitmask instead of non-NULL 456 1.1 mrg check for iostat and iomsg parameter presence, adjust for st_* 457 1.1 mrg calling convention changes. 458 1.1 mrg * runtime/stop.c (stop_numeric, stop_string): Remove show_locus 459 1.1 mrg calls. 460 1.1 mrg * runtime/pause.c (pause_numeric, pause_string): Likewise. 461 1.1 mrg * runtime/string.c: Include ../io/io.h. 462 1.1 mrg (find_option): Add cmp argument. Pass it down to generate_error. 463 1.1 mrg * intrinsics/flush.c (recursive_flush): Remove. 464 1.1 mrg (flush_i4, flush_i8): Use flush_all_units. Add unlock_unit 465 1.1 mrg call. 466 1.1 mrg * intrinsics/rand.c: Include ../io/io.h. 467 1.1 mrg (rand_seed_lock): New variable. 468 1.1 mrg (srand, irand): Add locking. 469 1.1 mrg (init): New constructor function. 470 1.1 mrg * intrinsics/random.c: Include ../io/io.h. 471 1.1 mrg (random_lock): New variable. 472 1.1 mrg (random_r4, random_r8, arandom_r4, arandom_r8): Add locking. 473 1.1 mrg (random_seed): Likewise. open failed if fd < 0. Set i correctly. 474 1.1 mrg (init): New constructor function. 475 1.1 mrg * intrinsics/system_clock.c (tp0, t0): Remove. 476 1.1 mrg (system_clock_4, system_clock_8): Don't subtract tp0/t0 from current 477 1.1 mrg time, use just integer arithmetics. 478 1.1 mrg * intrinsics/tty.c (isatty_l4, isatty_l8, ttynam_sub): Add 479 1.1 mrg unlock_unit calls. 480 1.1 mrg 481 1.1 mrg 2005-11-20 Richard Henderson <rth (a] redhat.com> 482 1.1 mrg 483 1.1 mrg * Makefile.am: Revert 2005-11-14 change. Enable -free-vectorize 484 1.1 mrg via gmake per-target variables. 485 1.1 mrg * Makefile.in, aclocal.m4: Regenerate. 486 1.1 mrg 487 1.1 mrg 2005-11-18 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 488 1.1 mrg 489 1.1 mrg * configure.ac: Add "-I ." to the AM_FCFLAGS. 490 1.1 mrg * configure: Regenerate. 491 1.1 mrg 492 1.1 mrg 2005-11-18 Hans-Peter Nilsson <hp (a] axis.com> 493 1.1 mrg 494 1.1 mrg * config/fpu-glibc.h (set_fpu): Only call fedisableexcept for 495 1.1 mrg nonzero FE_ALL_EXCEPT. 496 1.1 mrg 497 1.1 mrg 2005-11-17 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 498 1.1 mrg 499 1.1 mrg PR fortran/24892 500 1.1 mrg * io/io.h (unit_access): Add ACCESS_APPEND. 501 1.1 mrg * io/open.c (access_opt): Add APPEND value for ACCESS keyword. 502 1.1 mrg (st_open): Use that new value to set the POSITION accordingly. 503 1.1 mrg 504 1.1 mrg 2005-11-14 Janne Blomqvist <jb (a] gcc.gnu.org> 505 1.1 mrg 506 1.1 mrg PR fortran/21468 507 1.1 mrg * Makefile.am: Add -ftree-vectorize for compiling matmul. 508 1.1 mrg * m4/matmul.m4: Add const and restrict to type declarations as 509 1.1 mrg appropriate. 510 1.1 mrg * m4/matmull.m4: Likewise. 511 1.1 mrg * Makefile.in: Regenerated. 512 1.1 mrg * generated/matmul_*.c: Likewise. 513 1.1 mrg 514 1.1 mrg 2005-11-13 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 515 1.1 mrg 516 1.1 mrg * intrinsics/fget.c: New file. 517 1.1 mrg * intrinsics/ftell.c: New file. 518 1.1 mrg * io/unix.c (stream_offset): New function. 519 1.1 mrg * io/io.h: Add prototype for stream_offset. 520 1.1 mrg * Makefile.am: Add intrinsics/fget.c and intrinsics/ftell.c. 521 1.1 mrg * Makefile.in: Regenerate. 522 1.1 mrg 523 1.1 mrg 2005-11-12 Steven G. Kargl <kargls (a] comcast.net> 524 1.1 mrg 525 1.1 mrg PR libfortran/24787 526 1.1 mrg * intrinsics/string_intrinsics.c (string_scan): Off by one; Fix typos 527 1.1 mrg in nearby comment. 528 1.1 mrg 529 1.1 mrg 2005-11-10 Andreas Jaeger <aj (a] suse.de> 530 1.1 mrg 531 1.1 mrg * libgfortran.h: Add proper defines where needed. 532 1.1 mrg 533 1.1 mrg 2005-11-10 Andreas Jaeger <aj (a] suse.de> 534 1.1 mrg 535 1.1 mrg * libgfortran.h: Add missing prototypes for internal_pack 536 1.1 mrg functions. 537 1.1 mrg 538 1.1 mrg 2005-11-06 Janne Blomqvist <jb (a] gcc.gnu.org> 539 1.1 mrg 540 1.1 mrg PR fortran/24174 541 1.1 mrg PR fortran/24305 542 1.1 mrg * io/io.h: Add argument to prototypes, add prototypes for 543 1.1 mrg size_from_*_kind functions. 544 1.1 mrg * io/list_read.c (read_complex): Add size argument, use 545 1.1 mrg it. 546 1.1 mrg (list_formatted_read): Add size argument, cleanup. 547 1.1 mrg (list_formatted_read_scalar): Add size argument. 548 1.1 mrg (nml_read_obj): Fix for padding. 549 1.1 mrg * io/transfer.c: Add argument to transfer function pointer. 550 1.1 mrg (unformatted_read): Add size argument. 551 1.1 mrg (unformatted_write): Likewise. 552 1.1 mrg (formatted_transfer_scalar): Fix for padding with complex(10). 553 1.1 mrg (formatted_transfer): Add size argument, cleanup. 554 1.1 mrg (transfer_integer): Add size argument to transfer call. 555 1.1 mrg (transfer_real): Likewise. 556 1.1 mrg (transfer_logical): Likewise. 557 1.1 mrg (transfer_character): Likewise. 558 1.1 mrg (transfer_complex): Likewise. 559 1.1 mrg (transfer_array): New kind argument, use it. 560 1.1 mrg (data_transfer_init): Add size argument to formatted_transfer 561 1.1 mrg call. 562 1.1 mrg (iolength_transfer): Add size argument, cleanup. 563 1.1 mrg * io/write.c (write_complex): Add size argument, fix for padding 564 1.1 mrg with complex(10). 565 1.1 mrg (list_formatted_write): Add size argument, cleanup. 566 1.1 mrg (list_formatted_write_scalar): Add size argument, use it. 567 1.1 mrg (nml_write_obj): Fix for size vs. kind issue. 568 1.1 mrg * io/size_from_kind.c: New file. 569 1.1 mrg * Makefile.am: Add io/size_from_kind.c. 570 1.1 mrg * configure: Regenerate. 571 1.1 mrg * Makefile.in: Regenerate. 572 1.1 mrg 573 1.1 mrg 2005-11-06 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 574 1.1 mrg 575 1.1 mrg * intrinsics/ctime.c: New file. 576 1.1 mrg * configure.ac: Add check for ctime. 577 1.1 mrg * Makefile.am: Add ctime.c 578 1.1 mrg * configure: Regenerate. 579 1.1 mrg * config.h.in: Regenerate. 580 1.1 mrg * Makefile.in: Regenerate. 581 1.1 mrg 582 1.1 mrg 2005-11-05 Richard Guenther <rguenther (a] suse.de> 583 1.1 mrg 584 1.1 mrg * configure.ac: Use AM_FCFLAGS for extra flags, not FCFLAGS. 585 1.1 mrg * configure: Regenerate. 586 1.1 mrg 587 1.1 mrg 2005-11-05 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 588 1.1 mrg 589 1.1 mrg * intrinsics/tty.c (ttynam): New function. 590 1.1 mrg 591 1.1 mrg 2005-11-04 Steven G. Kargl <kargls (a] comcast.net> 592 1.1 mrg 593 1.1 mrg PR fortran/24636 594 1.1 mrg * runtime/stop.c (stop_numeric): Use stop_code = -1. 595 1.1 mrg 596 1.1 mrg 2005-11-04 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 597 1.1 mrg 598 1.1 mrg PR libfortran/22298 599 1.1 mrg * runtime/main.c (stupid_function_name_for_static_linking): New 600 1.1 mrg function. 601 1.1 mrg * runtime/error.c (internal_error): Call 602 1.1 mrg stupid_function_name_for_static_linking. 603 1.1 mrg * libgfortran.h: Add prototype for 604 1.1 mrg stupid_function_name_for_static_linking. 605 1.1 mrg 606 1.1 mrg 2005-11-01 Paul Thomas <pault (a] gcc.gnu.org> 607 1.1 mrg 608 1.1 mrg PR fortran/14994 609 1.1 mrg * libgfortran/intrinsics/date_and_time.c: Add interface to 610 1.1 mrg the functions date_and_time for the intrinsic function secnds. 611 1.1 mrg 612 1.1 mrg 2005-10-31 Jerry DeLisle <jvdelisle (a] verizon.net> 613 1.1 mrg 614 1.1 mrg PR libfortran/24584 615 1.1 mrg * io/list_read.c (free_saved): Set saved_used to zero. 616 1.1 mrg 617 1.1 mrg 2005-10-30 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 618 1.1 mrg 619 1.1 mrg PR libfortran/20179 620 1.1 mrg * io/unix.c (flush_if_preconnected): New function. 621 1.1 mrg * io/io.h: Add prototype for flush_if_preconnected. 622 1.1 mrg * io/transfer.c (data_transfer_init): Use flush_if_preconnected 623 1.1 mrg to workaround buggy mixed C-Fortran code. 624 1.1 mrg 625 1.1 mrg 2005-10-30 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 626 1.1 mrg 627 1.1 mrg * Makefile.am: Add intrinsics/malloc.c file. 628 1.1 mrg * Makefile.in: Regenerate. 629 1.1 mrg * intrinsics/malloc.c: New file, with implementations for free 630 1.1 mrg and malloc library functions. 631 1.1 mrg 632 1.1 mrg 2005-10-29 Mike Stump <mrs (a] apple.com> 633 1.1 mrg 634 1.1 mrg * Makefile.am (kinds.h): Remove target, if command fails. 635 1.1 mrg (selected_int_kind.inc): Likewise. 636 1.1 mrg (selected_real_kind.inc): Likewise. 637 1.1 mrg * Makefile.in: Regenerate. 638 1.1 mrg 639 1.1 mrg 2005-10-28 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 640 1.1 mrg 641 1.1 mrg 642 1.1 mrg * Makefile.am (intrinsics): Add signal.c. 643 1.1 mrg * Makefile.in: Regenerate. 644 1.1 mrg * configure.ac: Checks for signal and alarm. 645 1.1 mrg * config.h.in: Regenerate. 646 1.1 mrg * configure: Regenerate. 647 1.1 mrg * intrinsics/signal.c: New file for SIGNAL and ALARM intrinsics. 648 1.1 mrg 649 1.1 mrg 2005-10-28 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 650 1.1 mrg 651 1.1 mrg * acinclude.m4 (LIBGFOR_CHECK_FPSETMASK): New check. 652 1.1 mrg * configure.ac: Check for floatingpoint.h, fptrap.h and float.h 653 1.1 mrg headers. Use LIBGFOR_CHECK_FPSETMASK. Check for fp_trap and 654 1.1 mrg fp_enable functions. 655 1.1 mrg * configure.host: Add case for systems with fpsetmask and systems 656 1.1 mrg with fp_trap/fp_enable. 657 1.1 mrg * config/fpu-sysv.h: New file, FPU code using fpsetmask. 658 1.1 mrg * config/fpu-aix.h: New file, FPU code for AIX using fp_trap and 659 1.1 mrg fp_enable. 660 1.1 mrg * aclocal.m4: Regenerate. 661 1.1 mrg * configure: Regenerate. 662 1.1 mrg * config.h.in: Regenerate. 663 1.1 mrg 664 1.1 mrg 2005-10-24 Jerry DeLisle <jvdelisle (a] verizon.net> 665 1.1 mrg 666 1.1 mrg PR libfortran/24224 667 1.1 mrg * libgfortran.h: Remove array stride error code. 668 1.1 mrg * runtime/error.c: Remove array stride error. 669 1.1 mrg * io/io.h: Change name of 'nml_loop_spec' to 'array_loop_spec' to be 670 1.1 mrg generic. Add pointer to array_loop_spec and rank to gfc_unit 671 1.1 mrg structure. 672 1.1 mrg * io/list_read.c: Revise nml_loop_spec references to array_loop_spec. 673 1.1 mrg * io/transfer.c (init_loop_spec): New function to initialize 674 1.1 mrg an array_loop_spec. 675 1.1 mrg (next_array_record): New function to return the index to the next array 676 1.1 mrg record by incrementing through the array_loop_spec. 677 1.1 mrg (next_record_r): Use new function. 678 1.1 mrg (next_record_w): Use new function. 679 1.1 mrg (finalize_transfer): Free memory allocated for array_loop_spec. 680 1.1 mrg * io/unit.c (get_array_unit_len): Delete this function. Use new 681 1.1 mrg function init_loop_spec to initialize the array_loop_spec. 682 1.1 mrg 683 1.1 mrg 2005-10-24 Paul Thomas <pault (a] gcc.gnu.org> 684 1.1 mrg 685 1.1 mrg PR fortran/24416 686 1.1 mrg * libgfortran/io/list_read.c (namelist_read): Exit with call to 687 1.1 mrg free_saved () so that character strings do not accumulate. 688 1.1 mrg 689 1.1 mrg 2005-10-23 Jerry DeLisle <jvdelisle (a] verizon.net> 690 1.1 mrg 691 1.1 mrg PR libfortran/24489 692 1.1 mrg * io/transfer.c (read_block): Change the order of execution to not read 693 1.1 mrg past end-of-record. 694 1.1 mrg (read_block_direct): Same change. 695 1.1 mrg 696 1.1 mrg 2005-10-23 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 697 1.1 mrg 698 1.1 mrg PR libfortran/23272 699 1.1 mrg * acinclude.m4 (LIBGFOR_CHECK_WORKING_STAT): New check. 700 1.1 mrg * configure.ac: Use LIBGFOR_CHECK_WORKING_STAT. 701 1.1 mrg * Makefile.in: Regenerate. 702 1.1 mrg * configure: Regenerate. 703 1.1 mrg * config.h.in: Regenerate. 704 1.1 mrg * aclocal.m4: Regenerate. 705 1.1 mrg * io/unix.c (compare_file_filename): Add fallback case for 706 1.1 mrg systems without working stat. 707 1.1 mrg * io/open.c (already_open): Correct call to 708 1.1 mrg compare_file_filename. 709 1.1 mrg * io/io.h: Correct proto for compare_file_filename. 710 1.1 mrg 711 1.1 mrg 2005-10-23 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 712 1.1 mrg 713 1.1 mrg * runtime/fpu.c: Add _GNU_SOURCE definition. 714 1.1 mrg * config/fpu-glibc.h: Remove __USE_GNU definition. 715 1.1 mrg 716 1.1 mrg 2005-10-23 Paul Thomas <pault (a] gcc.gnu.org> 717 1.1 mrg 718 1.1 mrg PR fortran/24384 719 1.1 mrg * intrinsics/spread_generic.c (spread_internal_scalar): New 720 1.1 mrg function that handles the special case of spread with a scalar 721 1.1 mrg source. This has new interface functions - 722 1.1 mrg (spread_scalar, spread_char_scalar): New functions to interface 723 1.1 mrg with the calls specified in gfc_resolve_spread. 724 1.1 mrg 725 1.1 mrg 2005-10-21 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 726 1.1 mrg 727 1.1 mrg PR libfortran/24383 728 1.1 mrg * io/unix.c: Add fallback definition for SSIZE_MAX. 729 1.1 mrg 730 1.1 mrg 2005-10-19 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 731 1.1 mrg 732 1.1 mrg * c99_protos.h: Define preprocessor HAVE_ macros with value 1 733 1.1 mrg instead of empty value. 734 1.1 mrg * intrinsics/c99_functions.c: Likewise. 735 1.1 mrg * intrinsics/getXid.c: Define HAVE_GETPID with value 1 instead of 736 1.1 mrg empty value. 737 1.1 mrg * intrinsics/sleep.c: Define HAVE_SLEEP with value 1 instead of 738 1.1 mrg empty value. 739 1.1 mrg 740 1.1 mrg 2005-10-19 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 741 1.1 mrg 742 1.1 mrg PR libfortran/24432 743 1.1 mrg * c99_protos.h: Define HAVE_ macros for all provided functions. 744 1.1 mrg 745 1.1 mrg 2005-10-14 Uros Bizjak <uros (a] kss-loka.si> 746 1.1 mrg 747 1.1 mrg * config/fpu-387.h (set_fpu): Remove extra ":" in stmxcsr. 748 1.1 mrg Change cw and cw_sse variables to unsigned. 749 1.1 mrg (SSE): New definition. 750 1.1 mrg (has_sse): Use it. 751 1.1 mrg 752 1.1 mrg 2005-10-13 Thomas Koenig <Thomas.Koenig (a] online.de> 753 1.1 mrg 754 1.1 mrg * io/unix.c(fd_alloc_r_at): Use read() instead of do_read() 755 1.1 mrg only in case of special files (e.g. terminals). 756 1.1 mrg 757 1.1 mrg 2005-10-13 Uros Bizjak <uros (a] kss-loka.si> 758 1.1 mrg 759 1.1 mrg * config/fpu-387.h (set_fpu): Add "=m" for stmxcsr. 760 1.1 mrg 761 1.1 mrg 2005-10-12 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 762 1.1 mrg 763 1.1 mrg * Makefile.am: Add fpu.c to the build process, and 764 1.1 mrg target-dependent code as fpu-target.h. 765 1.1 mrg * Makefile.in: Regenerate. 766 1.1 mrg * configure.ac: Add call to configure.host to set 767 1.1 mrg FPU_HOST_HEADER. 768 1.1 mrg * configure: Regenerate. 769 1.1 mrg * configure.host: New script to determine which host-dependent 770 1.1 mrg code should go in. 771 1.1 mrg * libgfortran.h: Add fpe option, remove previous fpu_ options. 772 1.1 mrg Add bitmasks for different FPE traps. Add prototype for set_fpu. 773 1.1 mrg * runtime/environ.c: Remove environment variables to control 774 1.1 mrg fpu behaviour. 775 1.1 mrg * runtime/fpu.c (set_fpe): New function for the front-end. 776 1.1 mrg * runtime/main.c (init): Set FPU state. 777 1.1 mrg * config: New directory to store host-dependent code. 778 1.1 mrg * config/fpu-387.h: New file with code handling the i387 FPU. 779 1.1 mrg * config/fpu-glibc.h: New file with code for glibc systems. 780 1.1 mrg * config/fpu-generic.h: Fallback for the most generic host. Issue 781 1.1 mrg warnings. 782 1.1 mrg 783 1.1 mrg 2005-10-12 Janne Blomqvist <jblomqvi (a] cc.hut.fi> 784 1.1 mrg 785 1.1 mrg * io/unix.c(fd_alloc_r_at): Remove parts of patch of 2005/10/07 that 786 1.1 mrg cause input from the terminal to hang. 787 1.1 mrg 788 1.1 mrg 2005-10-11 Steven G. Kargl <kargls (a] comcast.net> 789 1.1 mrg 790 1.1 mrg PR libfortran/24313 791 1.1 mrg * c99_functions.c (csqrtf, csqrt): Fix choice of branch cut. Note 792 1.1 mrg csqrt{f} were imported from glibc, and this bug is still present 793 1.1 mrg there. glibc PR is 1146. 794 1.1 mrg 795 1.1 mrg 2005-10-07 Janne Blomqvist <jblomqvi (a] cc.hut.fi> 796 1.1 mrg 797 1.1 mrg PR fortran/16339 798 1.1 mrg PR fortran/23363 799 1.1 mrg * io/io.h: Add read and write members to stream, define access 800 1.1 mrg macros. 801 1.1 mrg * io/transfer.c (read_block_direct): New function. 802 1.1 mrg (write_block_direct): New function. 803 1.1 mrg (unformatted_read): Change to use read_block_direct. 804 1.1 mrg (unformatted_write): Change to use write_block_direct. 805 1.1 mrg * io/unix.c: Remove mmap includes and defines. 806 1.1 mrg (writen): Remove. 807 1.1 mrg (readn): Remove. 808 1.1 mrg (reset_stream): New function. 809 1.1 mrg (do_read): New function. 810 1.1 mrg (do_write): New function. 811 1.1 mrg (fd_flush): Change to use do_write() instead of writen(). 812 1.1 mrg (fd_alloc_r_at): Change to use do_read(). 813 1.1 mrg (fd_seek): Change return type to try, as the prototype. Add check 814 1.1 mrg to avoid syscall overhead if possible. 815 1.1 mrg (fd_read): New function. 816 1.1 mrg (fd_write): New function. 817 1.1 mrg (fd_open): Set pointers for new functions. 818 1.1 mrg (mem_read): New function. 819 1.1 mrg (mem_write): New function. 820 1.1 mrg (open_internal): Set pointers for new functions. 821 1.1 mrg (is_seekable): Clean up comment. 822 1.1 mrg 823 1.1 mrg 2005-10-07 Jerry DeLisle <jvdelisle (a] verizon.net> 824 1.1 mrg 825 1.1 mrg * io/transfer.c (write_block): Add test for end-of-file condition, 826 1.1 mrg removed from mem_alloc_w_at. (next_record_w): Clean up checks for 827 1.1 mrg NULL pointer returns from s_alloc_w. 828 1.1 mrg * io/unix.c (mem_alloc_w_at): Remove call to generate_error end-of-file. 829 1.1 mrg * io/write.c (write_float): Add checks for NULL pointer returns from 830 1.1 mrg write_block calls. (write_integer): Same. 831 1.1 mrg 832 1.1 mrg 2005-10-03 Jakub Jelinek <jakub (a] redhat.com> 833 1.1 mrg 834 1.1 mrg * runtime/memory.c (allocate_size): Malloc 1 byte if size == 0. 835 1.1 mrg 836 1.1 mrg 2005-10-03 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 837 1.1 mrg 838 1.1 mrg PR libfortran/19308 839 1.1 mrg PR libfortran/22437 840 1.1 mrg * Makefile.am: Add generated files for large real and integers 841 1.1 mrg kinds. Add a rule to create the kinds.inc c99_protos.inc files. 842 1.1 mrg Use kinds.inc to preprocess Fortran generated files. 843 1.1 mrg * libgfortran.h: Add macro definitions for GFC_INTEGER_16_HUGE, 844 1.1 mrg GFC_REAL_10_HUGE and GFC_REAL_16_HUGE. Add types gfc_array_i16, 845 1.1 mrg gfc_array_r10, gfc_array_r16, gfc_array_c10, gfc_array_c16, 846 1.1 mrg gfc_array_l16. 847 1.1 mrg * mk-kinds-h.sh: Define macros HAVE_GFC_LOGICAL_* and 848 1.1 mrg HAVE_GFC_COMPLEX_* when these types are available. 849 1.1 mrg * intrinsics/ishftc.c (ishftc16): New function for GFC_INTEGER_16. 850 1.1 mrg * m4/all.m4, m4/any.m4, m4/count.m4, m4/cshift1.m4, m4/dotprod.m4, 851 1.1 mrg m4/dotprodc.m4, m4/dotprodl.m4, m4/eoshift1.m4, m4/eoshift3.m4, 852 1.1 mrg m4/exponent.m4, m4/fraction.m4, m4/in_pack.m4, m4/in_unpack.m4, 853 1.1 mrg m4/matmul.m4, m4/matmull.m4, m4/maxloc0.m4, m4/maxloc1.m4, 854 1.1 mrg m4/maxval.m4, m4/minloc0.m4, m4/minloc1.m4, m4/minval.m4, m4/mtype.m4, 855 1.1 mrg m4/nearest.m4, m4/pow.m4, m4/product.m4, m4/reshape.m4, 856 1.1 mrg m4/set_exponent.m4, m4/shape.m4, m4/specific.m4, m4/specific2.m4, 857 1.1 mrg m4/sum.m4, m4/transpose.m4: Protect generated functions with 858 1.1 mrg appropriate "#if defined (HAVE_GFC_type_kind)" preprocessor directives. 859 1.1 mrg * Makefile.in: Regenerate. 860 1.1 mrg * all files in generated/: Regenerate. 861 1.1 mrg 862 1.1 mrg 2005-10-01 Jakub Jelinek <jakub (a] redhat.com> 863 1.1 mrg 864 1.1 mrg * runtime/memory.c (malloc_t): Remove. 865 1.1 mrg (GFC_MALLOC_MAGIC, HEADER_SIZE, DATA_POINTER, DATA_HEADER): Remove. 866 1.1 mrg (mem_root, runtime_cleanup, malloc_with_header): Remove. 867 1.1 mrg (internal_malloc_size): Use just get_mem if size != 0, return NULL 868 1.1 mrg otherwise. 869 1.1 mrg (internal_free): Just free if non-NULL. 870 1.1 mrg (internal_realloc_size): Remove debugging stuff. 871 1.1 mrg (allocate_size): Use malloc directly, remove debugging stuff. 872 1.1 mrg (deallocate): Use free directly, fix error message wording. 873 1.1 mrg 874 1.1 mrg * libgfortran.h (GFC_ITOA_BUF_SIZE, GFC_XTOA_BUF_SIZE, 875 1.1 mrg GFC_OTOA_BUF_SIZE, GFC_BTOA_BUF_SIZE): Define. 876 1.1 mrg (gfc_itoa, xtoa): Add 2 extra arguments. 877 1.1 mrg * runtime/environ.c: Include stdio.h. 878 1.1 mrg (check_buffered): Use sprintf. 879 1.1 mrg * runtime/error.c: Include assert.h. 880 1.1 mrg (gfc_itoa, xtoa): Add 2 extra arguments, avoid using static 881 1.1 mrg buffers. 882 1.1 mrg (st_printf, st_sprintf): Adjust callers. 883 1.1 mrg * io/write.c (otoa, btoa): Add 2 extra arguments, avoid using 884 1.1 mrg static buffers. 885 1.1 mrg (write_int, write_decimal): Add 2 extra arguments to conv 886 1.1 mrg function pointer, adjust caller. 887 1.1 mrg (write_integer): Adjust gfc_itoa caller. 888 1.1 mrg 889 1.1 mrg * io/unit.c (get_array_unit_len): Return 0 rather than NULL. 890 1.1 mrg 891 1.1 mrg * io/read.c (read_f): Remove spurious pointer dereference. 892 1.1 mrg 893 1.1 mrg 2005-09-30 Janne Blomqvist <jblomqvi (a] cc.hut.fi> 894 1.1 mrg 895 1.1 mrg PR 24112 896 1.1 mrg * io/open.c (edit_modes): Check for correct flag. 897 1.1 mrg 898 1.1 mrg 2005-09-29 Jakub Jelinek <jakub (a] redhat.com> 899 1.1 mrg 900 1.1 mrg * runtime/string.c (find_option): Change 3rd argument to 901 1.1 mrg const st_option *. 902 1.1 mrg * libgfortran.h (find_option): Likewise. 903 1.1 mrg * runtime/environ.c (rounding, precision, signal_choices): Constify. 904 1.1 mrg (init_choice, show_choice): Change 2nd argument to const choice *. 905 1.1 mrg * io/open.c (access_opt, action_opt, blank_opt, delim_opt, form_opt, 906 1.1 mrg position_opt, status_opt, pad_opt): Constify. 907 1.1 mrg * io/transfer.c (advance_opt): Likewise. 908 1.1 mrg * io/inquire.c (undefined): Likewise. 909 1.1 mrg * io/close.c (status_opt): Likewise. 910 1.1 mrg * io/format.c (posint_required, period_required, nonneg_required, 911 1.1 mrg unexpected_element, unexpected_end, bad_string, bad_hollerith, 912 1.1 mrg reversion_error): Likewise. 913 1.1 mrg * io/unix.c (yes, no, unknown): Change from const char * 914 1.1 mrg into const char []. 915 1.1 mrg 916 1.1 mrg 2005-09-27 Steve Ellcey <sje (a] cup.hp.com> 917 1.1 mrg 918 1.1 mrg PR target/23552 919 1.1 mrg * acinclude.m4 (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE): New. 920 1.1 mrg (LIBGFOR_CHECK_FOR_BROKEN_ISNAN): New. 921 1.1 mrg (LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): New. 922 1.1 mrg * configure.ac (LIBGFOR_CHECK_FOR_BROKEN_ISFINITE): Add use. 923 1.1 mrg (LIBGFOR_CHECK_FOR_BROKEN_ISNAN): Add use. 924 1.1 mrg (LIBGFOR_CHECK_FOR_BROKEN_FPCLASSIFY): Add use. 925 1.1 mrg * configure: Regenerate. 926 1.1 mrg * config.h.in: Regenerate. 927 1.1 mrg * libgfortan.h (isfinite): undef if broken, set if needed. 928 1.1 mrg (isnan): undef if broken, set if needed. 929 1.1 mrg (fpclassify): undef if broken, set if needed. 930 1.1 mrg * io/write.c: Remove TODO comment about working isfinite. 931 1.1 mrg * intrinsics/c99_functions.c (round): Use isfinite instead 932 1.1 mrg of fpclassify. 933 1.1 mrg * intrinsics/c99_functions.c (roundf): Ditto. 934 1.1 mrg 935 1.1 mrg 2005-09-24 Janne Blomqvist <jblomqvi (a] cc.hut.fi> 936 1.1 mrg 937 1.1 mrg * io.h: Changed prototypes of list_formatted_{read|write}. 938 1.1 mrg * list_read.c (list_formatted_read): Renamed to 939 1.1 mrg list_formatted_read_scalar and made static. 940 1.1 mrg (list_formatted_read): New function. 941 1.1 mrg * transfer.c: Prototype for transfer_array. Changed transfer 942 1.1 mrg function pointer. 943 1.1 mrg (unformatted_read): Add nelems argument, use it. 944 1.1 mrg (unformatted_write): Likewise. 945 1.1 mrg (formatted_transfer): Changed name to formatted_transfer_scalar. 946 1.1 mrg (formatted_transfer): New function. 947 1.1 mrg (transfer_integer): Add nelems argument to transfer call, move 948 1.1 mrg updating item count to transfer functions. 949 1.1 mrg (transfer_real): Likewise. 950 1.1 mrg (transfer_logical): Likewise. 951 1.1 mrg (transfer_character): Likewise. 952 1.1 mrg (transfer_complex): Likewise. 953 1.1 mrg (transfer_array): New function. 954 1.1 mrg (data_transfer_init): Call formatted_transfer with new argument. 955 1.1 mrg (iolength_transfer): New argument, use it. 956 1.1 mrg * write.c (list_formatted_write): Renamed to 957 1.1 mrg list_formatted_write_scalar, made static. 958 1.1 mrg (list_formatted_write): New function. 959 1.1 mrg 960 1.1 mrg 2005-09-26 David Edelsohn <edelsohn (a] gnu.org> 961 1.1 mrg 962 1.1 mrg * configure.ac: Add check for __clog. 963 1.1 mrg * configure: Regenerate. 964 1.1 mrg 965 1.1 mrg 2005-09-25 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 966 1.1 mrg 967 1.1 mrg * c99_protos.h: Add prototypes for C99 complex functions. 968 1.1 mrg * libgfortran.h: Include complex.h before c99_protos.h. 969 1.1 mrg * intrinsics/c99_functions.c: Define HAVE_ macros for the 970 1.1 mrg fallback functions we provide. 971 1.1 mrg (cabsf, cabs, cabsl, cargf, carg, cargl, cexpf, cexp, cexpl, 972 1.1 mrg clogf, clog, clogl, clog10f, clog10, clog10l, cpowf, cpow, cpowl, 973 1.1 mrg cqsrtf, csqrt, csqrtl, csinhf, csinh, csinhl, ccoshf, ccosh, 974 1.1 mrg ccoshl, ctanhf, ctanh, ctanhl, csinf, csin, csinl, ccosf, ccos, 975 1.1 mrg ccosl, ctanf, ctan, ctanl): New fallback functions. 976 1.1 mrg * Makefile.am (gfor_math_trig_c, gfor_math_trig_obj, 977 1.1 mrg gfor_specific_c, gfor_cmath_src, gfor_cmath_obj): Remove. 978 1.1 mrg * Makefile.in: Regenerate. 979 1.1 mrg * configure.ac: Remove checks for csin. Add checks for all C99 980 1.1 mrg complex functions. 981 1.1 mrg * config.h.in: Regenerate. 982 1.1 mrg * configure: Regenerate. 983 1.1 mrg * aclocal.m4: Regenerate. 984 1.1 mrg 985 1.1 mrg 2005-09-25 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 986 1.1 mrg Danny Smith <dannysmith (a] users.sourceforge.net> 987 1.1 mrg 988 1.1 mrg PR libfortran/23803 989 1.1 mrg * intrinsics/getXid.c: Add getpid wrapper for MinGW. 990 1.1 mrg * intrinsics/getlog.c: Add getlogin wrapper for MinGW. 991 1.1 mrg * intrinsics/hostnm.c: Add gethostname wrapper for MinGW. 992 1.1 mrg 993 1.1 mrg 2005-09-24 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 994 1.1 mrg 995 1.1 mrg PR libfortran/23802 996 1.1 mrg * intrinsics/sleep.c: Add correct sleep macro for MinGW. 997 1.1 mrg 998 1.1 mrg 2005-09-24 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 999 1.1 mrg 1000 1.1 mrg PR libfortran/23380 1001 1.1 mrg * intrinsics/cpu_time.c (__cpu_time_1): Provide a MS Windows 1002 1.1 mrg version. 1003 1.1 mrg 1004 1.1 mrg 2005-09-14 Jerry DeLisle <jvdelisle (a] verizon.net 1005 1.1 mrg 1006 1.1 mrg PR fortran/21875 Internal Unit Array I/O, NIST 1007 1.1 mrg * libgfortran.h: Add run time error code for array stride. 1008 1.1 mrg * runtime/error.c (translate_error): Add error message for 1009 1.1 mrg array stride. 1010 1.1 mrg * io/io.h: Add array descriptor pointer to IOPARM structure. 1011 1.1 mrg Add prtotypes for two new functions. 1012 1.1 mrg * io/transfer.c (data_transfer_init): Removed initialization and 1013 1.1 mrg moved to unit.c (get_unit) 1014 1.1 mrg * io/transfer.c (next_record_r): Include internal unit read 1015 1.1 mrg functionality. 1016 1.1 mrg * io/transfer.c (next_record_w): Include internal unit write 1017 1.1 mrg functionality, including padding of character array records. 1018 1.1 mrg * io/unit.c (get_array_unit_len): New function to return the number 1019 1.1 mrg of records in the character array 'file' from the array descriptor. 1020 1.1 mrg * io/unit.c (get_unit): Gathered initialization code from 1021 1.1 mrg init_data_transfer for internal units and added initialization of 1022 1.1 mrg character array unit. 1023 1.1 mrg * io/unit.c (is_array_io): New function to determine if internal unit 1024 1.1 mrg is an array. 1025 1.1 mrg * io/unix.c (mem_alloc_w_at): Add error checks for bad record length 1026 1.1 mrg and end of file. 1027 1.1 mrg 1028 1.1 mrg 2005-09-13 Richard Sandiford <richard (a] codesourcery.com> 1029 1.1 mrg 1030 1.1 mrg PR target/19269 1031 1.1 mrg * intrinsics/cshift0.c (cshift0): Add an extra size argument. 1032 1.1 mrg (cshift0_1, cshift0_2, cshift0_4, cshift0_8): Replace explicit 1033 1.1 mrg implementations with... 1034 1.1 mrg (DEFINE_CSHIFT): ...this new macro. Define character versions too. 1035 1.1 mrg * intrinsics/eoshift0.c (zeros): Delete. 1036 1.1 mrg (eoshift0): Add extra size and filler arguments. Use memset if no 1037 1.1 mrg bound is provided. 1038 1.1 mrg (eoshift0_1, eoshift0_2, eoshift0_4, eoshift0_8): Replace explicit 1039 1.1 mrg implementations with... 1040 1.1 mrg (DEFINE_EOSHIFT): ...this new macro. Define character versions too. 1041 1.1 mrg * intrinsics/eoshift2.c (zeros): Delete. 1042 1.1 mrg (eoshift2): Add extra size and filler arguments. Use memset if no 1043 1.1 mrg bound is provided. 1044 1.1 mrg (eoshift2_1, eoshift2_2, eoshift2_4, eoshift2_8): Replace explicit 1045 1.1 mrg implementations with... 1046 1.1 mrg (DEFINE_EOSHIFT): ...this new macro. Define character versions too. 1047 1.1 mrg * intrinsics/pack.c (pack_internal): New static function, reusing 1048 1.1 mrg the contents of pack and adding an extra size argument. Change 1049 1.1 mrg "mptr" rather than "m" when calculating the array size. 1050 1.1 mrg (pack): Redefine as a forwarder to pack_internal. 1051 1.1 mrg (pack_s_internal): New static function, reusing the contents of 1052 1.1 mrg pack_s and adding an extra size argument. 1053 1.1 mrg (pack_s): Redefine as a forwarder to pack_s_internal. 1054 1.1 mrg (pack_char, pack_s_char): New functions. 1055 1.1 mrg * intrinsics/reshape.c (reshape_internal): New static function, 1056 1.1 mrg reusing the contents of reshape and adding an extra size argument. 1057 1.1 mrg (reshape): Redefine as a forwarder to reshape_internal. 1058 1.1 mrg (reshape_char): New function. 1059 1.1 mrg * intrinsics/spread.c (spread_internal): New static function, 1060 1.1 mrg reusing the contents of spread and adding an extra size argument. 1061 1.1 mrg (spread): Redefine as a forwarder to spread_internal. 1062 1.1 mrg (spread_char): New function. 1063 1.1 mrg * intrinsics/transpose.c (transpose_internal): New static function, 1064 1.1 mrg reusing the contents of transpose and adding an extra size argument. 1065 1.1 mrg (transpose): Redefine as a forwarder to transpose_internal. 1066 1.1 mrg (transpose_char): New function. 1067 1.1 mrg * intrinsics/unpack.c (unpack_internal): New static function, reusing 1068 1.1 mrg the contents of unpack1 and adding extra size and fsize arguments. 1069 1.1 mrg (unpack1): Redefine as a forwarder to unpack_internal. 1070 1.1 mrg (unpack0): Call unpack_internal instead of unpack1. 1071 1.1 mrg (unpack1_char, unpack0_char): New functions. 1072 1.1 mrg * m4/cshift1.m4 (cshift1): New static function, reusing the contents 1073 1.1 mrg of cshift1_<kind> and adding an extra size argument. 1074 1.1 mrg (cshift1_<kind>): Redefine as a forwarder to cshift1. 1075 1.1 mrg (cshift1_<kind>_char): New function. 1076 1.1 mrg * m4/eoshift1.m4 (zeros): Delete. 1077 1.1 mrg (eoshift1): New static function, reusing the contents of 1078 1.1 mrg eoshift1_<kind> and adding extra size and filler arguments. 1079 1.1 mrg Fix calculation of hstride. Use memset if no bound is provided. 1080 1.1 mrg (eoshift1_<kind>): Redefine as a forwarder to eoshift1. 1081 1.1 mrg (eoshift1_<kind>_char): New function. 1082 1.1 mrg * m4/eoshift3.m4 (zeros): Delete. 1083 1.1 mrg (eoshift3): New static function, reusing the contents of 1084 1.1 mrg eoshift3_<kind> and adding extra size and filler arguments. 1085 1.1 mrg Use memset if no bound is provided. 1086 1.1 mrg (eoshift3_<kind>): Redefine as a forwarder to eoshift3. 1087 1.1 mrg (eoshift3_<kind>_char): New function. 1088 1.1 mrg * generated/cshift1_4.c, generated/cshift1_8.c, 1089 1.1 mrg * generated/eoshift1_4.c, generated/eoshift1_8.c, 1090 1.1 mrg * generated/eoshift3_4.c, generated/eoshift3_8.c: Regenerate. 1091 1.1 mrg 1092 1.1 mrg 2005-09-11 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1093 1.1 mrg 1094 1.1 mrg PR libfortran/20179 1095 1.1 mrg * io/unix.c (is_preconnected): Add function to test if a stream 1096 1.1 mrg corresponds to a preconnected unit. 1097 1.1 mrg * io/io.h: Add prototype for is_preconnected. 1098 1.1 mrg * io/transfer.c (data_transfer_init): Do not truncate 1099 1.1 mrg preconnected units. 1100 1.1 mrg 1101 1.1 mrg 2005-09-10 Janne Blomqvist <jblomqvi (a] cc.hut.fi> 1102 1.1 mrg 1103 1.1 mrg * io/unix.c: Remove mmap code. 1104 1.1 mrg 1105 1.1 mrg 2005-09-09 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1106 1.1 mrg 1107 1.1 mrg PR libfortran/23784 1108 1.1 mrg * io/close.c (st_close): Call library_end even in case of error. 1109 1.1 mrg 1110 1.1 mrg 2005-09-09 Thomas Koenig <Thomas.Koenig (a] online.de> 1111 1.1 mrg 1112 1.1 mrg * io/io.h: Add iomsg as last field of st_parameter. 1113 1.1 mrg * runtime/error.c (generate_error): If iomsg is present, copy 1114 1.1 mrg the message there. 1115 1.1 mrg 1116 1.1 mrg 2005-09-09 Richard Sandiford <richard (a] codesourcery.com> 1117 1.1 mrg 1118 1.1 mrg PR fortran/12840 1119 1.1 mrg * runtime/memory.c (internal_malloc_size): Return a null pointer 1120 1.1 mrg if the size is zero. 1121 1.1 mrg (internal_free): Do nothing if the pointer is null. 1122 1.1 mrg (internal_realloc_size, internal_realloc, internal_realloc64): New. 1123 1.1 mrg 1124 1.1 mrg 2005-09-07 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1125 1.1 mrg 1126 1.1 mrg PR libfortran/23262 1127 1.1 mrg * acinclude.m4 (LIBGFOR_CHECK_CRLF): New check. 1128 1.1 mrg * configure.ac: Use new check. 1129 1.1 mrg * configure.in: Regenerate. 1130 1.1 mrg * config.h.in: Regenerate. 1131 1.1 mrg * configure: Regenerate. 1132 1.1 mrg * io/transfer.c (next_record_w): Add case for CRLF as line 1133 1.1 mrg terminator. 1134 1.1 mrg * io/unix.c (tempfile, regular_file): Open files with 1135 1.1 mrg O_BINARY on systems with CRLF. 1136 1.1 mrg 1137 1.1 mrg 2005-09-07 Steve Ellcey <sje (a] cup.hp.com> 1138 1.1 mrg 1139 1.1 mrg PR libfortran/23419 1140 1.1 mrg * io/write.c (extract_int): Use memcpy to access buffer. 1141 1.1 mrg (extract_uint): Ditto. 1142 1.1 mrg (extract_real): Ditto. 1143 1.1 mrg 1144 1.1 mrg 2005-09-05 Thomas Koenig <Thomas.Koenig (a] online.de> 1145 1.1 mrg 1146 1.1 mrg * io/list_read.c: Adjust size of of value to 32 (to hold 1147 1.1 mrg kind=16 complex values). 1148 1.1 mrg 1149 1.1 mrg 2005-09-04 Thomas Koenig <Thomas.Koenig (a] online.de> 1150 1.1 mrg 1151 1.1 mrg PR libfortran/23321 1152 1.1 mrg * io/transfer.c(data_transfer_init): Check for a too-large 1153 1.1 mrg record number. Return if sseek failed. 1154 1.1 mrg 1155 1.1 mrg 2005-09-03 Jakub Jelinek <jakub (a] redhat.com> 1156 1.1 mrg 1157 1.1 mrg * io/read.c (read_x): Take int argument instead of fnode * and 1158 1.1 mrg digging the N from F->u.n. 1159 1.1 mrg * io/io.h (read_x): Adjust prototype. 1160 1.1 mrg * io/transfer.c (formatted_transfer): Adjust callers. Don't clobber 1161 1.1 mrg f->u.n for FMT_T. 1162 1.1 mrg 1163 1.1 mrg 2005-09-02 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1164 1.1 mrg 1165 1.1 mrg * io/unix.c (stream_ttyname): Protect use of ttyname by 1166 1.1 mrg HAVE_TTYNAME macro. 1167 1.1 mrg * configure.ac: Add check for ttyname. 1168 1.1 mrg * config.h.in: Regenerate. 1169 1.1 mrg * configure: Regenerate. 1170 1.1 mrg 1171 1.1 mrg 2005-09-02 Andreas Jaeger <aj (a] suse.de> 1172 1.1 mrg 1173 1.1 mrg * libgfortran.h: Add prototype for init_compile_options. 1174 1.1 mrg 1175 1.1 mrg * io/io.h: Add prototype for notify_std. 1176 1.1 mrg 1177 1.1 mrg 2005-08-31 Steve Ellcey <sje (a] cup.hp.com> 1178 1.1 mrg 1179 1.1 mrg * io/read.c (set_integer): Use memcpy to fill buffer. 1180 1.1 mrg 1181 1.1 mrg 2005-08-31 Steve Ellcey <sje (a] cup.hp.com> 1182 1.1 mrg 1183 1.1 mrg PR target/23556 1184 1.1 mrg * io/read.c (convert_real): Use memcpy to fill buffer. 1185 1.1 mrg 1186 1.1 mrg 2005-08-29 Thomas Koenig <Thomas.Koenig (a] online.de> 1187 1.1 mrg 1188 1.1 mrg PR libfortran/23598 1189 1.1 mrg * io/lock.c(library_start): If ioparm.iostat is present, clear 1190 1.1 mrg it unconditionally. 1191 1.1 mrg 1192 1.1 mrg 2005-08-27 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1193 1.1 mrg 1194 1.1 mrg * acinclude.m4 (LIBGFOR_CHECK_UNLINK_OPEN_FILE): Add check to see 1195 1.1 mrg if target can unlink open files. 1196 1.1 mrg * configure.ac: Use this new test. 1197 1.1 mrg * config.h.in: Regenerate. 1198 1.1 mrg * configure: Regenerate. 1199 1.1 mrg * Makefile.in: Regenerate. 1200 1.1 mrg * aclocal.ac: Regenerate. 1201 1.1 mrg * io/io.h: Add prototype for unpack_filename. 1202 1.1 mrg * io/close.c (st_close): Delete file after closing unit if 1203 1.1 mrg HAVE_UNLINK_OPEN_FILE is not defined. 1204 1.1 mrg * io/unix.c (unpack_filename): Unlink scratch file after opening 1205 1.1 mrg it only if HAVE_UNLINK_OPEN_FILE is defined. 1206 1.1 mrg 1207 1.1 mrg 2005-08-17 Kelley Cook <kcook (a] gcc.gnu.org> 1208 1.1 mrg 1209 1.1 mrg * All files: Update FSF address. 1210 1.1 mrg 1211 1.1 mrg 2005-08-16 Thomas Koenig <Thomas.Koenig (a] online.de> 1212 1.1 mrg 1213 1.1 mrg PR libfortran/23428 1214 1.1 mrg * io/transfer.c (iolength_transfer): Remove __attribute__ ((unused)) 1215 1.1 mrg from type. Return correct length for inquire(iolength=) 1216 1.1 mrg for complex variables. 1217 1.1 mrg 1218 1.1 mrg 2005-08-11 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1219 1.1 mrg Steven Bosscher <stevenb (a] suse.de> 1220 1.1 mrg 1221 1.1 mrg PR libfortran/20006 1222 1.1 mrg * Makefile.am: Add file runtime/compile_options.c. 1223 1.1 mrg * Makefile.in: Regenerate. 1224 1.1 mrg * libgfortran.h: Create structure compile_options_t. Define the 1225 1.1 mrg compile_options variable and GFC_STD_ macros. 1226 1.1 mrg * runtime/compile_options.c: New file. 1227 1.1 mrg * runtime/error.c (notify_std): New function. 1228 1.1 mrg * runtime/main.c (init): Call init_compile_options during 1229 1.1 mrg initialization. 1230 1.1 mrg * io/format.c: Use the new notify_std function for the $ 1231 1.1 mrg descriptor extension. 1232 1.1 mrg 1233 1.1 mrg 2005-08-09 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1234 1.1 mrg * Makefile.am: Add file intrinsics/tty.c to Makefile process. 1235 1.1 mrg * Makefile.in: Regenerate. 1236 1.1 mrg * io/io.h: Prototypes for new functions stream_isatty and 1237 1.1 mrg stream_ttyname. 1238 1.1 mrg * io/unix (stream_isatty, stream_ttyname): New functions to call 1239 1.1 mrg isatty() and ttyname() on a given unit. 1240 1.1 mrg * intrinsics/tty.c: New file to implement g77 intrinsics TTYNAM 1241 1.1 mrg and ISATTY. 1242 1.1 mrg 1243 1.1 mrg 2005-08-08 Jerry DeLisle <jvdelisle (a] verizon.net> 1244 1.1 mrg 1245 1.1 mrg PR libfortran/23154 1246 1.1 mrg * io/transfer.c (data_transfer_init): Initialize 1247 1.1 mrg current_unit->bytes_left for a read. 1248 1.1 mrg 1249 1.1 mrg 2005-08-07 Janne Blomqvist <jblomqvi (a] cc.hut.fi> 1250 1.1 mrg 1251 1.1 mrg PR fortran/22390 1252 1.1 mrg * io/backspace.c: File removed, contents moved to ... 1253 1.1 mrg * io/endfile.c: Ditto. 1254 1.1 mrg * io/rewind.c: Ditto. 1255 1.1 mrg * io/file_pos.c: New file, ... here. 1256 1.1 mrg * Makefile.am: Add file_pos.c to list, remove obsolete files. 1257 1.1 mrg * Makefile.in: Regenerated. 1258 1.1 mrg 1259 1.1 mrg 2005-08-07 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1260 1.1 mrg 1261 1.1 mrg * io/io.h: Change DEFAULT_TEMPDIR to /tmp instead of /var/tmp. 1262 1.1 mrg * io/unix.c (tempfile): Look at the TEMP environment variable 1263 1.1 mrg to find the temporary files directory. Whitespace correction. 1264 1.1 mrg 1265 1.1 mrg 2005-08-06 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1266 1.1 mrg 1267 1.1 mrg * io/unix.c: Add O_RDWR to open() call. 1268 1.1 mrg 1269 1.1 mrg 2005-08-04 Paul Thomas <pault (a] gcc.gnu.org> 1270 1.1 mrg 1271 1.1 mrg * transfer.c (data_transfer_init): Truncate file in 1272 1.1 mrg sequential WRITE when last_record == 0, rather than 1273 1.1 mrg current_record. Cures problem on RH9. 1274 1.1 mrg 1275 1.1 mrg 2005-08-03 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1276 1.1 mrg 1277 1.1 mrg * libgfortran.h: When isfinite is not provided by the system, 1278 1.1 mrg define it as a macro, so that it can accept any floating point 1279 1.1 mrg type. 1280 1.1 mrg 1281 1.1 mrg 2005-08-01 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1282 1.1 mrg 1283 1.1 mrg PR libfortran/23178 1284 1.1 mrg * intrinsics/flush.c (flush_i8): Add function flush_i8. Update 1285 1.1 mrg copyright years. 1286 1.1 mrg 1287 1.1 mrg 2005-07-31 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1288 1.1 mrg 1289 1.1 mrg PR libfortran/21787 1290 1.1 mrg * intrinsics/abort.c (abort): Close units before aborting. 1291 1.1 mrg Updated copyright years. 1292 1.1 mrg 1293 1.1 mrg 2005-07-30 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1294 1.1 mrg 1295 1.1 mrg PR libfortran/22436 1296 1.1 mrg * io/write.c (write_real): Add default formats for real(10) and 1297 1.1 mrg real(16). 1298 1.1 mrg 1299 1.1 mrg 2005-07-30 Paul Thomas <pault (a] gcc.gnu.org> 1300 1.1 mrg 1301 1.1 mrg PR fortran/22570 and related issues. 1302 1.1 mrg * transfer.c (formatted_transfer): Make sure that there 1303 1.1 mrg really is data present before X- or T- editing. Move all 1304 1.1 mrg treatment of tabbing during writes to start of next data 1305 1.1 mrg producing format. Suppress incorrect zeroing of bytes_left 1306 1.1 mrg in slash formating. Insert int cast for assignment of a 1307 1.1 mrg difference of two gfc_offsets. 1308 1.1 mrg 1309 1.1 mrg 2005-07-23 Jerry DeLisle <jvdelisle (a] verizon.net> 1310 1.1 mrg 1311 1.1 mrg * io/write.c (write_float): Revise output of IEEE exceptional 1312 1.1 mrg values to comply with F95 and F2003 standards. 1313 1.1 mrg 1314 1.1 mrg 2005-07-22 Jerry DeLisle <jvdelisle (a] verizon.net> 1315 1.1 mrg 1316 1.1 mrg PR libfortran/22570 1317 1.1 mrg * io/unit.c (init_units): Replace BLANK_ZERO with 1318 1.1 mrg BLANK_UNSPECIFIED. 1319 1.1 mrg 1320 1.1 mrg 2005-07-22 Jerry DeLisle <jvdelisle (a] verizon.net> 1321 1.1 mrg 1322 1.1 mrg PR libfortran/21875 (FM111.f) 1323 1.1 mrg * io/read.c (next_char): Return a ' ' character when BLANK_ZERO 1324 1.1 mrg or BLANK_NULL are active. 1325 1.1 mrg (read_decimal): Interpret ' ' character correctly for BZ or BN. 1326 1.1 mrg (read_radix): Interpret ' ' character correctly for BZ or BN. 1327 1.1 mrg (read_f): Interpret ' ' character correctly for BZ or BN. 1328 1.1 mrg 1329 1.1 mrg 2005-07-22 Paul Thomas <pault (a] gcc.gnu.org> 1330 1.1 mrg 1331 1.1 mrg PR libfortran/22570 1332 1.1 mrg * read.c (read_x): Correct the condition for doing the 1333 1.1 mrg x-editing during formatted input. 1334 1.1 mrg * transfer.c (formatted_transfer): Cast offset difference 1335 1.1 mrg as int, clean-up arithmetic with new variable, bytes_used, 1336 1.1 mrg zero counters for FMT_SLASH, 1337 1.1 mrg (data_transfer_init) Zero X- and T-editing counters 1338 1.1 mrg unconditionally. 1339 1.1 mrg (next_record_w) Zero X- and T-editing counters. 1340 1.1 mrg unconditionally. 1341 1.1 mrg 1342 1.1 mrg 2005-07-17 Jerry DeLisle <jvdelisle (a] verizon.net> 1343 1.1 mrg 1344 1.1 mrg * io/write.c (write_float): Fix field width checks for 1345 1.1 mrg printing 'Infinity' or 'Inf'. 1346 1.1 mrg (output_float): Fix typo in comment. 1347 1.1 mrg 1348 1.1 mrg 2005-07-12 Paul Thomas <pault (a] gcc.gnu.org> 1349 1.1 mrg 1350 1.1 mrg PR libfortran/16435 1351 1.1 mrg * transfer.c (formatted_transfer): Correct the problems 1352 1.1 mrg with X- and T-editting that caused TLs followed by TRs 1353 1.1 mrg to overwrite data, which caused NIST FM908.FOR to fail 1354 1.1 mrg on many tests. 1355 1.1 mrg (data_transfer_init): Zero X- and T-editting counters at 1356 1.1 mrg the start of formatted IO. 1357 1.1 mrg * write.c (write_x): Write specified number of skips with 1358 1.1 mrg specified number of spaces at the end. 1359 1.1 mrg 1360 1.1 mrg 2005-07-13 Paul Thomas <pault (a] gcc.gnu.org> 1361 1.1 mrg 1362 1.1 mrg * io/read.c (read_complex): Prevent X formatting during reads 1363 1.1 mrg from going beyond EOR to fix NIST fm908.FOR failure. 1364 1.1 mrg * io/list_read.c (read_complex): Allow complex data in list- 1365 1.1 mrg directed reads to have eols either side of the comma to 1366 1.1 mrg fix NIST FM906.FOR failure. 1367 1.1 mrg 1368 1.1 mrg 2005-07-12 Thomas Koenig <Thomas.Koenig (a] online.de> 1369 1.1 mrg 1370 1.1 mrg PR libfortran/21593 1371 1.1 mrg * io/unix.c: Add member special_file to type unix_stream. 1372 1.1 mrg (fd_truncate): Don't call ftruncate or chsize if 1373 1.1 mrg s refers to a special file. 1374 1.1 mrg (fd_to_stream): initialize s->special_file. 1375 1.1 mrg 1376 1.1 mrg 2005-07-11 David Edelsohn <edelsohn (a] gnu.org> 1377 1.1 mrg 1378 1.1 mrg PR libfortran/22412 1379 1.1 mrg * io/write.c (otoa): Bias p by SCRATCH_SIZE, not 1380 1.1 mrg sizeof (SCRATCH_SIZE). 1381 1.1 mrg (btoa): Same. 1382 1.1 mrg 1383 1.1 mrg 2005-07-09 Jerry DeLisle <jvdelisle (a] verizon.net> 1384 1.1 mrg 1385 1.1 mrg PR libfortran/21875 (FM111.f) 1386 1.1 mrg * io/read.c (next_char): Return a ' ' character when BLANK_ZERO or 1387 1.1 mrg BLANK_NULL are active. 1388 1.1 mrg (read_decimal): Interpret ' ' character correctly for BZ or BN. 1389 1.1 mrg (read_radix): Interpret ' ' character correctly for BZ or BN. 1390 1.1 mrg (read_f): Interpret ' ' character correctly for BZ or BN. 1391 1.1 mrg * gfortran.dg/test (fmt_read_bz_bn.f90): New test case. 1392 1.1 mrg 1393 1.1 mrg 2005-07-09 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1394 1.1 mrg Thomas Koenig <Thomas.Koenig (a] online.de> 1395 1.1 mrg 1396 1.1 mrg PR libfortran/22217 1397 1.1 mrg * io/write.c (extract_unit): New function; extract 1398 1.1 mrg ints as unsigned signed int of the correct size. 1399 1.1 mrg (write_int): Use it. 1400 1.1 mrg * runtime/error.c: Adjust copyright years. 1401 1.1 mrg Adjust size of buffer to maximum that can occur. 1402 1.1 mrg 1403 1.1 mrg 2005-07-07 Tobias Schl"uter <tobias.schlueter (a] physik.uni-muenchen.de> 1404 1.1 mrg 1405 1.1 mrg * libgfortran.h (GFC_ARRAY_DESCRIPTOR): Replace 'type *base' by 1406 1.1 mrg 'size_t offset'. 1407 1.1 mrg * intrinsics/cshift0.c, intrinsics/eoshift0.c, 1408 1.1 mrg intrinsics/eoshift2.c,intrinsics/pack_generic.c, 1409 1.1 mrg intrinsics/reshape_generic.c, intrinsics/spread_generic.c, 1410 1.1 mrg intrinsics/transpose_generic.c, intrinsics/unpack_generic, 1411 1.1 mrg m4/cshift1.m4, m4/eoshift1.m4, m4/eoshift3.m4, m4/iforeach.m4, 1412 1.1 mrg m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4, m4/reshape.m4, 1413 1.1 mrg m4,transpose.m4: Set renamed field 'offset' to zero instead of 1414 1.1 mrg 'base'. 1415 1.1 mrg * generated/all_l4.c, generated/all_l8.c, 1416 1.1 mrg generated/any_l4.c, generated/any_l8.c, generated/count_4_l4.c, 1417 1.1 mrg generated/count_4_l8.c, generated/count_8_l4.c, 1418 1.1 mrg generated/count_8_l8.c, generated/chift1_4.c, 1419 1.1 mrg generated/cshift1_8.c, generated/eoshift1_4.c, 1420 1.1 mrg generated/eoshift1_8.c, generated/eoshift3_4.c, 1421 1.1 mrg generated/eoshift3_8.c, generated/matmul_c4.c, 1422 1.1 mrg generated/matmul_c8.c, generated/matmul_i4.c, matmul_i8.c, 1423 1.1 mrg generated/matmul_l4.c, generated/matmul_l8.c, 1424 1.1 mrg generated/matmul_r4.c, generated/matmul_r8.c, 1425 1.1 mrg generated/maxloc0_4_i4.c, generated/maxloc0_4_i8.c, 1426 1.1 mrg generated/maxloc0_4_r4.c, generated/maxloc0_4_r8.c, 1427 1.1 mrg generated/maxloc0_8_i4.c, generated/maxloc0_8_i8.c, 1428 1.1 mrg generated/maxloc0_8_r4.c, generated/maxloc0_8_r8.c, 1429 1.1 mrg generated/maxloc1_4_i4.c, generated/maxloc1_4_i8.c, 1430 1.1 mrg generated/maxloc1_4_r4.c, generated/maxloc1_4_r8.c, 1431 1.1 mrg generated/maxloc1_8_i4.c, generated/maxloc1_8_i8.c, 1432 1.1 mrg generated/maxloc1_8_r4.c, generated/maxloc1_8_r8.c, 1433 1.1 mrg generated/maxval_i4.c, generated/maxval_i8.c, 1434 1.1 mrg generated/maxval_r4.c, generated/maxval_r8.c, 1435 1.1 mrg generated/minloc0_4_i4.c, generated/minloc0_4_i8.c, 1436 1.1 mrg generated/minloc0_4_r4.c, generated/minloc0_4_r8.c, 1437 1.1 mrg generated/minloc0_8_i4.c, generated/minloc0_8_i8.c, 1438 1.1 mrg generated/minloc0_8_r4.c, generated/minloc0_8_r8.c, 1439 1.1 mrg generated/minloc1_4_i4.c, generated/minloc1_4_i8.c, 1440 1.1 mrg generated/minloc1_4_r4.c, generated/minloc1_4_r8.c, 1441 1.1 mrg generated/minloc1_8_i4.c, generated/minloc1_8_i8.c, 1442 1.1 mrg generated/minloc1_8_r4.c, generated/minloc1_8_r8.c, 1443 1.1 mrg generated/minval_i4.c, generated/minval_i8.c, 1444 1.1 mrg generated/minval_r4.c, generated/minval_r8.c, 1445 1.1 mrg generated/product_c4.c, generated/product_c8.c, 1446 1.1 mrg generated/product_i4.c, generated/product_i8.c, 1447 1.1 mrg generated/product_r4.c, generated/product_r8.c, 1448 1.1 mrg generated/reshape_c4.c, generated/reshape_c8.c, 1449 1.1 mrg generated/reshape_i4.c, generated/reshape_i8.c, 1450 1.1 mrg generated/sum_c4.c, generated/sum_c8.c, generated/sum_i4.c, 1451 1.1 mrg generated/sum_i8.c, generated/sum_r4.c, generated/sum_r8.c, 1452 1.1 mrg generated/transpose_c4.c, generated/transpose_c8.c, 1453 1.1 mrg generated/transpose_i4.c, generated/transpose_i8.c: Regenerate: 1454 1.1 mrg 1455 1.1 mrg 2005-07-07 Thomas Koenig <Thomas.Koenig (a] online.de> 1456 1.1 mrg 1457 1.1 mrg PR libfortran/21594 1458 1.1 mrg * intrinsics/eoshift0.c: If abs(shift) > len, fill the 1459 1.1 mrg the whole array with the boundary value, but don't overrun it. 1460 1.1 mrg * intrinsics/eoshift2.c: Likewise. 1461 1.1 mrg * m4/eoshift1.m4: Likewise. 1462 1.1 mrg * m4/eoshift3.m4: Likewise. 1463 1.1 mrg * generated/eoshift1_4.c: Regenerated. 1464 1.1 mrg * generated/eoshift1_8.c: Regenerated. 1465 1.1 mrg * generated/eoshift3_4.c: Regenerated. 1466 1.1 mrg * generated/eoshift3_8.c: Regenerated. 1467 1.1 mrg 1468 1.1 mrg 2005-07-07 Feng Wang <fengwang (a] nudt.edu.cn> 1469 1.1 mrg 1470 1.1 mrg PR fortran/16531 1471 1.1 mrg * io/transfer.c (formatted_transfer): Enable FMT_A on other types to 1472 1.1 mrg support Hollerith constants. 1473 1.1 mrg 1474 1.1 mrg 2005-07-01 Andreas Jaeger <aj (a] suse.de> 1475 1.1 mrg 1476 1.1 mrg * intrinsics/unpack_generic.c: Remove const from parameter. 1477 1.1 mrg 1478 1.1 mrg * io/transfer.c (formatted_transfer): Remove unused variable. 1479 1.1 mrg 1480 1.1 mrg 2005-06-28 Thomas Koenig <Thomas.Koenig (a] online.de> 1481 1.1 mrg 1482 1.1 mrg PR libfortran/22142 1483 1.1 mrg * m4/eoshift1.m4: Correct bstride (it needs to be multiplied 1484 1.1 mrg by size since it's a char pointer). 1485 1.1 mrg * m4/eoshift1_4.c: Regenerated. 1486 1.1 mrg * m4/eoshift1_8.c: Regenerated. 1487 1.1 mrg 1488 1.1 mrg 2005-06-28 Thomas Koenig <Thomas.Koenig (a] online.de> 1489 1.1 mrg 1490 1.1 mrg PR libfortran/22142 1491 1.1 mrg * m4/eoshift3.m4: Correct bstride (it needs to be multiplied 1492 1.1 mrg by size since it's a char pointer). 1493 1.1 mrg * m4/eoshift3_4.c: Regenerated. 1494 1.1 mrg * m4/eoshift3_8.c: Regenerated. 1495 1.1 mrg 1496 1.1 mrg 2005-06-28 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1497 1.1 mrg 1498 1.1 mrg PR libfortran/22170 1499 1.1 mrg * io/transfer.c (formatted_transfer): Do not iterate on the 1500 1.1 mrg repeat count of a FMT_SLASH, since this is already done in 1501 1.1 mrg next_format(). 1502 1.1 mrg 1503 1.1 mrg 2005-06-25 Thomas Koenig <Thomas.Koenig (a] online.de> 1504 1.1 mrg 1505 1.1 mrg PR libfortran/22144 1506 1.1 mrg * m4/cshift1.m4: Remove const from argument ret. 1507 1.1 mrg Populate return array descriptor if ret->data is NULL. 1508 1.1 mrg * m4/eoshift1.m4: Likewise. 1509 1.1 mrg * m4/eoshift3.m4: Likewise. 1510 1.1 mrg * generated/cshift1_4.c: Regenerated. 1511 1.1 mrg * generated/cshift1_8.c: Regenerated. 1512 1.1 mrg * generated/eoshift1_4.c: Regenerated. 1513 1.1 mrg * generated/eoshift1_8.c: Regenerated. 1514 1.1 mrg * generated/eoshift3_4.c: Regenerated. 1515 1.1 mrg * generated/eoshift3_8.c: Regenerated. 1516 1.1 mrg 1517 1.1 mrg 2005-06-24 Jerry DeLisle <jvdelisle (a] verizon.net> 1518 1.1 mrg 1519 1.1 mrg PR libfortran/21915 1520 1.1 mrg * Makefile.am: Include intrinsics/hyper.c. 1521 1.1 mrg * c99_protos.h: Add prototypes for single precision versions of 1522 1.1 mrg acosh, asinh, and atanh for platforms that do not have these. 1523 1.1 mrg * config.h.in: Add #undef for wrappers. 1524 1.1 mrg * configure.ac: Add checks for single precision versions. 1525 1.1 mrg * aclocal.m4: Regenerated. 1526 1.1 mrg * Makefile.in: Regenerated. 1527 1.1 mrg * configure: Regenerated. 1528 1.1 mrg * intrinsics/hyper.c: New file, adds new wrapper functions. 1529 1.1 mrg 1530 1.1 mrg 2005-06-23 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1531 1.1 mrg 1532 1.1 mrg * intrinsics/c99_functions.c (log10l): New log10l function for 1533 1.1 mrg systems where this is not available. 1534 1.1 mrg * c99_protos.h: Prototype for log10l function. 1535 1.1 mrg * libgfortran.h: Use generated kinds.h to define GFC_INTEGER_*, 1536 1.1 mrg GFC_UINTEGER_*, GFC_LOGICAL_*, GFC_REAL_*, GFC_COMPLEX_*. Update 1537 1.1 mrg prototypes for gfc_itoa and xtoa. 1538 1.1 mrg * io/io.h: Update prototypes for set_integer and max_value. 1539 1.1 mrg * io/list_read.c (convert_integer): Use new 1540 1.1 mrg GFC_(INTEGER|REAL)_LARGEST type. 1541 1.1 mrg * io/read.c (set_integer): Likewise. 1542 1.1 mrg (max_value): Likewise. 1543 1.1 mrg (convert_real): Likewise. 1544 1.1 mrg (real_l): Likewise. 1545 1.1 mrg (next_char): Likewise. 1546 1.1 mrg (read_decimal): Likewise. 1547 1.1 mrg (read_radix): Likewise. 1548 1.1 mrg (read_f): Likewise. 1549 1.1 mrg * io/write.c (extract_int): Use new GFC_INTEGER_LARGEST type. 1550 1.1 mrg (extract_real): Use new GFC_REAL_LARGEST type. 1551 1.1 mrg (calculate_exp): Likewise. 1552 1.1 mrg (calculate_G_format): Likewise. 1553 1.1 mrg (output_float): Likewise. Use log10l for long double values. 1554 1.1 mrg Add comment for sprintf format. Use GFC_REAL_LARGEST_FORMAT. 1555 1.1 mrg (write_l): Use new GFC_INTEGER_LARGEST type. 1556 1.1 mrg (write_float): Use new GFC_REAL_LARGEST type. 1557 1.1 mrg (write_int): Remove useless special case for (len < 8). 1558 1.1 mrg (write_decimal): Use GFC_INTEGER_LARGEST. 1559 1.1 mrg (otoa): Use GFC_UINTEGER_LARGEST as argument. 1560 1.1 mrg (btoa): Use GFC_UINTEGER_LARGEST as argument. 1561 1.1 mrg * runtime/error.c (gfc_itoa): Use GFC_INTEGER_LARGEST as 1562 1.1 mrg argument. 1563 1.1 mrg (xtoa): Use GFC_UINTEGER_LARGEST as argument. 1564 1.1 mrg * Makefile.am: Use mk-kinds-h.sh to generate header kinds.h 1565 1.1 mrg with all Fortran kinds available. 1566 1.1 mrg * configure.ac: Check for strtold and log10l. 1567 1.1 mrg * Makefile.in: Regenerate. 1568 1.1 mrg * aclocal.m4: Regenerate. 1569 1.1 mrg * configure: Regenerate. 1570 1.1 mrg * config.h.in: Regenerate. 1571 1.1 mrg * mk-kinds-h.sh: Configuration script for available integer 1572 1.1 mrg and real kinds. 1573 1.1 mrg 1574 1.1 mrg 1575 1.1 mrg 2005-06-18 Janne Blomqvist <jblomqvi (a] cc.hut.fi> 1576 1.1 mrg 1577 1.1 mrg * unix.c (stream_at_bof): Don't assume that all non-mmapped files 1578 1.1 mrg are non-seekable. 1579 1.1 mrg (stream_at_eof): Likewise. 1580 1.1 mrg 1581 1.1 mrg 2005-06-18 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1582 1.1 mrg 1583 1.1 mrg PR libfortran/19155 1584 1.1 mrg * io/read.c (convert_real): strtod can set errno to EINVAL on an 1585 1.1 mrg empty string, but we shouldn't have an error in that case. 1586 1.1 mrg 1587 1.1 mrg 2005-06-17 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1588 1.1 mrg 1589 1.1 mrg PR libfortran/19216 1590 1.1 mrg * io/list_read.c (eat_separator): No need to call next_record, 1591 1.1 mrg even in non-namelist_mode. 1592 1.1 mrg 1593 1.1 mrg 2005-06-17 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1594 1.1 mrg 1595 1.1 mrg * io/transfer.c (formatted_transfer): Fix typo in error message. 1596 1.1 mrg 1597 1.1 mrg 2005-06-17 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1598 1.1 mrg 1599 1.1 mrg PR libfortran/16436 1600 1.1 mrg * io/transfer.c (read_sf): Correct updating of bytes_left field. 1601 1.1 mrg (formatted_transfer): Correct updating of bytes_left field and 1602 1.1 mrg reformatting code (comments and whitespace). 1603 1.1 mrg * io/unix.c (move_pos_offset): "active" field should not be 1604 1.1 mrg changed here. Whitespace corrections. 1605 1.1 mrg 1606 1.1 mrg 2005-06-15 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1607 1.1 mrg 1608 1.1 mrg PR libfortran/21950 1609 1.1 mrg * intrinsics/c99_functions.c (scalbn): Provide fallback 1610 1.1 mrg implementation for scalbn. 1611 1.1 mrg * c99_protos.h: Prototype for scalbn. 1612 1.1 mrg * configure.ac: Add check for scalbn. 1613 1.1 mrg * configure: Regenerate. 1614 1.1 mrg * config.h.in: Regenerate. 1615 1.1 mrg 1616 1.1 mrg 2005-06-14 Thomas Koenig <Thomas.Koenig (a] online.de> 1617 1.1 mrg 1618 1.1 mrg * intrinsics/eoshift0.c: Removed prototype for eoshift0. 1619 1.1 mrg * intrinsics/eoshift2.c: Removed prototype for eoshift2. 1620 1.1 mrg 1621 1.1 mrg 2005-06-14 Tom Tromey <tromey (a] redhat.com> 1622 1.1 mrg 1623 1.1 mrg PR libgcj/19877: 1624 1.1 mrg * configure, aclocal.m4, Makefile.in: Rebuilt. 1625 1.1 mrg 1626 1.1 mrg 2005-06-12 Thomas Koenig <Thomas.Koenig (a] online.de> 1627 1.1 mrg 1628 1.1 mrg PR libfortran/21594 1629 1.1 mrg * intrinsics/eoshift0.c: Add prototype for eoshift0. 1630 1.1 mrg * intrinsics/eoshift2.c: Add prototype for eoshift2. 1631 1.1 mrg 1632 1.1 mrg 2005-06-12 Steven G. Kargl <kargls (a] comcast.net> 1633 1.1 mrg Thomas Koenig <Thomas.Koenig (a] online.de> 1634 1.1 mrg 1635 1.1 mrg PR libfortran/PR21797 1636 1.1 mrg * m4/cexp.m4 (csqrt`'q): Add type qualifyer to 1637 1.1 mrg sqrt and fabs. 1638 1.1 mrg * generated/exp_c4.c: Regenerated. 1639 1.1 mrg 1640 1.1 mrg 2005-06-12 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1641 1.1 mrg 1642 1.1 mrg PR libfortran/19155 1643 1.1 mrg * io/read.c (read_f): Take care of spaces after initial sign. 1644 1.1 mrg 1645 1.1 mrg 2005-06-11 Thomas Koenig <Thomas.Koenig (a] onlinde.de> 1646 1.1 mrg 1647 1.1 mrg PR libfortran/21333 1648 1.1 mrg * Makefile.am: Add in_pack_c4.c, in_pack_c8.c, in_unpack_c4.c 1649 1.1 mrg and in_unpack_c8.c. 1650 1.1 mrg * Makefile.in: Regenerate. 1651 1.1 mrg * libgfortran.h: Declare internal_pack_c4, internal_pack_c8, 1652 1.1 mrg internal_unpack_c4 and internal_unpack_c8. 1653 1.1 mrg * m4/in_pack.m4: Use rtype_ccode insteald of rtype_kind 1654 1.1 mrg in function name. 1655 1.1 mrg Use sizeof (rtype_name) as size for memory allocation. 1656 1.1 mrg * m4/in_unpack.m4: Use rtype_ccode insteald of rtype_kind 1657 1.1 mrg in function name. 1658 1.1 mrg Use sizeof (rtype_name) for calculation of sizes for memcpy. 1659 1.1 mrg * runtime/in_pack_generic.c: For real, integer and logical 1660 1.1 mrg call internal_pack_4 if size==4 and internal_pack_8 if 1661 1.1 mrg size==8. 1662 1.1 mrg For complex, call internal_pack_c4 if size==8 and 1663 1.1 mrg internal_pack_c8 if size==16. 1664 1.1 mrg * runtime/in_unpack_generic.c: For real, integer and logical 1665 1.1 mrg call internal_unpack_4 if size==4 and internal_unpack_8 if 1666 1.1 mrg size==8. 1667 1.1 mrg For complex, call internal_unpack_c4 if size==8 and 1668 1.1 mrg internal_unpack_c8 if size==16. 1669 1.1 mrg * generated/in_pack_i4.c: Regenerated. 1670 1.1 mrg * generated/in_pack_i8.c: Regenerated. 1671 1.1 mrg * generated/in_unpack_i4.c: Regenerated. 1672 1.1 mrg * generated/in_unpack_i8.c: Regenerated. 1673 1.1 mrg * generated/in_pack_c4.c: New file. 1674 1.1 mrg * generated/in_pack_c8.c: New file. 1675 1.1 mrg * generated/in_unpack_c4.c: New file. 1676 1.1 mrg * generated/in_unpack_c8.c: New file. 1677 1.1 mrg 1678 1.1 mrg 2005-06-09 Thomas Koenig <Thomas.Koenig (a] online.de> 1679 1.1 mrg 1680 1.1 mrg PR libfortran/21480 1681 1.1 mrg * m4/reshape.m4: Use sizeof (rtype_name) for sizes to be passed 1682 1.1 mrg to reshape_packed. 1683 1.1 mrg * generated/reshape_c4.c: Regenerated. 1684 1.1 mrg * generated/reshape_c8.c: Regenerated. 1685 1.1 mrg * generated/reshape_i4.c: Regenerated. 1686 1.1 mrg * generated/reshape_i8.c: Regenerated. 1687 1.1 mrg 1688 1.1 mrg 2005-06-07 Thomas Koenig <Thomas.Koenig (a] online.de> 1689 1.1 mrg 1690 1.1 mrg PR libfortran/21926 1691 1.1 mrg * m4/matmul.m4: Correct zeroing of result for non-packed 1692 1.1 mrg arrays with lowest stride is one. 1693 1.1 mrg * generated/matmul_c4.c: Regenerated. 1694 1.1 mrg * generated/matmul_c8.c: Regenerated. 1695 1.1 mrg * generated/matmul_i4.c: Regenerated. 1696 1.1 mrg * generated/matmul_i8.c: Regenerated. 1697 1.1 mrg * generated/matmul_r4.c: Regenerated. 1698 1.1 mrg * generated/matmul_r8.c: Regenerated. 1699 1.1 mrg 1700 1.1 mrg 2005-05-30 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1701 1.1 mrg 1702 1.1 mrg PR libfortran/20179 1703 1.1 mrg * io/unix.c (fd_close): Add test so that we don't close() 1704 1.1 mrg stdout and stderr. 1705 1.1 mrg 1706 1.1 mrg 2005-05-29 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1707 1.1 mrg 1708 1.1 mrg PR libfortran/20006 1709 1.1 mrg * io/format.c (parse_format_list): Set repeat count of $ format 1710 1.1 mrg node to 1. 1711 1.1 mrg * io/transfer.c (read_sf): Add g.seen_dollar to the test 1712 1.1 mrg concerning advancing I/O. 1713 1.1 mrg (data_transfer_init): Likewise. 1714 1.1 mrg (finalize_transfer): Likewise. 1715 1.1 mrg 1716 1.1 mrg 2005-05-27 Thomas Koenig <Thomas.Koenig (a] online.de> 1717 1.1 mrg 1718 1.1 mrg * runtime/in_pack_generic.c: Adjust copyright years. 1719 1.1 mrg (in_pack_generic): Change dimension of auxiliary arrays from 1720 1.1 mrg GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION. 1721 1.1 mrg * runtime/in_unpack_generic.c: Adjust copyright years. 1722 1.1 mrg (in_unpack_generic): Change dimension of auxiliary arrays from 1723 1.1 mrg GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION. 1724 1.1 mrg 1725 1.1 mrg 2005-05-26 Thomas Koenig <Thomas.Koenig (a] online.de> 1726 1.1 mrg 1727 1.1 mrg PR libfortran/17283 1728 1.1 mrg * intrinsics/unpack_generic.c: Fix name of routine 1729 1.1 mrg on top. Update copyright years. 1730 1.1 mrg (unpack1): Remove const from return array descriptor. 1731 1.1 mrg rs: New variable, for calculating return sizes. 1732 1.1 mrg Populate return array descriptor if ret->data is NULL. 1733 1.1 mrg 1734 1.1 mrg 2005-05-22 Peter Wainwright <prw (a] ceiriog1.demon.co.uk> 1735 1.1 mrg 1736 1.1 mrg PR libfortran/21376 1737 1.1 mrg * io/write.c (output_float): Rework logic to avoid call to log10 1738 1.1 mrg with argument equal to zero. 1739 1.1 mrg 1740 1.1 mrg 2005-05-21 Eric Botcazou <ebotcazou (a] libertysurf.fr> 1741 1.1 mrg 1742 1.1 mrg * configure.ac: Check for trunc and truncf in libm. 1743 1.1 mrg * configure: Regenerate. 1744 1.1 mrg * config.h.in: Likewise. 1745 1.1 mrg * intrinsics/c99_functions.c (trunc, truncf): New functions. 1746 1.1 mrg * c99_protos.h (trunc, truncf): Declare them. 1747 1.1 mrg 1748 1.1 mrg 2005-05-18 Thomas Koenig <Thomas.Koenig (a] online.de> 1749 1.1 mrg 1750 1.1 mrg PR libfortran/21127 1751 1.1 mrg * Makefile.am: Really commit. 1752 1.1 mrg * Makefile.in: Really commit. 1753 1.1 mrg 1754 1.1 mrg 2005-05-18 Thomas Koenig <Thomas.Koenig (a] online.de> 1755 1.1 mrg 1756 1.1 mrg PR libfortran/21127 1757 1.1 mrg * Makefile.am: Add generated/reshape_c4.c and 1758 1.1 mrg generated/reshape_c8.c. 1759 1.1 mrg * Makefile.in: Regenerated. 1760 1.1 mrg * m4/iparm.m4: Define rtype_ccode to be c4 or c8 for 1761 1.1 mrg complex types, 4 or 8 otherwise. 1762 1.1 mrg * m4/reshape.m4: Use rtype_ccode instead of rtype_kind 1763 1.1 mrg in function name. 1764 1.1 mrg * generated/reshape_c4.c: New file. 1765 1.1 mrg * generated/reshape_c8.c: New file. 1766 1.1 mrg 1767 1.1 mrg 2005-05-16 Andreas Jaeger <aj (a] suse.de> 1768 1.1 mrg 1769 1.1 mrg * configure.ac: Add additional warning flags. 1770 1.1 mrg * configure: Regenerate. 1771 1.1 mrg 1772 1.1 mrg * io/write.c (calculate_G_format): Remove unused parameter. 1773 1.1 mrg (output_float): Remove unused parameter. 1774 1.1 mrg (write_float): Change callers. 1775 1.1 mrg (nml_write_obj): Avoid signed warning. 1776 1.1 mrg Make variable const to support -Wwrite-strings. 1777 1.1 mrg 1778 1.1 mrg * io/unix.c (fd_alloc, mmap_open, mmap_sfree, mem_sfree, 1779 1.1 mrg mem_truncate): Mark argument as unused. 1780 1.1 mrg 1781 1.1 mrg * io/unit.c (get_unit): Mark argument as unused. 1782 1.1 mrg (init_units): Avoid warning about signed comparision. 1783 1.1 mrg 1784 1.1 mrg * io/transfer.c (next_record_r): Remove unused parameter. 1785 1.1 mrg (next_record_w): Remove unused parameter. 1786 1.1 mrg (next_record): Change callers. 1787 1.1 mrg (iolength_transfer): Mark arguments as unused. 1788 1.1 mrg 1789 1.1 mrg * io/open.c: Add initializer. 1790 1.1 mrg 1791 1.1 mrg * io/list_read.c (read_character): Mark argument as unused. 1792 1.1 mrg (nml_match_name): Add const to make compile with -Wwrite-strings. 1793 1.1 mrg 1794 1.1 mrg * io/format.c: Add initializer. 1795 1.1 mrg 1796 1.1 mrg 2005-05-15 Andreas Jaeger <aj (a] suse.de> 1797 1.1 mrg 1798 1.1 mrg * m4/eoshift1.m4: Initialize variables to avoid warnings. 1799 1.1 mrg * m4/eoshift3.m4: Initialize variables to avoid warnings. 1800 1.1 mrg * generated/eoshift1_4.c, generated/eoshift1_8.c, 1801 1.1 mrg generated/eoshift3_4.c, generated/eoshift3_8.c: Regenerated. 1802 1.1 mrg 1803 1.1 mrg * intrinsics/spread_generic.c (spread): Initialize variables to 1804 1.1 mrg avoid warnings. 1805 1.1 mrg 1806 1.1 mrg * intrinsics/eoshift0.c (eoshift0): Initialize variables to avoid 1807 1.1 mrg warnings. 1808 1.1 mrg * intrinsics/eoshift2.c (eoshift2): Initialize variables to avoid 1809 1.1 mrg warnings. 1810 1.1 mrg 1811 1.1 mrg * io/list_read.c (nml_get_obj_data): Initialize variables to avoid 1812 1.1 mrg warnings. 1813 1.1 mrg 1814 1.1 mrg * intrinsics/pack_generic.c (pack): Remove unneeded calculation. 1815 1.1 mrg 1816 1.1 mrg * m4/matmull.m4 (matmul_): Remove unneeded calculations, fix 1817 1.1 mrg pointer cast to avoid warning. 1818 1.1 mrg * generated/matmul_l4.c: Regenerated. 1819 1.1 mrg * generated/matmul_l8.c: Regenerated. 1820 1.1 mrg 1821 1.1 mrg * Makefile.am: Remove AM_CFLAGS here. 1822 1.1 mrg * configure.ac: Define AM_CFLAGS and AM_FCFLAGS so that warnings 1823 1.1 mrg are set. Set additionally -Wstrict-prototypes for CFLAGS. 1824 1.1 mrg * Makefile.in: Regenerated. 1825 1.1 mrg * aclocal.m4: Regenerated. 1826 1.1 mrg * configure: Regenerated. 1827 1.1 mrg 1828 1.1 mrg * intrinsics/system_clock.c (system_clock_4, system_clock_8): Add 1829 1.1 mrg missing returns, reformat a bit. 1830 1.1 mrg 1831 1.1 mrg * io/write.c (nml_write_obj): Use %d again - and cast to int, 1832 1.1 mrg st_sprintf does not handle %ld. 1833 1.1 mrg 1834 1.1 mrg * io/unit.c (is_internal_unit): Add void as parameter list. 1835 1.1 mrg 1836 1.1 mrg * io/transfer.c: Move prototype declarations before the functions. 1837 1.1 mrg 1838 1.1 mrg * runtime/normalize.c (almostone_r4, almostone_r8): Fix parameter 1839 1.1 mrg list. 1840 1.1 mrg 1841 1.1 mrg * intrinsics/random.c (KISS_DEFAULT_SEED): Remove extra semicolon. 1842 1.1 mrg 1843 1.1 mrg * io/transfer.c: Do not use empty initializers for global objects. 1844 1.1 mrg Add missing initializers. 1845 1.1 mrg 1846 1.1 mrg * io/lock.c: Do not use empty initializers for global objects. 1847 1.1 mrg 1848 1.1 mrg * io/close.c: Add missing initializers. 1849 1.1 mrg 1850 1.1 mrg * runtime/environ.c: Add missing initializers. Do not use empty 1851 1.1 mrg initializers for global object. 1852 1.1 mrg (init_string): Mark argument as unused. 1853 1.1 mrg 1854 1.1 mrg * runtime/main.c (cleanup): Fix parameter list. 1855 1.1 mrg 1856 1.1 mrg * io/io.h: Fix parameter lists. 1857 1.1 mrg 1858 1.1 mrg * m4/transpose.m4, m4/matmul.m4: Fix pointer cast to avoid 1859 1.1 mrg warning. 1860 1.1 mrg 1861 1.1 mrg * generated/transpose_c4.c, generated/transpose_c8.c, 1862 1.1 mrg generated/transpose_i4.c, generated/transpose_i8.c, 1863 1.1 mrg generated/matmul_c4.c, generated/matmul_c8.c, 1864 1.1 mrg generated/matmul_i4.c, generated/matmul_i8.c, 1865 1.1 mrg generated/matmul_r4.c, generated/matmul_r8.c: Regenerated. 1866 1.1 mrg 1867 1.1 mrg * io/write.c (nml_write_obj): Fix 64-bit problem. 1868 1.1 mrg 1869 1.1 mrg * io/list_read.c (nml_get_obj_data): Add missing braces around 1870 1.1 mrg initializer to avoid warnings. 1871 1.1 mrg 1872 1.1 mrg * intrinsics/etime.c (etime_sub): Remove unused variable. 1873 1.1 mrg 1874 1.1 mrg * intrinsics/chdir.c, intrinsics/getlog.c, intrinsics/link.c, 1875 1.1 mrg intrinsics/symlnk.c, intrinsics/perror.c: Include <string.h> for 1876 1.1 mrg prototypes. 1877 1.1 mrg 1878 1.1 mrg * runtime/string.c (compare0): Remove unused variable. 1879 1.1 mrg * io/unit.c (init_units): Remove unused variables. 1880 1.1 mrg * intrinsics/getcwd.c (getcwd_i4_sub): Remove unused variable. 1881 1.1 mrg * intrinsics/unlink.c (unlink_i4_sub): Remove unused variable. 1882 1.1 mrg * intrinsics/stat.c (stat_i4_sub, fstat_i8_sub, fstat_i4_sub, 1883 1.1 mrg stat_i8_sub): Remove unused variable. 1884 1.1 mrg 1885 1.1 mrg 2005-05-12 Thomas Koenig <Thomas.Koenig (a] online.de> 1886 1.1 mrg 1887 1.1 mrg PR libfortran/21324 1888 1.1 mrg * runtime/memory.c: Don't define GFC_CLEAR_MEMORY (it's a 1889 1.1 mrg performance hog). 1890 1.1 mrg * io/open.c (new_unit): Zero freshly allocated memory for 1891 1.1 mrg unit structure. 1892 1.1 mrg * io/unit.c (init_units): Zero freshly allocated memory for 1893 1.1 mrg STDIN, STDOUT and STDERR. 1894 1.1 mrg * io/unix.c (open_internal): Zero freshly allocated memory 1895 1.1 mrg for unix_stream. 1896 1.1 mrg (fd_to_stream): Likewise. 1897 1.1 mrg 1898 1.1 mrg 2005-05-11 Bud Davis <bdavis (a] gfortran.org> 1899 1.1 mrg 1900 1.1 mrg PR fortran/19478 1901 1.1 mrg * io/unix.c (fd_truncate): update positions when ftruncate 1902 1.1 mrg fails (like writing to /dev/null). 1903 1.1 mrg 1904 1.1 mrg 2005-05-10 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1905 1.1 mrg 1906 1.1 mrg PR libfortran/21471 1907 1.1 mrg * open.c (new_unit): Take care of the case where POSITION_APPEND 1908 1.1 mrg is specified (sseek to the end, and set u>-endfile). 1909 1.1 mrg 1910 1.1 mrg 2005-05-10 Tobias Schl"uter <tobias.schlueter (a] physik.uni-muenchen.de> 1911 1.1 mrg 1912 1.1 mrg PR fortran/20178 1913 1.1 mrg * Makefile.am (gfor_specific_src): Add 'intrinsics/f2c_intrinsics.F90' 1914 1.1 mrg to dependencies. 1915 1.1 mrg * Makefile.in: Regenerate. 1916 1.1 mrg * intrinsics/f2c_specific.F90: New file. 1917 1.1 mrg 1918 1.1 mrg 2005-05-10 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1919 1.1 mrg 1920 1.1 mrg PR libfortran/20788 1921 1.1 mrg * io/unix.c (fd_to_stream): Add an avoid_mmap argument indicating 1922 1.1 mrg we don't we to mmap this stream. Use fd_open instead of mmap_open 1923 1.1 mrg in that case. 1924 1.1 mrg (open_external): Call fd_to_stream with avoid_mmap = 0. 1925 1.1 mrg (input_stream): Call fd_to_stream with avoid_mmap = 1. 1926 1.1 mrg (output_stream): Likewise. 1927 1.1 mrg (error_stream): Likewise. 1928 1.1 mrg 1929 1.1 mrg 2005-05-09 Mike Stump <mrs (a] apple.com> 1930 1.1 mrg 1931 1.1 mrg * configure: Regenerate. 1932 1.1 mrg 1933 1.1 mrg 2005-05-09 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 1934 1.1 mrg 1935 1.1 mrg PR libfortran/19155 1936 1.1 mrg * io/read.c (read_f): Accept 'e', 'E', 'd' and 'D' as first 1937 1.1 mrg non-blank characters of a real number. 1938 1.1 mrg 1939 1.1 mrg 2005-05-04 Thomas Koenig <Thomas.Koenig (a] online.de> 1940 1.1 mrg 1941 1.1 mrg PR libfortran/21354 1942 1.1 mrg * m4/cshift1.m4: Change dimension of auxiliary arrays from 1943 1.1 mrg GFC_MAX_DIMENSION - 1 to GFC_MAX_DIMENSION. 1944 1.1 mrg * m4/eoshift1.m4: Likewise. 1945 1.1 mrg * m4/eoshift3.m4: Likewise. 1946 1.1 mrg * m4/ifunction.m4: Likewise. 1947 1.1 mrg * m4/in_pack.m4: Likewise. 1948 1.1 mrg * m4/in_unpack.m4: Likewise. 1949 1.1 mrg * intrinsics/cshift0.c: Likewise. 1950 1.1 mrg * intrinsics/eoshift0.c: Likewise. 1951 1.1 mrg * intrinsics/eoshift2.c: Likewise. 1952 1.1 mrg * intrinsics/random.c: Likewise. 1953 1.1 mrg * intrinsics/spread_generic.c: Likewise. 1954 1.1 mrg * intrinsics/stat.c: Likewise. 1955 1.1 mrg * generated/all_l4.c: Regenerated. 1956 1.1 mrg * generated/all_l8.c: Regenerated. 1957 1.1 mrg * generated/any_l4.c: Regenerated. 1958 1.1 mrg * generated/any_l8.c: Regenerated. 1959 1.1 mrg * generated/count_4_l4.c: Regenerated. 1960 1.1 mrg * generated/count_4_l8.c: Regenerated. 1961 1.1 mrg * generated/count_8_l4.c: Regenerated. 1962 1.1 mrg * generated/count_8_l8.c: Regenerated. 1963 1.1 mrg * generated/cshift1_4.c: Regenerated. 1964 1.1 mrg * generated/cshift1_8.c: Regenerated. 1965 1.1 mrg * generated/eoshift1_4.c: Regenerated. 1966 1.1 mrg * generated/eoshift1_8.c: Regenerated. 1967 1.1 mrg * generated/eoshift3_4.c: Regenerated. 1968 1.1 mrg * generated/eoshift3_8.c: Regenerated. 1969 1.1 mrg * generated/in_pack_i4.c: Regenerated. 1970 1.1 mrg * generated/in_pack_i8.c: Regenerated. 1971 1.1 mrg * generated/in_unpack_i4.c: Regenerated. 1972 1.1 mrg * generated/in_unpack_i8.c: Regenerated. 1973 1.1 mrg * generated/maxloc0_4_i4.c: Regenerated. 1974 1.1 mrg * generated/maxloc0_4_i8.c: Regenerated. 1975 1.1 mrg * generated/maxloc0_4_r4.c: Regenerated. 1976 1.1 mrg * generated/maxloc0_4_r8.c: Regenerated. 1977 1.1 mrg * generated/maxloc0_8_i4.c: Regenerated. 1978 1.1 mrg * generated/maxloc0_8_i8.c: Regenerated. 1979 1.1 mrg * generated/maxloc0_8_r4.c: Regenerated. 1980 1.1 mrg * generated/maxloc0_8_r8.c: Regenerated. 1981 1.1 mrg * generated/maxloc1_4_i4.c: Regenerated. 1982 1.1 mrg * generated/maxloc1_4_i8.c: Regenerated. 1983 1.1 mrg * generated/maxloc1_4_r4.c: Regenerated. 1984 1.1 mrg * generated/maxloc1_4_r8.c: Regenerated. 1985 1.1 mrg * generated/maxloc1_8_i4.c: Regenerated. 1986 1.1 mrg * generated/maxloc1_8_i8.c: Regenerated. 1987 1.1 mrg * generated/maxloc1_8_r4.c: Regenerated. 1988 1.1 mrg * generated/maxloc1_8_r8.c: Regenerated. 1989 1.1 mrg * generated/maxval_i4.c: Regenerated. 1990 1.1 mrg * generated/maxval_i8.c: Regenerated. 1991 1.1 mrg * generated/maxval_r4.c: Regenerated. 1992 1.1 mrg * generated/maxval_r8.c: Regenerated. 1993 1.1 mrg * generated/minloc0_4_i4.c: Regenerated. 1994 1.1 mrg * generated/minloc0_4_i8.c: Regenerated. 1995 1.1 mrg * generated/minloc0_4_r4.c: Regenerated. 1996 1.1 mrg * generated/minloc0_4_r8.c: Regenerated. 1997 1.1 mrg * generated/minloc0_8_i4.c: Regenerated. 1998 1.1 mrg * generated/minloc0_8_i8.c: Regenerated. 1999 1.1 mrg * generated/minloc0_8_r4.c: Regenerated. 2000 1.1 mrg * generated/minloc0_8_r8.c: Regenerated. 2001 1.1 mrg * generated/minloc1_4_i4.c: Regenerated. 2002 1.1 mrg * generated/minloc1_4_i8.c: Regenerated. 2003 1.1 mrg * generated/minloc1_4_r4.c: Regenerated. 2004 1.1 mrg * generated/minloc1_4_r8.c: Regenerated. 2005 1.1 mrg * generated/minloc1_8_i4.c: Regenerated. 2006 1.1 mrg * generated/minloc1_8_i8.c: Regenerated. 2007 1.1 mrg * generated/minloc1_8_r4.c: Regenerated. 2008 1.1 mrg * generated/minloc1_8_r8.c: Regenerated. 2009 1.1 mrg * generated/minval_i4.c: Regenerated. 2010 1.1 mrg * generated/minval_i8.c: Regenerated. 2011 1.1 mrg * generated/minval_r4.c: Regenerated. 2012 1.1 mrg * generated/minval_r8.c: Regenerated. 2013 1.1 mrg * generated/product_c4.c: Regenerated. 2014 1.1 mrg * generated/product_c8.c: Regenerated. 2015 1.1 mrg * generated/product_i4.c: Regenerated. 2016 1.1 mrg * generated/product_i8.c: Regenerated. 2017 1.1 mrg * generated/product_r4.c: Regenerated. 2018 1.1 mrg * generated/product_r8.c: Regenerated. 2019 1.1 mrg * generated/sum_c4.c: Regenerated. 2020 1.1 mrg * generated/sum_c8.c: Regenerated. 2021 1.1 mrg * generated/sum_i4.c: Regenerated. 2022 1.1 mrg * generated/sum_i8.c: Regenerated. 2023 1.1 mrg * generated/sum_r4.c: Regenerated. 2024 1.1 mrg * generated/sum_r8.c: Regenerated. 2025 1.1 mrg 2026 1.1 mrg 2005-04-30 Thomas Koenig <Thomas.Koenig (a] online.de> 2027 1.1 mrg 2028 1.1 mrg PR libfortran/18958 2029 1.1 mrg libgfortran.h: Change typedef of index_type from size_t 2030 1.1 mrg to ssize_t. 2031 1.1 mrg 2032 1.1 mrg 2005-04-30 Paul Thomas <pault (a] gcc.gnu.org> 2033 1.1 mrg 2034 1.1 mrg PR libfortran/18857 2035 1.1 mrg * generated/matmul_r8.c: Remove incorrect assertions. 2036 1.1 mrg * generated/matmul_c4.c: Regenerate 2037 1.1 mrg * generated/matmul_c8.c: Regenerate 2038 1.1 mrg * generated/matmul_i4.c: Regenerate 2039 1.1 mrg * generated/matmul_i8.c: Regenerate 2040 1.1 mrg * generated/matmul_r4.c: Regenerate 2041 1.1 mrg * generated/matmul_r8.c: Regenerate 2042 1.1 mrg 2043 1.1 mrg 2005-04-29 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 2044 1.1 mrg 2045 1.1 mrg * configure.ac: Check for ftruncate and chsize. 2046 1.1 mrg * io/unix.c (fd_truncate): Provide chsize as alternative to 2047 1.1 mrg ftruncate. 2048 1.1 mrg * config.h.in: Regenerate. 2049 1.1 mrg * configure: Regenerate. 2050 1.1 mrg 2051 1.1 mrg 2005-04-29 Tobias Schl"uter <tobias.schlueter (a] physik.uni-muenchen.de> 2052 1.1 mrg 2053 1.1 mrg * intrinsics/rename.c: Add missing #includes. 2054 1.1 mrg 2055 1.1 mrg 2005-04-28 Tobias Schl"uter <tobias.schlueter (a] physik.uni-muenchen.de> 2056 1.1 mrg 2057 1.1 mrg * AUTHORS, COPYING, INSTALL, NEWS, README: Remove. 2058 1.1 mrg 2059 1.1 mrg 2005-04-26 David Edelsohn <edelsohn (a] gnu.org> 2060 1.1 mrg 2061 1.1 mrg PR libfortran/20930 2062 1.1 mrg * io/rewind.c (st_rewind): Flush the stream when resetting the mode 2063 1.1 mrg from WRITING to READING. 2064 1.1 mrg 2065 1.1 mrg 2005-04-22 Paul Thomas <pault (a] gcc.gnu.org> 2066 1.1 mrg Jerry DeLisle <jvdelisle (a] verizon.net> 2067 1.1 mrg 2068 1.1 mrg * io/write.c (nml_write_obj): Provide 1 more byte for ext_name. 2069 1.1 mrg * io/list_read.c (nml_get_obj_data): Put extra brackets in get_mem 2070 1.1 mrg call for ext_name. These fix the bug reported by Jerry DeLisle to 2071 1.1 mrg the fortran list and are based on his suggested fix. 2072 1.1 mrg 2073 1.1 mrg 2005-04-22 Thomas Koenig <Thomas.Koenig (a] online.de> 2074 1.1 mrg 2075 1.1 mrg PR libfortran/20074 2076 1.1 mrg PR libfortran/20436 2077 1.1 mrg PR libfortran/21108 2078 1.1 mrg * m4/reshape.m4 (reshape_`'rtype_kind): rs, rex: New 2079 1.1 mrg variables, to be used in calculation of return array sizes. 2080 1.1 mrg Populate return array descriptor if ret->data is NULL. 2081 1.1 mrg Fix condition for early return (it used to test something 2082 1.1 mrg undefined if order was used). 2083 1.1 mrg Remove duplicate check wether pad is used. 2084 1.1 mrg * intrinsics/reshape_generic.c (reshape_generic): Likewise. 2085 1.1 mrg Fix a few places where the wrong variables were set. 2086 1.1 mrg * generated/reshape_i4.c: Regenerated. 2087 1.1 mrg * generated/reshape_i8.c: Regenerated. 2088 1.1 mrg 2089 1.1 mrg 2005-04-18 Paul Thomas <pault (a] gcc.gnu.org> 2090 1.1 mrg 2091 1.1 mrg * io/list_read.c (nml_touch_nodes, nml_read_obj, 2092 1.1 mrg nml_get_obj_data): Fix memory leaks in code for derived types. 2093 1.1 mrg 2094 1.1 mrg 2005-04-11 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 2095 1.1 mrg 2096 1.1 mrg PR libfortran/20950 2097 1.1 mrg * io/inquire.c (inquire_via_unit): Check for the gfc_unit being 2098 1.1 mrg NULL when setting ioparm.sequential. 2099 1.1 mrg 2100 1.1 mrg 2005-04-17 Thomas Koenig <Thomas.Koenig (a] online.de> 2101 1.1 mrg 2102 1.1 mrg PR libfortran/21075 2103 1.1 mrg * m4/reshape.m4 (reshape_`'rtype_kind): Change dimension 2104 1.1 mrg of auxiliary arrays from GFC_MAX_DIMENSIONS - 1 to 2105 1.1 mrg GFC_MAX_DIMENSIONS. 2106 1.1 mrg * intrinsics/reshape_generic.c (reshape_generic): Likewise. 2107 1.1 mrg * generated/reshape_i4.c: Regenerated. 2108 1.1 mrg * generated/reshape_i8.c: Regenerated. 2109 1.1 mrg 2110 1.1 mrg 2005-04-17 Paul Thomas <pault (a] gcc.gnu.org> 2111 1.1 mrg 2112 1.1 mrg * io/list_read.c (eat_separator): at_eol = 1 replaced 2113 1.1 mrg (zapped at some time?). 2114 1.1 mrg 2115 1.1 mrg 2005-04-17 Paul Thomas <pault (a] gcc.gnu.org> 2116 1.1 mrg 2117 1.1 mrg PR libfortran/12884 2118 1.1 mrg PR libfortran/17285 2119 1.1 mrg PR libfortran/18122 2120 1.1 mrg PR libfortran/18210 2121 1.1 mrg PR libfortran/18392 2122 1.1 mrg PR libfortran/18591 2123 1.1 mrg PR libfortran/18879 2124 1.1 mrg * io/io.h (nml_ls): Declare. 2125 1.1 mrg (namelist_info): Modify for arrays. 2126 1.1 mrg * io/list_read.c (namelist_read): Reduced to call to new functions. 2127 1.1 mrg (match_namelist_name): Simplified. 2128 1.1 mrg (nml_query): Handles stdin queries ? and =?. New function. 2129 1.1 mrg (nml_get_obj_data): Parses object name. New function. 2130 1.1 mrg (touch_nml_nodes): Marks objects for read. New function. 2131 1.1 mrg (untouch_nml_nodes): Resets objects. New function. 2132 1.1 mrg (parse_qualifier): Parses and checks qualifiers. New function 2133 1.1 mrg (nml_read_object): Reads and stores object data. New function. 2134 1.1 mrg (eat_separator): No new_record on '/' in namelist. 2135 1.1 mrg (finish_separator): No new_record on '/' in namelist. 2136 1.1 mrg (read_logical): Error return for namelist. 2137 1.1 mrg (read_integer): Error return for namelist. 2138 1.1 mrg (read_complex): Error return for namelist. 2139 1.1 mrg (read_real): Error return for namelist. 2140 1.1 mrg * io/lock.c (library_end): Free extended namelist_info types. 2141 1.1 mrg * io/transfer.c (st_set_nml_var): Modified for arrays. 2142 1.1 mrg (st_set_nml_var_dim): Dimension descriptors. New function. 2143 1.1 mrg * io/write.c (namelist_write): Reduced to call to new functions. 2144 1.1 mrg (nml_write_obj): Writes output for object. New function. 2145 1.1 mrg (write_integer): Suppress leading blanks for repeat counts. 2146 1.1 mrg (write_int): Suppress leading blanks for repeat counts. 2147 1.1 mrg (write_float): Suppress leading blanks for repeat counts. 2148 1.1 mrg (output_float): Suppress leading blanks for repeat counts. 2149 1.1 mrg 2150 1.1 mrg 2005-04-15 Thomas Koenig <Thomas.Koenig (a] online.de> 2151 1.1 mrg 2152 1.1 mrg PR libfortran/18495 2153 1.1 mrg * intrinsics/spread_generic.c (spread): Remove const from 2154 1.1 mrg return array descriptor. 2155 1.1 mrg New variables: rrank (rank of return array), rs (for 2156 1.1 mrg calculating the size of the return array), srank (rank 2157 1.1 mrg of the source array). 2158 1.1 mrg Generate runtime error if the dim= argument is larger than 2159 1.1 mrg the rank of the return array. 2160 1.1 mrg Generate runtime error if the needed rank of the return 2161 1.1 mrg array is larger than 7. 2162 1.1 mrg If ret->data is null, populate the return array descriptor 2163 1.1 mrg and initialize the variables for the actual operation. 2164 1.1 mrg Otherwise, set ret->dim[0].stride to one if it is zero. 2165 1.1 mrg Change second, independent use of variable dim to srank. 2166 1.1 mrg 2167 1.1 mrg 2005-04-12 Mike Stump <mrs (a] apple.com> 2168 1.1 mrg 2169 1.1 mrg * configure: Regenerate. 2170 1.1 mrg 2171 1.1 mrg 2005-04-13 Thomas Koenig <Thomas.Koenig (a] online.de> 2172 1.1 mrg 2173 1.1 mrg PR libfortran/19106 2174 1.1 mrg * m4/iforeach.c (name`'rtype_qual`_'atype_code): Add TODO 2175 1.1 mrg that setting correct strides is a front end job. 2176 1.1 mrg (`m'name`'rtype_qual`_'atype_code): Likewise. If mask has 2177 1.1 mrg a lowest stride of 0, adjust to 1. 2178 1.1 mrg * m4/ifunction.c (name`'rtype_qual`_'atype_code): Add TODO 2179 1.1 mrg that setting correct strides is a front end job. 2180 1.1 mrg (`m'name`'rtype_qual`_'atype_code): Likewise. If mask has 2181 1.1 mrg a lowest stride of 0, adjust to 1. 2182 1.1 mrg * maxloc0_4_i4.c: Regenerated 2183 1.1 mrg * maxloc0_4_i8.c: Regenerated 2184 1.1 mrg * maxloc0_4_r4.c: Regenerated 2185 1.1 mrg * maxloc0_4_r8.c: Regenerated 2186 1.1 mrg * maxloc0_8_i4.c: Regenerated 2187 1.1 mrg * maxloc0_8_i8.c: Regenerated 2188 1.1 mrg * maxloc0_8_r4.c: Regenerated 2189 1.1 mrg * maxloc0_8_r8.c: Regenerated 2190 1.1 mrg * maxloc1_4_i4.c: Regenerated 2191 1.1 mrg * maxloc1_4_i8.c: Regenerated 2192 1.1 mrg * maxloc1_4_r4.c: Regenerated 2193 1.1 mrg * maxloc1_4_r8.c: Regenerated 2194 1.1 mrg * maxloc1_8_i4.c: Regenerated 2195 1.1 mrg * maxloc1_8_i8.c: Regenerated 2196 1.1 mrg * maxloc1_8_r4.c: Regenerated 2197 1.1 mrg * maxloc1_8_r8.c: Regenerated 2198 1.1 mrg * maxval_i4.c: Regenerated 2199 1.1 mrg * maxval_i8.c: Regenerated 2200 1.1 mrg * maxval_r4.c: Regenerated 2201 1.1 mrg * maxval_r8.c: Regenerated 2202 1.1 mrg * minloc0_4_i4.c: Regenerated 2203 1.1 mrg * minloc0_4_i8.c: Regenerated 2204 1.1 mrg * minloc0_4_r4.c: Regenerated 2205 1.1 mrg * minloc0_4_r8.c: Regenerated 2206 1.1 mrg * minloc0_8_i4.c: Regenerated 2207 1.1 mrg * minloc0_8_i8.c: Regenerated 2208 1.1 mrg * minloc0_8_r4.c: Regenerated 2209 1.1 mrg * minloc0_8_r8.c: Regenerated 2210 1.1 mrg * minloc1_4_i4.c: Regenerated 2211 1.1 mrg * minloc1_4_i8.c: Regenerated 2212 1.1 mrg * minloc1_4_r4.c: Regenerated 2213 1.1 mrg * minloc1_4_r8.c: Regenerated 2214 1.1 mrg * minloc1_8_i4.c: Regenerated 2215 1.1 mrg * minloc1_8_i8.c: Regenerated 2216 1.1 mrg * minloc1_8_r4.c: Regenerated 2217 1.1 mrg * minloc1_8_r8.c: Regenerated 2218 1.1 mrg * minval_i4.c: Regenerated 2219 1.1 mrg * minval_i8.c: Regenerated 2220 1.1 mrg * minval_r4.c: Regenerated 2221 1.1 mrg * minval_r8.c: Regenerated 2222 1.1 mrg * product_c4.c: Regenerated 2223 1.1 mrg * product_c8.c: Regenerated 2224 1.1 mrg * product_i4.c: Regenerated 2225 1.1 mrg * product_i8.c: Regenerated 2226 1.1 mrg * product_r4.c: Regenerated 2227 1.1 mrg * product_r8.c: Regenerated 2228 1.1 mrg * sum_c4.c: Regenerated 2229 1.1 mrg * sum_c8.c: Regenerated 2230 1.1 mrg * sum_i4.c: Regenerated 2231 1.1 mrg * sum_i8.c: Regenerated 2232 1.1 mrg * sum_r4.c: Regenerated 2233 1.1 mrg * sum_r8.c: Regenerated 2234 1.1 mrg 2235 1.1 mrg 2005-04-10 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 2236 1.1 mrg 2237 1.1 mrg PR libfortran/20788 2238 1.1 mrg * runtime/environ.c (init_unsigned_integer): Function for 2239 1.1 mrg environment variables we want to be positive. 2240 1.1 mrg (init_integer): Function to allow negative environment 2241 1.1 mrg variables (e.g. for GFORTRAN_STDIN_UNIT). 2242 1.1 mrg 2243 1.1 mrg 2005-04-10 Thomas Koenig <Thomas.Koenig (a] online.de> 2244 1.1 mrg 2245 1.1 mrg PR libfortran/17992 2246 1.1 mrg PR libfortran/19568 2247 1.1 mrg PR libfortran/19595 2248 1.1 mrg PR libfortran/20005 2249 1.1 mrg PR libfortran/20092 2250 1.1 mrg PR libfortran/20131 2251 1.1 mrg PR libfortran/20661 2252 1.1 mrg PR libfortran/20744 2253 1.1 mrg * io/transfer.c (top level): eor_condition: New static variable. 2254 1.1 mrg (read_sf): Remove unnecessary zeroing of buffer (there is enough 2255 1.1 mrg information in its length). 2256 1.1 mrg Return a string of length 0 (to be padded by caller) if EOR was 2257 1.1 mrg seen previously. 2258 1.1 mrg Remove erroneous special casing of EOR for standard input. 2259 1.1 mrg Set eor_condition for non-advancing I/O if an end of line was 2260 1.1 mrg detected. 2261 1.1 mrg Increment ioparm.size if necessary. 2262 1.1 mrg (formatted_transfer): Skip the function if there is an EOR condition. 2263 1.1 mrg (data_transfer_init): Initialize eor_condition to zero (false). 2264 1.1 mrg (next_record_r): Clear sf_seen_eor if a \n has been seen already. 2265 1.1 mrg (finalize_transfer): If there is an EOR condition, raise the error. 2266 1.1 mrg 2267 1.1 mrg 2005-04-09 Bud Davis <bdavis (a] gfortran.org> 2268 1.1 mrg Steven G. Kargl <kargls (a] comcast.net> 2269 1.1 mrg 2270 1.1 mrg PR fortran/19872 2271 1.1 mrg * io/transfer.c (data_transfer_init): truncate an existing 2272 1.1 mrg file on the first write. 2273 1.1 mrg 2274 1.1 mrg 2005-04-09 Thomas Koenig <Thomas.Koenig (a] online.de> 2275 1.1 mrg 2276 1.1 mrg PR libfortran/19106 2277 1.1 mrg PR libfortran/19014 2278 1.1 mrg * m4/ifunction.m4 (name`'rtype_qual`_'atype_code): ditto. 2279 1.1 mrg If retarray->data is NULL (i.e. the front end does not 2280 1.1 mrg know the rank and dimenson of the array), fill in its 2281 1.1 mrg properties and allocate memory. 2282 1.1 mrg Change the assertions about rank and dimension of retarray into 2283 1.1 mrg runtime errors and only check them for retarray->data != NULL. 2284 1.1 mrg Do the same for correcting the stride from 0 to 1 in retarray. 2285 1.1 mrg (`m'name`'rtype_qual`_'atype_code): Likewise. 2286 1.1 mrg * m4/iforeach.m4 (name`'rtype_qual`_'atype_code): Likewise. 2287 1.1 mrg Change assertion about rank of array to runtime error. 2288 1.1 mrg (`m'name`'rtype_qual`_'atype_code): Likewise. 2289 1.1 mrg * generated/all_l4.c: Regenerated. 2290 1.1 mrg * generated/all_l8.c: Regenerated. 2291 1.1 mrg * generated/any_l4.c: Regenerated. 2292 1.1 mrg * generated/any_l8.c: Regenerated. 2293 1.1 mrg * generated/count_4_l4.c: Regenerated. 2294 1.1 mrg * generated/count_4_l8.c: Regenerated. 2295 1.1 mrg * generated/count_8_l4.c: Regenerated. 2296 1.1 mrg * generated/count_8_l8.c: Regenerated. 2297 1.1 mrg * generated/maxloc0_4_i4.c: Regenerated. 2298 1.1 mrg * generated/maxloc0_4_i8.c: Regenerated. 2299 1.1 mrg * generated/maxloc0_4_r4.c: Regenerated. 2300 1.1 mrg * generated/maxloc0_4_r8.c: Regenerated. 2301 1.1 mrg * generated/maxloc0_8_i4.c: Regenerated. 2302 1.1 mrg * generated/maxloc0_8_i8.c: Regenerated. 2303 1.1 mrg * generated/maxloc0_8_r4.c: Regenerated. 2304 1.1 mrg * generated/maxloc0_8_r8.c: Regenerated. 2305 1.1 mrg * generated/maxloc1_4_i4.c: Regenerated. 2306 1.1 mrg * generated/maxloc1_4_i8.c: Regenerated. 2307 1.1 mrg * generated/maxloc1_4_r4.c: Regenerated. 2308 1.1 mrg * generated/maxloc1_4_r8.c: Regenerated. 2309 1.1 mrg * generated/maxloc1_8_i4.c: Regenerated. 2310 1.1 mrg * generated/maxloc1_8_i8.c: Regenerated. 2311 1.1 mrg * generated/maxloc1_8_r4.c: Regenerated. 2312 1.1 mrg * generated/maxloc1_8_r8.c: Regenerated. 2313 1.1 mrg * generated/maxval_i4.c: Regenerated. 2314 1.1 mrg * generated/maxval_i8.c: Regenerated. 2315 1.1 mrg * generated/maxval_r4.c: Regenerated. 2316 1.1 mrg * generated/maxval_r8.c: Regenerated. 2317 1.1 mrg * generated/minloc0_4_i4.c: Regenerated. 2318 1.1 mrg * generated/minloc0_4_i8.c: Regenerated. 2319 1.1 mrg * generated/minloc0_4_r4.c: Regenerated. 2320 1.1 mrg * generated/minloc0_4_r8.c: Regenerated. 2321 1.1 mrg * generated/minloc0_8_i4.c: Regenerated. 2322 1.1 mrg * generated/minloc0_8_i8.c: Regenerated. 2323 1.1 mrg * generated/minloc0_8_r4.c: Regenerated. 2324 1.1 mrg * generated/minloc0_8_r8.c: Regenerated. 2325 1.1 mrg * generated/minloc1_4_i4.c: Regenerated. 2326 1.1 mrg * generated/minloc1_4_i8.c: Regenerated. 2327 1.1 mrg * generated/minloc1_4_r4.c: Regenerated. 2328 1.1 mrg * generated/minloc1_4_r8.c: Regenerated. 2329 1.1 mrg * generated/minloc1_8_i4.c: Regenerated. 2330 1.1 mrg * generated/minloc1_8_i8.c: Regenerated. 2331 1.1 mrg * generated/minloc1_8_r4.c: Regenerated. 2332 1.1 mrg * generated/minloc1_8_r8.c: Regenerated. 2333 1.1 mrg * generated/minval_i4.c: Regenerated. 2334 1.1 mrg * generated/minval_i8.c: Regenerated. 2335 1.1 mrg * generated/minval_r4.c: Regenerated. 2336 1.1 mrg * generated/minval_r8.c: Regenerated. 2337 1.1 mrg * generated/product_c4.c: Regenerated. 2338 1.1 mrg * generated/product_c8.c: Regenerated. 2339 1.1 mrg * generated/product_i4.c: Regenerated. 2340 1.1 mrg * generated/product_i8.c: Regenerated. 2341 1.1 mrg * generated/product_r4.c: Regenerated. 2342 1.1 mrg * generated/product_r8.c: Regenerated. 2343 1.1 mrg * generated/sum_c4.c: Regenerated. 2344 1.1 mrg * generated/sum_c8.c: Regenerated. 2345 1.1 mrg * generated/sum_i4.c: Regenerated. 2346 1.1 mrg * generated/sum_i8.c: Regenerated. 2347 1.1 mrg * generated/sum_r4.c: Regenerated. 2348 1.1 mrg * generated/sum_r8.c: Regenerated. 2349 1.1 mrg 2350 1.1 mrg 2005-04-09 Thomas Koenig <Thomas.Koenig (a] online.de> 2351 1.1 mrg 2352 1.1 mrg PR libfortran/20163 2353 1.1 mrg * runtime/string.c (compare0): Use fstrlen() to 2354 1.1 mrg strip trailing blanks from option string. 2355 1.1 mrg 2356 1.1 mrg 2005-04-09 Andrew Pinski <pinskia (a] physics.uc.edu> 2357 1.1 mrg 2358 1.1 mrg PR fortran/13257 2359 1.1 mrg * format.c (parse_format_list): Allow an optional comma 2360 1.1 mrg between descriptors. 2361 1.1 mrg 2362 1.1 mrg 2005-04-08 Eric Botcazou <ebotcazou (a] libertysurf.fr> 2363 1.1 mrg 2364 1.1 mrg * io/backspace.c (unformatted_backspace): Do not dereference 2365 1.1 mrg the pointer to the stream. 2366 1.1 mrg 2367 1.1 mrg 2005-04-07 Andrew Pinski <pinskia (a] physics.uc.edu> 2368 1.1 mrg 2369 1.1 mrg PR libfortran/20766 2370 1.1 mrg * configure.ac (extra_ldflags_libgfortran): Set for *-darwin* to 2371 1.1 mrg "-Wl,-single_module". 2372 1.1 mrg * configure: Regenerate. 2373 1.1 mrg * Makefile.am (libgfortran_la_LDFLAGS): Add extra_ldflags_libgfortran. 2374 1.1 mrg * Makefile.in: Regenerate. 2375 1.1 mrg 2376 1.1 mrg 2005-04-05 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 2377 1.1 mrg 2378 1.1 mrg PR libfortran/20755 2379 1.1 mrg * write.c (write_float): A G edit descriptor may locally change 2380 1.1 mrg the scale factor, but it needs to be restored afterwards. 2381 1.1 mrg 2382 1.1 mrg 2005-04-03 Dale Ranta <dir (a] lanl.gov> 2383 1.1 mrg Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 2384 1.1 mrg 2385 1.1 mrg PR libfortran/20068 2386 1.1 mrg PR libfortran/20125 2387 1.1 mrg PR libfortran/20156 2388 1.1 mrg PR libfortran/20471 2389 1.1 mrg * io/backspace.c (unformatted_backspace): Fix error in arithmetic. 2390 1.1 mrg (st_backspace): When in WRITING mode, we flush and falling back 2391 1.1 mrg into READING mode. In all cases, correctly position the stream. 2392 1.1 mrg 2393 1.1 mrg 2005-03-31 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 2394 1.1 mrg 2395 1.1 mrg PR libfortran/20660 2396 1.1 mrg * io/inquire.c (inquire_via_unit): Non-opened units should still be 2397 1.1 mrg reported by an INQUIRE statement as existing. 2398 1.1 mrg * io/transfer.c (data_transfer_init): Never accept negative units. 2399 1.1 mrg 2400 1.1 mrg 2005-03-29 Dale Ranta <dir (a] lanl.gov> 2401 1.1 mrg Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 2402 1.1 mrg 2403 1.1 mrg PR libfortran/20163 2404 1.1 mrg * io/open.c (st_open): call library_end() before returning even if 2405 1.1 mrg an error arises. 2406 1.1 mrg 2407 1.1 mrg 2005-03-25 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 2408 1.1 mrg 2409 1.1 mrg PR libfortran/19678 2410 1.1 mrg * list_read.c (next_char, eat_separator, finish_separator, read_real) 2411 1.1 mrg (namelist_read): Add support for '\r' as well as '\n' as EOL 2412 1.1 mrg character. 2413 1.1 mrg 2414 1.1 mrg PR libfortran/19679 2415 1.1 mrg * list_read.c (read_sf): Add a '\r' in a test to support DOS 2416 1.1 mrg line-endings when line length is exceeded. 2417 1.1 mrg 2418 1.1 mrg 2005-03-25 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 2419 1.1 mrg 2420 1.1 mrg PR libfortran/15332 2421 1.1 mrg * io/format.c (parse_format_list): format node for colon edit 2422 1.1 mrg descriptor needs a repeat counter set to 1. 2423 1.1 mrg 2424 1.1 mrg 2005-02-24 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 2425 1.1 mrg 2426 1.1 mrg * config.h.in: Regenerate. 2427 1.1 mrg 2428 1.1 mrg 2005-02-23 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 2429 1.1 mrg 2430 1.1 mrg PR libfortran/18025 2431 1.1 mrg * write.c (output_float): Handling the "F0.d" format similarly as 2432 1.1 mrg commercial compilers. 2433 1.1 mrg 2434 1.1 mrg 2005-03-22 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 2435 1.1 mrg 2436 1.1 mrg * Makefile.am: Added new files. 2437 1.1 mrg * Makefile.in: Regenerate. 2438 1.1 mrg * aclocal.m4: Regenerate. 2439 1.1 mrg * configure.ac: add checks for signal.h headers file, as well as 2440 1.1 mrg following functions: chdir, strerror, getlogin, gethostname, kill, 2441 1.1 mrg link, symlink, perror, sleep, time. 2442 1.1 mrg * configure: Regenerate. 2443 1.1 mrg * intrinsics/chdir.c, intrinsics/gerror.c, intrinsics/getlog.c, 2444 1.1 mrg intrinsics/hostnm.c, intrinsics/ierrno.c, intrinsics/kill.c, 2445 1.1 mrg intrinsics/link.c, intrinsics/perror.c, intrinsics/rename.c, 2446 1.1 mrg intrinsics/sleep.c, intrinsics/symlnk.c, intrinsics/time.c: Newly 2447 1.1 mrg implementend g77 intrinsics. 2448 1.1 mrg 2449 1.1 mrg 2005-03-21 Zack Weinberg <zack (a] codesourcery.com> 2450 1.1 mrg 2451 1.1 mrg * configure.ac: Do not invoke TL_AC_GCC_VERSION. 2452 1.1 mrg In all substitutions, leave gcc_version to be expanded by the Makefile. 2453 1.1 mrg * aclocal.m4, configure: Regenerate. 2454 1.1 mrg * Makefile.am: Set gcc_version. 2455 1.1 mrg * Makefile.in: Regenerate. 2456 1.1 mrg 2457 1.1 mrg 2005-03-16 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 2458 1.1 mrg 2459 1.1 mrg PR libfortran/20257 2460 1.1 mrg * open.c (new_unit): set record length to max_offset rather than 2461 1.1 mrg using a hard-coded limit (which was too low). 2462 1.1 mrg 2463 1.1 mrg 2005-03-16 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 2464 1.1 mrg 2465 1.1 mrg PR libfortran/20480 2466 1.1 mrg * write.c (output_float): special check when writing 0.0 with 2467 1.1 mrg EN and ES formats. 2468 1.1 mrg 2469 1.1 mrg 2005-03-11 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 2470 1.1 mrg 2471 1.1 mrg PR libfortran/20124 2472 1.1 mrg * write.c (output_float): Adds a nzero_real variable to store 2473 1.1 mrg the number of leading zeros whatever the format width is. Corrects 2474 1.1 mrg the rounding of numbers less than 10^(-width). Fixes typo in an 2475 1.1 mrg error message. Updates copyright years 2476 1.1 mrg 2477 1.1 mrg 2005-02-27 Toon Moene <toon (a] moene.indiv.nluug.nl> 2478 1.1 mrg 2479 1.1 mrg * runtime/environ.c: Update copyright years. 2480 1.1 mrg 2481 1.1 mrg 2005-02-27 Tobias Schl"uter <tobias.schlueter (a] physik.uni-muenchen.de> 2482 1.1 mrg 2483 1.1 mrg * io/write.c: Update copyright years. 2484 1.1 mrg 2485 1.1 mrg 2005-02-27 Francois-Xavier Coudert <coudert (a] clipper.ens.fr> 2486 1.1 mrg 2487 1.1 mrg PR libfortran/20101 2488 1.1 mrg * io/write.c (output_float): Added special check for value 0.0 in 2489 1.1 mrg PE format. 2490 1.1 mrg 2491 1.1 mrg 2005-02-27 Tobias Schl"uter <tobias.schlueter (a] physik.uni-muenchen.de> 2492 1.1 mrg 2493 1.1 mrg * io/write.c (output_float): Fix typo in condition. 2494 1.1 mrg 2495 1.1 mrg 2005-02-25 Peter O'Gorman <peter (a] pogma.com> 2496 1.1 mrg Toon Moene <toon (a] moene.indiv.nluug.nl> 2497 1.1 mrg 2498 1.1 mrg PR libfortran/17748 2499 1.1 mrg * runtime/environ.c: Remove references to environ. 2500 1.1 mrg (show_variables): remove GFORTRAN_UNBUFFERED_* and 2501 1.1 mrg GFORTRAN_NAME_* because they require environ. 2502 1.1 mrg (pattern_scan): Remove function. 2503 1.1 mrg 2504 1.1 mrg 2005-02-22 Paul Thomas <paulthomas2 (a] wannado.fr> 2505 1.1 mrg Bud Davis <bdavis (a] gfortran.org> 2506 1.1 mrg 2507 1.1 mrg * io/list_read.c (read_real): Handle separators properly 2508 1.1 mrg in list directed read. 2509 1.1 mrg 2510 1.1 mrg 2005-02-21 Bud Davis <bdavis (a] gfortran.org> 2511 1.1 mrg 2512 1.1 mrg PR fortran/20086 2513 1.1 mrg * io/transfer.c (write_constant_string): accept an 'h' as 2514 1.1 mrg the start of a hollerith format string. 2515 1.1 mrg 2516 1.1 mrg 2005-02-21 Eric Botcazou <ebotcazou (a] libertysurf.fr> 2517 1.1 mrg 2518 1.1 mrg PR libfortran/19302 2519 1.1 mrg * intrinsics/c99_functions.c (nextafterf): Special-case infinite 2520 1.1 mrg numbers. 2521 1.1 mrg 2522 1.1 mrg 2005-02-21 Steven G. Kargl <kargls (a] comcast.net> 2523 1.1 mrg 2524 1.1 mrg * io/write.c (output_float): Typo in error meesage. 2525 1.1 mrg 2526 1.1 mrg 2005-02-20 Steven G. Kargl <kargls (a] comcast.net> 2527 1.1 mrg 2528 1.1 mrg PR 20085 2529 1.1 mrg * intrinsic/args.c (iargc): Off by 1. 2530 1.1 mrg 2531 1.1 mrg 2005-02-19 Steven G. Kargl <kargls (a] comcast.net> 2532 1.1 mrg 2533 1.1 mrg * intrinsic/date_and_time.c: Fix conformance problems. 2534 1.1 mrg 2535 1.1 mrg 2005-02-01 Paul Thomas <paulthomas2 (a] wanadoo.fr> 2536 1.1 mrg 2537 1.1 mrg PR libfortran/19363 2538 1.1 mrg PR libfortran/19691 2539 1.1 mrg * libgfortran.h (isfinite): Work around broken isfinite(x) in Cygwin. 2540 1.1 mrg 2541 1.1 mrg 2005-01-30 Bud Davis <bdavis (a] gfortran.org> 2542 1.1 mrg 2543 1.1 mrg PR fortran/19647 2544 1.1 mrg * io/inquire.c (inquire_via_unit): Use correct variable for 2545 1.1 mrg pad. 2546 1.1 mrg 2547 1.1 mrg 2005-01-29 Thomas Koenig <Thomas.Koenig (a] online.de> 2548 1.1 mrg 2549 1.1 mrg PR libfortran/19595 2550 1.1 mrg * io/transfer.c (data_transfer_init): eor requires advance="NO". 2551 1.1 mrg 2552 1.1 mrg 2005-01-25 Tobias Schl"uter <tobias.schlueter (a] physik.uni-muenchen.de> 2553 1.1 mrg 2554 1.1 mrg PR libfortran/19524 2555 1.1 mrg * io/read.c (read_f): Don't free uninitialized pointer. 2556 1.1 mrg 2557 1.1 mrg 2005-01-23 James A. Morrison <phython (a] gcc.gnu.org> 2558 1.1 mrg Paul Brook <paul (a] codesourcery.com> 2559 1.1 mrg 2560 1.1 mrg PR fortran/19294 2561 1.1 mrg * Makefile.am: Add transpose_c4.c and transpose_c8.c. 2562 1.1 mrg * intrinsics/cshift0.c: Use separate optimized loops for complex types. 2563 1.1 mrg * m4/transpose.m4: Include type letter in function name. 2564 1.1 mrg * Makefile.in: Regenerate. 2565 1.1 mrg * generated/transpose_*.c: Regenerate. 2566 1.1 mrg 2567 1.1 mrg 2005-01-22 Thomas Koenig <Thomas.Koenig (a] online.de> 2568 1.1 mrg 2569 1.1 mrg PR libfortran/19451 2570 1.1 mrg * io/transfer.c (finalize_transfer): Don't do anything if 2571 1.1 mrg there is an error condition. 2572 1.1 mrg 2573 1.1 mrg 2005-01-22 David Edelsohn <edelsohn (a] gnu.org> 2574 1.1 mrg 2575 1.1 mrg PR libfortran/19052 2576 1.1 mrg * libgfortran.h (options_t): Add stderr_unit. 2577 1.1 mrg * io/io.h (error_stream): Declare. 2578 1.1 mrg * io/open.c (new_unit): Do not terminate abnormally if opening 2579 1.1 mrg file preconnected to stdin, stdout, or stderr. 2580 1.1 mrg * io/unit.c (init_units): Initialize stderr_unit. 2581 1.1 mrg * io/unix.c (error_stream): New function. 2582 1.1 mrg * runtime/environ.c (GFORTRAN_STDERR_UNIT): New environment variable. 2583 1.1 mrg 2584 1.1 mrg 2005-01-22 Thomas Koenig <Thomas.Koenig (a] online.de> 2585 1.1 mrg 2586 1.1 mrg PR libfortran/18982 2587 1.1 mrg * io/unix.c (regular_file): No need to change flags->action 2588 1.1 mrg if an error occurs. Document this. 2589 1.1 mrg No need to call stat() for STATUS_OLD, open() will 2590 1.1 mrg fail anyway. 2591 1.1 mrg For ACTION_UNSPECIFIED, try open for read-write, then for 2592 1.1 mrg read-only if open fails with EACCES, then for write-only 2593 1.1 mrg if that fails with EACCES again. 2594 1.1 mrg * io/unix.c (open_external): Document changed behavior of 2595 1.1 mrg regular_file. 2596 1.1 mrg 2597 1.1 mrg 2005-01-22 Tobias Schl"uter <tobias.schlueter (a] physik.uni-muenchen.de> 2598 1.1 mrg 2599 1.1 mrg PR fortran/19194 2600 1.1 mrg * io/io.h (st_parameter): Use 'GFC_INTEGER_4' instead of 'int', 2601 1.1 mrg use CHARACTER macro for definition of string valued paramters. 2602 1.1 mrg 2603 1.1 mrg 2005-01-22 Bud Davis <bdavis9659 (a] comcast.net> 2604 1.1 mrg 2605 1.1 mrg PR fortran/19314 2606 1.1 mrg * io/inquire.c(inquire_via_unit): implement POSITION=. 2607 1.1 mrg * io/transfer.c(next_record): update position for 2608 1.1 mrg INQUIRE. 2609 1.1 mrg * io/rewind.c(st_rewind): update position for 2610 1.1 mrg INQUIRE. 2611 1.1 mrg 2612 1.1 mrg 2005-01-16 Bud Davis <bdavis9659 (a] comcast.net> 2613 1.1 mrg 2614 1.1 mrg PR fortran/18778 2615 1.1 mrg * io/transfer.c (us_read): no bytes available is not a 2616 1.1 mrg runtime error. 2617 1.1 mrg 2618 1.1 mrg 2005-01-15 Bud Davis <bdavis9659 (a] comcast.net> 2619 1.1 mrg 2620 1.1 mrg PR fortran/18983 2621 1.1 mrg * io/transfer.c (st_write_done): only truncate when it 2622 1.1 mrg is required. 2623 1.1 mrg 2624 1.1 mrg 2005-01-12 Toon Moene <toon (a] moene.indiv.nluug.nl> 2625 1.1 mrg 2626 1.1 mrg PR libfortran/19280 2627 1.1 mrg c99_protos.h: License changed to GPL+exception. 2628 1.1 mrg libgfortran.h: Ditto. 2629 1.1 mrg intrinsics/abort.c: Ditto. 2630 1.1 mrg intrinsics/args.c: Ditto. 2631 1.1 mrg intrinsics/associated.c: Ditto. 2632 1.1 mrg intrinsics/bessel.c: Ditto. 2633 1.1 mrg intrinsics/c99_functions.c: Ditto. 2634 1.1 mrg intrinsics/cpu_time.c: Ditto. 2635 1.1 mrg intrinsics/cshift0.c: Ditto. 2636 1.1 mrg intrinsics/date_and_time.c: Ditto. 2637 1.1 mrg intrinsics/env.c: Ditto. 2638 1.1 mrg intrinsics/eoshift0.c: Ditto. 2639 1.1 mrg intrinsics/eoshift2.c: Ditto. 2640 1.1 mrg intrinsics/erf.c: Ditto. 2641 1.1 mrg intrinsics/etime.c: Ditto. 2642 1.1 mrg intrinsics/exit.c: Ditto. 2643 1.1 mrg intrinsics/flush.c: Ditto. 2644 1.1 mrg intrinsics/fnum.c: Ditto. 2645 1.1 mrg intrinsics/getXid.c: Ditto. 2646 1.1 mrg intrinsics/getcwd.c: Ditto. 2647 1.1 mrg intrinsics/ishftc.c: Ditto. 2648 1.1 mrg intrinsics/mvbits.c: Ditto. 2649 1.1 mrg intrinsics/pack_generic.c: Ditto. 2650 1.1 mrg intrinsics/rand.c: Ditto. 2651 1.1 mrg intrinsics/random.c: Ditto. 2652 1.1 mrg intrinsics/reshape_generic.c: Ditto. 2653 1.1 mrg intrinsics/reshape_packed.c: Ditto. 2654 1.1 mrg intrinsics/size.c: Ditto. 2655 1.1 mrg intrinsics/spread_generic.c: Ditto. 2656 1.1 mrg intrinsics/stat.c: Ditto. 2657 1.1 mrg intrinsics/string_intrinsics.c: Ditto. 2658 1.1 mrg intrinsics/system.c: Ditto. 2659 1.1 mrg intrinsics/system_clock.c: Ditto. 2660 1.1 mrg intrinsics/transpose_generic.c: Ditto. 2661 1.1 mrg intrinsics/umask.c: Ditto. 2662 1.1 mrg intrinsics/unlink.c: Ditto. 2663 1.1 mrg intrinsics/unpack_generic.c: Ditto. 2664 1.1 mrg io/backspace.c: Ditto. 2665 1.1 mrg io/close.c: Ditto. 2666 1.1 mrg io/endfile.c: Ditto. 2667 1.1 mrg io/format.c: Ditto. 2668 1.1 mrg io/inquire.c: Ditto. 2669 1.1 mrg io/io.h: Ditto. 2670 1.1 mrg io/list_read.c: Ditto. 2671 1.1 mrg io/lock.c: Ditto. 2672 1.1 mrg io/open.c: Ditto. 2673 1.1 mrg io/read.c: Ditto. 2674 1.1 mrg io/rewind.c: Ditto. 2675 1.1 mrg io/transfer.c: Ditto. 2676 1.1 mrg io/unit.c: Ditto. 2677 1.1 mrg io/unix.c: Ditto. 2678 1.1 mrg io/write.c: Ditto. 2679 1.1 mrg m4/all.m4: Ditto. 2680 1.1 mrg m4/any.m4: Ditto. 2681 1.1 mrg m4/cexp.m4: Ditto. 2682 1.1 mrg m4/chyp.m4: Ditto. 2683 1.1 mrg m4/count.m4: Ditto. 2684 1.1 mrg m4/cshift1.m4: Ditto. 2685 1.1 mrg m4/ctrig.m4: Ditto. 2686 1.1 mrg m4/dotprod.m4: Ditto. 2687 1.1 mrg m4/dotprodc.m4: Ditto. 2688 1.1 mrg m4/dotprodl.m4: Ditto. 2689 1.1 mrg m4/eoshift1.m4: Ditto. 2690 1.1 mrg m4/eoshift3.m4: Ditto. 2691 1.1 mrg m4/exponent.m4: Ditto. 2692 1.1 mrg m4/fraction.m4: Ditto. 2693 1.1 mrg m4/head.m4: Ditto. 2694 1.1 mrg m4/iforeach.m4: Ditto. 2695 1.1 mrg m4/ifunction.m4: Ditto. 2696 1.1 mrg m4/in_pack.m4: Ditto. 2697 1.1 mrg m4/in_unpack.m4: Ditto. 2698 1.1 mrg m4/iparm.m4: Ditto. 2699 1.1 mrg m4/matmul.m4: Ditto. 2700 1.1 mrg m4/matmull.m4: Ditto. 2701 1.1 mrg m4/maxloc0.m4: Ditto. 2702 1.1 mrg m4/maxloc1.m4: Ditto. 2703 1.1 mrg m4/maxval.m4: Ditto. 2704 1.1 mrg m4/minloc0.m4: Ditto. 2705 1.1 mrg m4/minloc1.m4: Ditto. 2706 1.1 mrg m4/minval.m4: Ditto. 2707 1.1 mrg m4/mtype.m4: Ditto. 2708 1.1 mrg m4/nearest.m4: Ditto. 2709 1.1 mrg m4/pow.m4: Ditto. 2710 1.1 mrg m4/product.m4: Ditto. 2711 1.1 mrg m4/reshape.m4: Ditto. 2712 1.1 mrg m4/set_exponent.m4: Ditto. 2713 1.1 mrg m4/shape.m4: Ditto. 2714 1.1 mrg m4/specific.m4: Ditto. 2715 1.1 mrg m4/specific2.m4: Ditto. 2716 1.1 mrg m4/sum.m4: Ditto. 2717 1.1 mrg m4/transpose.m4: Ditto. 2718 1.1 mrg m4/types.m4: Ditto. 2719 1.1 mrg runtime/environ.c: Ditto. 2720 1.1 mrg runtime/error.c: Ditto. 2721 1.1 mrg runtime/in_pack_generic.c: Ditto. 2722 1.1 mrg runtime/in_unpack_generic.c: Ditto. 2723 1.1 mrg runtime/main.c: Ditto. 2724 1.1 mrg runtime/memory.c: Ditto. 2725 1.1 mrg runtime/normalize.c: Ditto. 2726 1.1 mrg runtime/pause.c: Ditto. 2727 1.1 mrg runtime/select.c: Ditto. 2728 1.1 mrg runtime/stop.c: Ditto. 2729 1.1 mrg runtime/string.c: Ditto. 2730 1.1 mrg generated/_abs_c4.f90: Regenerated. 2731 1.1 mrg generated/_abs_c8.f90: Regenerated. 2732 1.1 mrg generated/_abs_i4.f90: Regenerated. 2733 1.1 mrg generated/_abs_i8.f90: Regenerated. 2734 1.1 mrg generated/_abs_r4.f90: Regenerated. 2735 1.1 mrg generated/_abs_r8.f90: Regenerated. 2736 1.1 mrg generated/_acos_r4.f90: Regenerated. 2737 1.1 mrg generated/_acos_r8.f90: Regenerated. 2738 1.1 mrg generated/_aint_r4.f90: Regenerated. 2739 1.1 mrg generated/_aint_r8.f90: Regenerated. 2740 1.1 mrg generated/_anint_r4.f90: Regenerated. 2741 1.1 mrg generated/_anint_r8.f90: Regenerated. 2742 1.1 mrg generated/_asin_r4.f90: Regenerated. 2743 1.1 mrg generated/_asin_r8.f90: Regenerated. 2744 1.1 mrg generated/_atan2_r4.f90: Regenerated. 2745 1.1 mrg generated/_atan2_r8.f90: Regenerated. 2746 1.1 mrg generated/_atan_r4.f90: Regenerated. 2747 1.1 mrg generated/_atan_r8.f90: Regenerated. 2748 1.1 mrg generated/_conjg_c4.f90: Regenerated. 2749 1.1 mrg generated/_conjg_c8.f90: Regenerated. 2750 1.1 mrg generated/_cos_c4.f90: Regenerated. 2751 1.1 mrg generated/_cos_c8.f90: Regenerated. 2752 1.1 mrg generated/_cos_r4.f90: Regenerated. 2753 1.1 mrg generated/_cos_r8.f90: Regenerated. 2754 1.1 mrg generated/_cosh_r4.f90: Regenerated. 2755 1.1 mrg generated/_cosh_r8.f90: Regenerated. 2756 1.1 mrg generated/_dim_i4.f90: Regenerated. 2757 1.1 mrg generated/_dim_i8.f90: Regenerated. 2758 1.1 mrg generated/_dim_r4.f90: Regenerated. 2759 1.1 mrg generated/_dim_r8.f90: Regenerated. 2760 1.1 mrg generated/_exp_c4.f90: Regenerated. 2761 1.1 mrg generated/_exp_c8.f90: Regenerated. 2762 1.1 mrg generated/_exp_r4.f90: Regenerated. 2763 1.1 mrg generated/_exp_r8.f90: Regenerated. 2764 1.1 mrg generated/_log10_r4.f90: Regenerated. 2765 1.1 mrg generated/_log10_r8.f90: Regenerated. 2766 1.1 mrg generated/_log_c4.f90: Regenerated. 2767 1.1 mrg generated/_log_c8.f90: Regenerated. 2768 1.1 mrg generated/_log_r4.f90: Regenerated. 2769 1.1 mrg generated/_log_r8.f90: Regenerated. 2770 1.1 mrg generated/_mod_i4.f90: Regenerated. 2771 1.1 mrg generated/_mod_i8.f90: Regenerated. 2772 1.1 mrg generated/_mod_r4.f90: Regenerated. 2773 1.1 mrg generated/_mod_r8.f90: Regenerated. 2774 1.1 mrg generated/_sign_i4.f90: Regenerated. 2775 1.1 mrg generated/_sign_i8.f90: Regenerated. 2776 1.1 mrg generated/_sign_r4.f90: Regenerated. 2777 1.1 mrg generated/_sign_r8.f90: Regenerated. 2778 1.1 mrg generated/_sin_c4.f90: Regenerated. 2779 1.1 mrg generated/_sin_c8.f90: Regenerated. 2780 1.1 mrg generated/_sin_r4.f90: Regenerated. 2781 1.1 mrg generated/_sin_r8.f90: Regenerated. 2782 1.1 mrg generated/_sinh_r4.f90: Regenerated. 2783 1.1 mrg generated/_sinh_r8.f90: Regenerated. 2784 1.1 mrg generated/_sqrt_c4.f90: Regenerated. 2785 1.1 mrg generated/_sqrt_c8.f90: Regenerated. 2786 1.1 mrg generated/_sqrt_r4.f90: Regenerated. 2787 1.1 mrg generated/_sqrt_r8.f90: Regenerated. 2788 1.1 mrg generated/_tan_r4.f90: Regenerated. 2789 1.1 mrg generated/_tan_r8.f90: Regenerated. 2790 1.1 mrg generated/_tanh_r4.f90: Regenerated. 2791 1.1 mrg generated/_tanh_r8.f90: Regenerated. 2792 1.1 mrg generated/all_l4.c: Regenerated. 2793 1.1 mrg generated/all_l8.c: Regenerated. 2794 1.1 mrg generated/any_l4.c: Regenerated. 2795 1.1 mrg generated/any_l8.c: Regenerated. 2796 1.1 mrg generated/count_4_l4.c: Regenerated. 2797 1.1 mrg generated/count_4_l8.c: Regenerated. 2798 1.1 mrg generated/count_8_l4.c: Regenerated. 2799 1.1 mrg generated/count_8_l8.c: Regenerated. 2800 1.1 mrg generated/cshift1_4.c: Regenerated. 2801 1.1 mrg generated/cshift1_8.c: Regenerated. 2802 1.1 mrg generated/dotprod_c4.c: Regenerated. 2803 1.1 mrg generated/dotprod_c8.c: Regenerated. 2804 1.1 mrg generated/dotprod_i4.c: Regenerated. 2805 1.1 mrg generated/dotprod_i8.c: Regenerated. 2806 1.1 mrg generated/dotprod_l4.c: Regenerated. 2807 1.1 mrg generated/dotprod_l8.c: Regenerated. 2808 1.1 mrg generated/dotprod_r4.c: Regenerated. 2809 1.1 mrg generated/dotprod_r8.c: Regenerated. 2810 1.1 mrg generated/eoshift1_4.c: Regenerated. 2811 1.1 mrg generated/eoshift1_8.c: Regenerated. 2812 1.1 mrg generated/eoshift3_4.c: Regenerated. 2813 1.1 mrg generated/eoshift3_8.c: Regenerated. 2814 1.1 mrg generated/exp_c4.c: Regenerated. 2815 1.1 mrg generated/exp_c8.c: Regenerated. 2816 1.1 mrg generated/exponent_r4.c: Regenerated. 2817 1.1 mrg generated/exponent_r8.c: Regenerated. 2818 1.1 mrg generated/fraction_r4.c: Regenerated. 2819 1.1 mrg generated/fraction_r8.c: Regenerated. 2820 1.1 mrg generated/hyp_c4.c: Regenerated. 2821 1.1 mrg generated/hyp_c8.c: Regenerated. 2822 1.1 mrg generated/in_pack_i4.c: Regenerated. 2823 1.1 mrg generated/in_pack_i8.c: Regenerated. 2824 1.1 mrg generated/in_unpack_i4.c: Regenerated. 2825 1.1 mrg generated/in_unpack_i8.c: Regenerated. 2826 1.1 mrg generated/matmul_c4.c: Regenerated. 2827 1.1 mrg generated/matmul_c8.c: Regenerated. 2828 1.1 mrg generated/matmul_i4.c: Regenerated. 2829 1.1 mrg generated/matmul_i8.c: Regenerated. 2830 1.1 mrg generated/matmul_l4.c: Regenerated. 2831 1.1 mrg generated/matmul_l8.c: Regenerated. 2832 1.1 mrg generated/matmul_r4.c: Regenerated. 2833 1.1 mrg generated/matmul_r8.c: Regenerated. 2834 1.1 mrg generated/maxloc0_4_i4.c: Regenerated. 2835 1.1 mrg generated/maxloc0_4_i8.c: Regenerated. 2836 1.1 mrg generated/maxloc0_4_r4.c: Regenerated. 2837 1.1 mrg generated/maxloc0_4_r8.c: Regenerated. 2838 1.1 mrg generated/maxloc0_8_i4.c: Regenerated. 2839 1.1 mrg generated/maxloc0_8_i8.c: Regenerated. 2840 1.1 mrg generated/maxloc0_8_r4.c: Regenerated. 2841 1.1 mrg generated/maxloc0_8_r8.c: Regenerated. 2842 1.1 mrg generated/maxloc1_4_i4.c: Regenerated. 2843 1.1 mrg generated/maxloc1_4_i8.c: Regenerated. 2844 1.1 mrg generated/maxloc1_4_r4.c: Regenerated. 2845 1.1 mrg generated/maxloc1_4_r8.c: Regenerated. 2846 1.1 mrg generated/maxloc1_8_i4.c: Regenerated. 2847 1.1 mrg generated/maxloc1_8_i8.c: Regenerated. 2848 1.1 mrg generated/maxloc1_8_r4.c: Regenerated. 2849 1.1 mrg generated/maxloc1_8_r8.c: Regenerated. 2850 1.1 mrg generated/maxval_i4.c: Regenerated. 2851 1.1 mrg generated/maxval_i8.c: Regenerated. 2852 1.1 mrg generated/maxval_r4.c: Regenerated. 2853 1.1 mrg generated/maxval_r8.c: Regenerated. 2854 1.1 mrg generated/minloc0_4_i4.c: Regenerated. 2855 1.1 mrg generated/minloc0_4_i8.c: Regenerated. 2856 1.1 mrg generated/minloc0_4_r4.c: Regenerated. 2857 1.1 mrg generated/minloc0_4_r8.c: Regenerated. 2858 1.1 mrg generated/minloc0_8_i4.c: Regenerated. 2859 1.1 mrg generated/minloc0_8_i8.c: Regenerated. 2860 1.1 mrg generated/minloc0_8_r4.c: Regenerated. 2861 1.1 mrg generated/minloc0_8_r8.c: Regenerated. 2862 1.1 mrg generated/minloc1_4_i4.c: Regenerated. 2863 1.1 mrg generated/minloc1_4_i8.c: Regenerated. 2864 1.1 mrg generated/minloc1_4_r4.c: Regenerated. 2865 1.1 mrg generated/minloc1_4_r8.c: Regenerated. 2866 1.1 mrg generated/minloc1_8_i4.c: Regenerated. 2867 1.1 mrg generated/minloc1_8_i8.c: Regenerated. 2868 1.1 mrg generated/minloc1_8_r4.c: Regenerated. 2869 1.1 mrg generated/minloc1_8_r8.c: Regenerated. 2870 1.1 mrg generated/minval_i4.c: Regenerated. 2871 1.1 mrg generated/minval_i8.c: Regenerated. 2872 1.1 mrg generated/minval_r4.c: Regenerated. 2873 1.1 mrg generated/minval_r8.c: Regenerated. 2874 1.1 mrg generated/nearest_r4.c: Regenerated. 2875 1.1 mrg generated/nearest_r8.c: Regenerated. 2876 1.1 mrg generated/pow_c4_i4.c: Regenerated. 2877 1.1 mrg generated/pow_c4_i8.c: Regenerated. 2878 1.1 mrg generated/pow_c8_i4.c: Regenerated. 2879 1.1 mrg generated/pow_c8_i8.c: Regenerated. 2880 1.1 mrg generated/pow_i4_i4.c: Regenerated. 2881 1.1 mrg generated/pow_i4_i8.c: Regenerated. 2882 1.1 mrg generated/pow_i8_i4.c: Regenerated. 2883 1.1 mrg generated/pow_i8_i8.c: Regenerated. 2884 1.1 mrg generated/pow_r4_i4.c: Regenerated. 2885 1.1 mrg generated/pow_r4_i8.c: Regenerated. 2886 1.1 mrg generated/pow_r8_i4.c: Regenerated. 2887 1.1 mrg generated/pow_r8_i8.c: Regenerated. 2888 1.1 mrg generated/product_c4.c: Regenerated. 2889 1.1 mrg generated/product_c8.c: Regenerated. 2890 1.1 mrg generated/product_i4.c: Regenerated. 2891 1.1 mrg generated/product_i8.c: Regenerated. 2892 1.1 mrg generated/product_r4.c: Regenerated. 2893 1.1 mrg generated/product_r8.c: Regenerated. 2894 1.1 mrg generated/reshape_i4.c: Regenerated. 2895 1.1 mrg generated/reshape_i8.c: Regenerated. 2896 1.1 mrg generated/set_exponent_r4.c: Regenerated. 2897 1.1 mrg generated/set_exponent_r8.c: Regenerated. 2898 1.1 mrg generated/shape_i4.c: Regenerated. 2899 1.1 mrg generated/shape_i8.c: Regenerated. 2900 1.1 mrg generated/sum_c4.c: Regenerated. 2901 1.1 mrg generated/sum_c8.c: Regenerated. 2902 1.1 mrg generated/sum_i4.c: Regenerated. 2903 1.1 mrg generated/sum_i8.c: Regenerated. 2904 1.1 mrg generated/sum_r4.c: Regenerated. 2905 1.1 mrg generated/sum_r8.c: Regenerated. 2906 1.1 mrg generated/transpose_i4.c: Regenerated. 2907 1.1 mrg generated/transpose_i8.c: Regenerated. 2908 1.1 mrg generated/trig_c4.c: Regenerated. 2909 1.1 mrg generated/trig_c8.c: Regenerated. 2910 1.1 mrg 2911 1.1 mrg 2005-01-07 Bud Davis <bdavis9659 (a] comcast.net> 2912 1.1 mrg 2913 1.1 mrg PR fortran/18398 2914 1.1 mrg * transfer.c (next_record_r): always skip the 2915 1.1 mrg eol search if it was found during sf_read. 2916 1.1 mrg 2917 1.1 mrg 2919 1.1 mrg Copyright (C) 2005 Free Software Foundation, Inc. 2920 1.1 mrg 2921 1.1 mrg Copying and distribution of this file, with or without modification, 2922 1.1 mrg are permitted in any medium without royalty provided the copyright 2923 notice and this notice are preserved. 2924