summaryrefslogtreecommitdiff
path: root/libgfortran
Commit message (Collapse)AuthorAgeFilesLines
* PR libfortran/20179fxcoudert2005-09-114-1/+24
| | | | | | | | | | | * io/unix.c (is_preconnected): Add function to test if a stream corresponds to a preconnected unit. * io/io.h: Add prototype for is_preconnected. * io/transfer.c (data_transfer_init): Do not truncate preconnected units. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@104141 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-09-10 Janne Blomqvist <jblomqvi@cc.hut.fi>tobi2005-09-102-209/+10
| | | | | | | * io/unix.c: Remove mmap code. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@104127 138bc75d-0d04-0410-961f-82ee72b054a4
* PR libfortran/23784fxcoudert2005-09-092-0/+8
| | | | | | | * io/close.c (st_close): Call library_end even in case of error. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@104108 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-09-09 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-09-093-8/+20
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | * gfortran.h: Add iomsg to gfc_open, gfc_close, gfc_filepos, gfc_inquire and gfc_dt. * dump-parse-tree.c (gfc_show_code_node): Add iomsg for open, close, file positioning, inquire and namelist. * io.c (io_tag): Add tag_iomsg. (resolve_tag): Add standards warning for iomsg. (match_open_element): Add iomsg. (gfc_free_open): Add iomsg. (gfc_resolve_open): Add iomsg. (gfc_free_close): Add iomsg. (match_close_element): Add iomsg. (gfc_resolve_close): Add iomsg. (gfc_free_filepos): Add iomsg. (match_file_element): Add iomsg. (gfc_resolve_filepos): Add iostat and iomsg. (match-dt_element): Add iomsg. (gfc_free_dt): Add iomsg. (gfc_resolve_dt): Add iomsg. (gfc_free_inquire): Add iomsg. (match_inquire_element): Add iomsg. (gfc_resolve_inquire): Add iomsg. * trans_io.c: Add ioparm_iomsg and ioparm_iomsg_len. (gfc_build_io_library_fndecls): Add iomsg as last field. (gfc_trans_open): Add iomsg. (gfc_trans_close): Add iomsg. (build_fileos): Call set_string for iomsg. (gfc_trans_inquire): Add iomsg. (build_dt): Add iomsg. 2005-09-09 Thomas Koenig <Thomas.Koenig@online.de> * io/io.h: Add iomsg as last field of st_parameter. * runtime/error.c (generate_error): If iomsg is present, copy the message there. 2005-09-09 Thomas Koenig <Thomas.Koenig@online.de> * gfortran.dg/iomsg_1.f90: New test case. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@104102 138bc75d-0d04-0410-961f-82ee72b054a4
* PR fortran/12840rsandifo2005-09-092-1/+73
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | * trans.h (gfor_fndecl_internal_realloc): Declare. (gfor_fndecl_internal_realloc64): Declare. * trans-decl.c (gfor_fndecl_internal_realloc): New variable. (gfor_fndecl_internal_realloc64): New variable. (gfc_build_builtin_function_decls): Initialize them. * trans-array.h (gfc_trans_allocate_temp_array): Add a fourth argument. * trans-array.c (gfc_trans_allocate_array_storage): Add an argument to say whether the array can grow later. Don't allocate the array on the stack if so. Don't call malloc for zero-sized arrays. (gfc_trans_allocate_temp_array): Add a similar argument here. Pass it along to gfc_trans_allocate_array_storage. (gfc_get_iteration_count, gfc_grow_array): New functions. (gfc_iterator_has_dynamic_bounds): New function. (gfc_get_array_constructor_element_size): New function. (gfc_get_array_constructor_size): New function. (gfc_trans_array_ctor_element): Replace pointer argument with a descriptor tree. (gfc_trans_array_constructor_subarray): Likewise. Take an extra argument to say whether the variable-sized part of the constructor must be allocated using realloc. Grow the array when this argument is true. (gfc_trans_array_constructor_value): Likewise. (gfc_get_array_cons_size): Delete. (gfc_trans_array_constructor): If the loop bound has not been set, split the allocation into a static part and a dynamic part. Set loop->to to the bounds for static part before allocating the temporary. Adjust call to gfc_trans_array_constructor_value. (gfc_conv_loop_setup): Allow any constructor to determine the loop bounds. Check whether the constructor has a dynamic size and prefer to use something else if so. Expect the loop bound to be set later. Adjust call to gfc_trans_allocate_temp_array. * trans-expr.c (gfc_conv_function_call): Adjust another call here. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@104073 138bc75d-0d04-0410-961f-82ee72b054a4
* PR libfortran/23262fxcoudert2005-09-077-1/+177
| | | | | | | | | | | | | | | * acinclude.m4 (LIBGFOR_CHECK_CRLF): New check. * configure.ac: Use new check. * configure.in: Regenerate. * config.h.in: Regenerate. * configure: Regenerate. * io/transfer.c (next_record_w): Add case for CRLF as line terminator. * io/unix.c (tempfile, regular_file): Open files with O_BINARY on systems with CRLF. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@104009 138bc75d-0d04-0410-961f-82ee72b054a4
* PR libfortran/23419sje2005-09-072-14/+77
| | | | | | | | | * io/write.c (extract_int): Use memcpy to access buffer. (extract_uint): Ditto. (extract_real): Ditto. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@104000 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-09-05 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-09-052-1/+6
| | | | | | | | * io/list_read.c: Adjust size of of value to 32 (to hold kind=16 complex values). git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103918 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-09-04 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-09-042-1/+20
| | | | | | | | | | | | | | PR libfortran/23321 * io/transfer.c(data_transfer_init): Check for a too-large record number. Return if sseek failed. 2005-09-04 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/23321 * gfortran.dg/direct_io_4.f90: New test case. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103835 138bc75d-0d04-0410-961f-82ee72b054a4
* * io/read.c (read_x): Take int argument instead of fnode * andjakub2005-09-034-11/+12
| | | | | | | | | | | | digging the N from F->u.n. * io/io.h (read_x): Adjust prototype. * io/transfer.c (formatted_transfer): Adjust callers. Don't clobber f->u.n for FMT_T. * gfortran.dg/fmt_t_1.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103811 138bc75d-0d04-0410-961f-82ee72b054a4
* * io/unix.c (stream_ttyname): Protect use of ttyname byfxcoudert2005-09-025-2/+18
| | | | | | | | | | HAVE_TTYNAME macro. * configure.ac: Add check for ttyname. * config.h.in: Regenerate. * configure: Regenerate. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103794 138bc75d-0d04-0410-961f-82ee72b054a4
* * libgfortran.h: Add prototype for init_compile_options.aj2005-09-023-3/+14
| | | | | | | * io/io.h: Add prototype for notify_std. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103778 138bc75d-0d04-0410-961f-82ee72b054a4
* * io/read.c (set_integer): Use memcpy to fill buffer.sje2005-08-312-5/+24
| | | | git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103687 138bc75d-0d04-0410-961f-82ee72b054a4
* PR target/23556sje2005-08-312-6/+23
| | | | | | | * io/read.c (convert_real): Use memcpy to fill buffer. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103685 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-08-29 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-08-292-1/+7
| | | | | | | | | | | | | | PR libfortran/23598 * io/lock.c(library_start): If ioparm.iostat is present, clear it unconditionally. 2005-02-29 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/23598 * gfortran.dg/iostat_1.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103613 138bc75d-0d04-0410-961f-82ee72b054a4
* * acinclude.m4 (LIBGFOR_CHECK_UNLINK_OPEN_FILE): Add check to seefxcoudert2005-08-2710-299/+512
| | | | | | | | | | | | | | | | | if target can unlink open files. * configure.ac: Use this new test. * config.h.in: Regenerate. * configure: Regenerate. * Makefile.in: Regenerate. * aclocal.ac: Regenerate. * io/io.h: Add prototype for unpack_filename. * io/close.c (st_close): Delete file after closing unit if HAVE_UNLINK_OPEN_FILE is not defined. * io/unix.c (unpack_filename): Unlink scratch file after opening it only if HAVE_UNLINK_OPEN_FILE is defined. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103566 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-08-17 Kelley Cook <kcook@gcc.gnu.org>kcook2005-08-17302-602/+606
| | | | | | | * All files: Update FSF address. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103194 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-08-16 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-08-162-3/+14
| | | | | | | | | | | | | | | PR libfortran/23428 * io/transfer.c (iolength_transfer): Remove __attribute__ ((unused)) from type. Return correct length for inquire(iolength=) for complex variables. 2005-08-16 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/23428 * gfortran.dg/inquire-complex.f90: New test case. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103168 138bc75d-0d04-0410-961f-82ee72b054a4
* Fix date of last entry, remove extra whitespaceaj2005-08-121-3/+3
| | | | git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@103019 138bc75d-0d04-0410-961f-82ee72b054a4
* PR libfortran/20006fxcoudert2005-08-118-3/+138
| | | | | | | | | | | | | | | | | | | | | | | | | | * gfortran.h: Add is_main_program member to symbol_attribute. * trans-decl: Add a gfor_fndecl_set_std tree. (gfc_build_builtin_function_decls): Create it. (gfc_generate_function_code): Add this call at the beginning of the main program. * trans.c (gfc_generate_code): Move main_program and attr. * trans.h: Add declaration for gfor_fndecl_set_std. * Makefile.am: Add file runtime/compile_options.c. * Makefile.in: Regenerate. * libgfortran.h: Create structure compile_options_t. Define the compile_options variable and GFC_STD_ macros. * runtime/compile_options.c: New file. * runtime/error.c (notify_std): New function. * runtime/main.c (init): Call init_compile_options during initialization. * io/format.c: Use the new notify_std function for the $ descriptor extension. * gfortran.dg/runtime_warning_1.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102990 138bc75d-0d04-0410-961f-82ee72b054a4
* * check.c (gfc_check_ttynam_sub, gfc_check_isatty): Add checkfxcoudert2005-08-096-5/+135
| | | | | | | | | | | | | | | | | | | | | | | functions for new intrinsics TTYNAM and ISATTY. * intrinsic.c (add_functions, add_subroutines): Add new intrinsics. * intrinsic.h: Add prototypes for new check and resolve functions. * iresolve.c (gfc_resolve_isatty, gfc_resolve_ttynam_sub): New resolve functions for intrinsics TTYNAM and ISATTY. * gfortran.h (gfc_generic_isym_id): Add symbol for ISATTY. * trans-intrinsic.c: Add case for GFC_ISYM_ISATTY. * Makefile.am: Add file intrinsics/tty.c to Makefile process. * Makefile.in: Regenerate. * io/io.h: Prototypes for new functions stream_isatty and stream_ttyname. * io/unix (stream_isatty, stream_ttyname): New functions to call isatty() and ttyname() on a given unit. * intrinsics/tty.c: New file to implement g77 intrinsics TTYNAM and ISATTY. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102915 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-08-08 Jerry DeLisle <jvdelisle@verizon.net>jvdelisle2005-08-092-1/+9
| | | | | | | | | PR libfortran/23154 * io/transfer.c (data_transfer_init): Initialize current_unit->bytes_left for a read. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102893 138bc75d-0d04-0410-961f-82ee72b054a4
* Forgot to remove and add these files in the previous commit.kargl2005-08-073-162/+117
| | | | | | | | | | * io/backspace.c: File removed, contents moved to ... * io/endfile.c: Ditto. * io/rewind.c: Ditto. * io/file_pos.c: New file, ... here. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102836 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-08-07 Janne Blomqvist <jblomqvi@cc.hut.fi>kargl2005-08-073-17/+17
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | PR fortran/22390 * dump-parse-tree.c (gfc_show_code_node): Add case for FLUSH. * gfortran.h: Add enums for FLUSH. * io.c (gfc_free_filepos,match_file_element,match_filepos): Modify comment appropriately. (gfc_match_flush): New function. * match.c (gfc_match_if): Add match for flush. * match.h: Add prototype. * parse.c (decode_statement): Add flush to 'f' case. (next_statement): Add case for flush. (gfc_ascii_statement): Likewise. * resolve.c (resolve_code): Add flush case. * st.c (gfc_free_statement): Add flush case. * trans-io.c: Add prototype for flush. (gfc_build_io_library_fndecls): Build fndecl for flush. (gfc_trans_flush): New function. * trans-stmt.h: Add prototype. * trans.c (gfc_trans_code): Add case for flush. 2005-08-07 Janne Blomqvist <jblomqvi@cc.hut.fi> PR fortran/22390 * io/backspace.c: File removed, contents moved to ... * io/endfile.c: Ditto. * io/rewind.c: Ditto. * io/file_pos.c: New file, ... here. * Makefile.am: Add file_pos.c to list, remove obsolete files. * Makefile.in: Regenerated. 2005-08-07 Janne Blomqvist <jblomqvi@cc.hut.fi> Steven G. Kargl <kargls@comcast.net> PR fortran/22390 * gfortran.dg/flush_1.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102835 138bc75d-0d04-0410-961f-82ee72b054a4
* * io/io.h: Change DEFAULT_TEMPDIR to /tmp instead of /var/tmp.fxcoudert2005-08-063-3/+11
| | | | | | | | * io/unix.c (tempfile): Look at the TEMP environment variable to find the temporary files directory. Whitespace correction. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102822 138bc75d-0d04-0410-961f-82ee72b054a4
* * io/unix.c: Add O_RDWR to open() call.fxcoudert2005-08-062-1/+5
| | | | git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102811 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-08-04 Paul Thomas <pault@gcc.gnu.org>pault2005-08-042-1/+7
| | | | | | | | | * transfer.c (data_transfer_init): Truncate file in sequential WRITE when last_record == 0, rather than current_record. Cures problem on RH9. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102746 138bc75d-0d04-0410-961f-82ee72b054a4
* * libgfortran.h: When isfinite is not provided by the system,fxcoudert2005-08-032-8/+8
| | | | | | | | define it as a macro, so that it can accept any floating point type. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102707 138bc75d-0d04-0410-961f-82ee72b054a4
* PR libfortran/23178fxcoudert2005-08-012-1/+30
| | | | | | | | * intrinsics/flush.c (flush_i8): Add function flush_i8. Update copyright years. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102641 138bc75d-0d04-0410-961f-82ee72b054a4
* PR libfortran/21787fxcoudert2005-07-312-1/+8
| | | | | | | | * intrinsics/abort.c (abort): Close units before aborting. Updated copyright years. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102600 138bc75d-0d04-0410-961f-82ee72b054a4
* PR libfortran/22436fxcoudert2005-07-302-5/+26
| | | | | | | | * io/write.c (write_real): Add default formats for real(10) and real(16). git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102590 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-07-30 Paul Thomas <pault@gcc.gnu.org>pault2005-07-302-17/+35
| | | | | | | | | | | | | | | | PR fortran/22570 and related issues. * transfer.c (formatted_transfer): Make sure that there really is data present before X- or T- editing. Move all treatment of tabbing during writes to start of next data producing format. Suppress incorrect zeroing of bytes_left in slash formating. Insert int cast for assignment of a difference of two gfc_offsets. PR fortran/22570 an related issues. * gfortran.dg/x_slash_1.f: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102583 138bc75d-0d04-0410-961f-82ee72b054a4
* whitespace fixes for my scriptssteven2005-07-241-27/+27
| | | | git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102333 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-07-23 Jerry DeLisle <jvdelisle@verizon.net>jvdelisle2005-07-242-4/+39
| | | | | | | | * io/write.c (write_float): Revise output of IEEE exceptional values to comply with F95 and F2003 standards. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102324 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-07-22 Jerry DeLisle <jvdelisle@verizon.net>pault2005-07-222-3/+9
| | | | | | | | | PR libfortran/22570 * io/unit.c (init_units): Replace BLANK_ZERO with BLANK_UNSPECIFIED. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102288 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-07-22 Jerry DeLisle <jvdelisle@verizon.net>pault2005-07-223-26/+78
| | | | | | | | | | | | | | | | | | | | | | | | | PR libfortran/21875 (FM111.f) * io/read.c (next_char): Return a ' ' character when BLANK_ZERO or BLANK_NULL are active. (read_decimal): Interpret ' ' character correctly for BZ or BN. (read_radix): Interpret ' ' character correctly for BZ or BN. (read_f): Interpret ' ' character correctly for BZ or BN. 2005-07-22 Paul Thomas <pault@gcc.gnu.org> PR libfortran/22570 * read.c (read_x): Correct the condition for doing the x-editing during formatted input. * transfer.c (formatted_transfer): Cast offset difference as int, clean-up arithmetic with new variable, bytes_used, zero counters for FMT_SLASH, (data_transfer_init) Zero X- and T-editing counters unconditionally. (next_record_w) Zero X- and T-editing counters. unconditionally. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102284 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-07-17 Jerry DeLisle <jvdelisle@verizon.net>jvdelisle2005-07-171-1/+1
| | | | | | | * libfortran/ChangeLog: Fix date on last commit. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102116 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-07-14 Jerry DeLisle <jvdelisle@verizon.net>jvdelisle2005-07-172-3/+9
| | | | | | | | | * io/write.c (write_float): Fix field width checks for printing 'Infinity' or 'Inf'. (output_float): Fix typo in comment. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102115 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-07-12 Paul Thomas <pault@gcc.gnu.org>pault2005-07-144-117/+175
| | | | | | | | | | | | | | | | | | | | | PR libfortran/16435 * transfer.c (formatted_transfer): Correct the problems with X- and T-editting that caused TLs followed by TRs to overwrite data, which caused NIST FM908.FOR to fail on many tests. (data_transfer_init): Zero X- and T-editting counters at the start of formatted IO. * write.c (write_x): Write specified number of skips with specified number of spaces at the end. 2005-07-12 Paul Thomas <pault@gcc.gnu.org> PR libfortran/16435 * gfortran.dg/tl_editting.f90: New. * gfortran.dg/g77/f77-edit-x-out.f: Remove XFAIL. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@102008 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-07-13 Paul Thomas <pault@gcc.gnu.org>pault2005-07-133-2/+28
| | | | | | | | | | | | | | | | * io/read.c (read_complex): Prevent X formatting during reads from going beyond EOR to fix NIST fm908.FOR failure. * io/list_read.c (read_complex): Allow complex data in list- directed reads to have eols either side of the comma to fix NIST FM906.FOR failure. 2005-07-13 Paul Thomas <pault@gcc.gnu.org> * gfortran.dg/past_eor.f90: New. * gfortran.dg/complex_read.f90: New. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101984 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-07-12 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-07-121-0/+1
| | | | | | | | | | PR libfortran/21593 gfortran.dg/dev_null.f90: Remove outdated comment about PR libfortran/21593. libgfortran/ChangeLog: Add PR to entry. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101940 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-07-12 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-07-122-4/+15
| | | | | | | | | | | | | | io/unix.c: Add member special_file to type unix_stream. (fd_truncate): Don't call ftruncate or chsize if s refers to a special file. (fd_to_stream): initialize s->special_file. 2005-07-12 Thomas Koenig <Thomas.Koenig@online.de> gfortran.dg/dev_null.f90: Remove targets. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101937 138bc75d-0d04-0410-961f-82ee72b054a4
* PR libgfortran/22412dje2005-07-122-3/+9
| | | | | | | | | * io/write.c (otoa): Bias p by SCRATCH_SIZE, not sizeof (SCRATCH_SIZE). (btoa): Same. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101908 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-07-09 Jerry DeLisle <jvdelisle@verizon.net>jvdelisle2005-07-092-19/+50
| | | | | | | | | | | | | PR libfortran/21875 (FM111.f) * io/read.c (next_char): Return a ' ' character when BLANK_ZERO or BLANK_NULL are active. (read_decimal): Interpret ' ' character correctly for BZ or BN. (read_radix): Interpret ' ' character correctly for BZ or BN. (read_f): Interpret ' ' character correctly for BZ or BN. * gfortran.dg/test (fmt_read_bz_bn.f90): New test case. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101837 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-07-07 Francois-Xavier Coudert <coudert@clipper.ens.fr>tkoenig2005-07-093-3/+48
| | | | | | | | | | | | | | | | | | | Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/22217 * io/write.c (extract_unit): New function; extract ints as unsigned signed int of the correct size. * io/write.c (write_int): Use it. * runtime/error.c: Adjust copyright years. Adjust size of buffer to maximum that can occur. 2005-07-07 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/22217 * gfortran.dg/negative-z-descriptor.f90: New test. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101829 138bc75d-0d04-0410-961f-82ee72b054a4
* * libgfortran.h (GFC_ARRAY_DESCRIPTOR): Replace 'type *base' bytobi2005-07-07101-160/+212
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | 'size_t offset'. * intrinsics/cshift0.c, intrinsics/eoshift0.c, intrinsics/eoshift2.c,intrinsics/pack_generic.c, intrinsics/reshape_generic.c, intrinsics/spread_generic.c, intrinsics/transpose_generic.c, intrinsics/unpack_generic, m4/cshift1.m4, m4/eoshift1.m4, m4/eoshift3.m4, m4/iforeach.m4, m4/ifunction.m4, m4/matmul.m4, m4/matmull.m4, m4/reshape.m4, m4,transpose.m4: Set renamed field 'offset' to zero instead of 'base'. * generated/all_l4.c, generated/all_l8.c, generated/any_l4.c, generated/any_l8.c, generated/count_4_l4.c, generated/count_4_l8.c, generated/count_8_l4.c, generated/count_8_l8.c, generated/chift1_4.c, generated/cshift1_8.c, generated/eoshift1_4.c, generated/eoshift1_8.c, generated/eoshift3_4.c, generated/eoshift3_8.c, generated/matmul_c4.c, generated/matmul_c8.c, generated/matmul_i4.c, matmul_i8.c, generated/matmul_l4.c, generated/matmul_l8.c, generated/matmul_r4.c, generated/matmul_r8.c, generated/maxloc0_4_i4.c, generated/maxloc0_4_i8.c, generated/maxloc0_4_r4.c, generated/maxloc0_4_r8.c, generated/maxloc0_8_i4.c, generated/maxloc0_8_i8.c, generated/maxloc0_8_r4.c, generated/maxloc0_8_r8.c, generated/maxloc1_4_i4.c, generated/maxloc1_4_i8.c, generated/maxloc1_4_r4.c, generated/maxloc1_4_r8.c, generated/maxloc1_8_i4.c, generated/maxloc1_8_i8.c, generated/maxloc1_8_r4.c, generated/maxloc1_8_r8.c, generated/maxval_i4.c, generated/maxval_i8.c, generated/maxval_r4.c, generated/maxval_r8.c, generated/minloc0_4_i4.c, generated/minloc0_4_i8.c, generated/minloc0_4_r4.c, generated/minloc0_4_r8.c, generated/minloc0_8_i4.c, generated/minloc0_8_i8.c, generated/minloc0_8_r4.c, generated/minloc0_8_r8.c, generated/minloc1_4_i4.c, generated/minloc1_4_i8.c, generated/minloc1_4_r4.c, generated/minloc1_4_r8.c, generated/minloc1_8_i4.c, generated/minloc1_8_i8.c, generated/minloc1_8_r4.c, generated/minloc1_8_r8.c, generated/minval_i4.c, generated/minval_i8.c, generated/minval_r4.c, generated/minval_r8.c, generated/product_c4.c, generated/product_c8.c, generated/product_i4.c, generated/product_i8.c, generated/product_r4.c, generated/product_r8.c, generated/reshape_c4.c, generated/reshape_c8.c, generated/reshape_i4.c, generated/reshape_i8.c, generated/sum_c4.c, generated/sum_c8.c, generated/sum_i4.c, generated/sum_i8.c, generated/sum_r4.c, generated/sum_r8.c, generated/transpose_c4.c, generated/transpose_c8.c, generated/transpose_i4.c, generated/transpose_i8.c: Regenerate: git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101739 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-07-07 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-07-079-14/+87
| | | | | | | | | | | | | | | | | | | | | | | PR libfortran/21594 * intrinsics/eoshift0.c: If abs(shift) > len, fill the the whole array with the boundary value, but don't overrun it. * intrinsics/eoshift2.c: Likewise. * m4/eoshift1.m4: Likewise. * m4/eoshift3.m4: Likewise. * generated/eoshift1_4.c: Regenerated. * generated/eoshift1_8.c: Regenerated. * generated/eoshift3_4.c: Regenerated. * generated/eoshift3_8.c: Regenerated. 2005-07-07 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/21594 * gfortran.fortran-torture/execute/intrinsic_eoshift.f90: Add test cases where the shift length is greater than the array length. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101738 138bc75d-0d04-0410-961f-82ee72b054a4
* For the 60th anniversary of Chinese people��s Anti-Japan war victory.fengwang2005-07-072-2/+6
| | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | | 2005-07-07 Feng Wang <fengwang@nudt.edu.cn> PR fortran/16531 PR fortran/15966 PR fortran/18781 * arith.c (gfc_hollerith2int, gfc_hollerith2real, gfc_hollerith2complex, gfc_hollerith2character, gfc_hollerith2logical): New functions. (eval_intrinsic): Don't evaluate if Hollerith constant arguments exist. * arith.h (gfc_hollerith2int, gfc_hollerith2real, gfc_hollerith2complex, gfc_hollerith2character, gfc_hollerith2logical): Add prototypes. * expr.c (free_expr0): Free memery allocated for Hollerith constant. (gfc_copy_expr): Allocate and copy string if Expr is from Hollerith. (gfc_check_assign): Enable conversion from Hollerith to other. * gfortran.h (bt): Add BT_HOLLERITH. (gfc_expr): Add from_H flag. * intrinsic.c (gfc_type_letter): Return 'h' for BT_HOLLERITH. (add_conversions): Add conversions from Hollerith constant to other. (do_simplify): Don't simplify if Hollerith constant arguments exist. * io.c (resolve_tag): Enable array in FORMAT tag under GFC_STD_GNU. * misc.c (gfc_basetype_name): Return "HOLLERITH" for BT_HOLLERITH. (gfc_type_name): Print "HOLLERITH" for BT_HOLLERITH. * primary.c (match_hollerith_constant): New function. (gfc_match_literal_constant): Add match Hollerith before Integer. * simplify.c (gfc_convert_constant): Add conversion from Hollerith to other. * trans-const.c (gfc_conv_constant_to_tree): Use VIEW_CONVERT_EXPR to convert Hollerith constant to tree. * trans-io.c (gfc_convert_array_to_string): Get array's address and length to set string expr. (set_string): Deal with array assigned Hollerith constant and character array. * gfortran.texi: Document Hollerith constants as extention support. 2005-07-07 Feng Wang <fengwang@nudt.edu.cn> PR fortran/16531 PR fortran/15966 PR fortran/18781 * gfortran.dg/hollerith.f90: New. * gfortran.dg/hollerith2.f90: New. * gfortran.dg/hollerith3.f90: New. * gfortran.dg/hollerith4.f90: New. * gfortran.dg/hollerith_f95.f90: New. * gfortran.dg/hollerith_legacy.f90: New. * gfortran.dg/g77/cpp4.F: New. Port from g77. 2005-07-07 Feng Wang <fengwang@nudt.edu.cn> PR fortran/16531 * io/transfer.c (formatted_transfer): Enable FMT_A on other types to support Hollerith constants. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101688 138bc75d-0d04-0410-961f-82ee72b054a4
* * intrinsics/unpack_generic.c: Remove const from parameter.aj2005-07-013-5/+11
| | | | | | | * io/transfer.c (formatted_transfer): Remove unused variable. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101499 138bc75d-0d04-0410-961f-82ee72b054a4
* 2005-06-28 Thomas Koenig <Thomas.Koenig@online.de>tkoenig2005-06-284-3/+11
| | | | | | | | | | | | | | | | | PR libfortran/22142 * m4/eoshift1.m4: Correct bstride (it needs to be multiplied by size since it's a char pointer). * m4/eoshift1_4.c: Regenerated. * m4/eoshift1_8.c: Regenerated. 2005-06-28 Thomas Koenig <Thomas.Koenig@online.de> PR libfortran/22142 * gfortran.fortran-torture/execute/intrinsic_eoshift.f90: Add testcase also testing eoshift1 for PR 22142. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@101398 138bc75d-0d04-0410-961f-82ee72b054a4
View Lorry Controller Status