aboutsummaryrefslogtreecommitdiff
path: root/libgfortran
AgeCommit message (Collapse)AuthorFilesLines
2004-10-07transfer.c (finalize_transfer): Free internal streams.Paul Brook3-1/+11
* io/transfer.c (finalize_transfer): Free internal streams. * io/unix.c (mem_close): Free stream object. From-SVN: r88709
2004-10-07string_intrinsics.c (string_verify): Fix off by one error.Paul Brook2-3/+7
* intrinsics/string_intrinsics.c (string_verify): Fix off by one error. testsuite/ * gfortran.dg/intrinsic_verify_1.f90: New test. From-SVN: r88704
2004-10-06re PR libfortran/17709 (NULL I/O list and Format error.)Paul Brook2-0/+6
PR libfortran/17709 * io/transfer.c (data_transfer_init): Reset sf_seen_eor. testsuite/ * gfortran.dg/empty_format_1.f90: New test. From-SVN: r88615
2004-10-04mvbits.c: Commit the file.Andrew Pinski2-0/+67
2004-10-04 Andrew Pinski <pinskia@physics.uc.edu> * intrinsics/mvbits.c: Commit the file. From-SVN: r88541
2004-10-04re PR fortran/17776 (no subroutine system)Tobias Schlüter4-5/+84
fortran/ PR fortran/17776 * check.c (gfc_check_system_sub): New function. * gfortran.h (gfc_generic_isym_id): Add GFC_ISYM_SYSTEM. * intrinsic.c (add_functions): Add 'system'. (add_subroutines): Add 'system'. * intrinsic.h (gfc_check_etime_sub, gfc_check_getcwd_sub): Move prototypes to other suborutines. (gfc_check_system_sub, gfc_resolve_system, gfc_resolve_system_sub): Add prototype. (gfc_resolve_system_clock): Fix formatting of prototype. * iresolve.c (gfc_resolve_system, gfc_resolve_system_sub): New functions. * trans-intrinsic.c (gfc_conv_intrinsic_function): Deal with GFC_ISYM_SYSTEM. libgfortran/ PR fortran/17776 * intrinsics/system.c: New file. * Makefile.am: Add dependency for the new file. * Makefile.in: Regenerate. From-SVN: r88532
2004-10-04re PR libfortran/17631 (libfortran: intrinsic subroutine MVBITS not implemented)Tobias Schlüter3-13/+28
PR fortran/17631 fortran/ * intrinsic.c (add_sym_5): Remove. (add_subroutines): Add resolution function for MVBITS. * intrinsic.h (gfc_resolve_mvbits): Declare resolution function for MVBITS * iresolve.c (gfc_resolve_mvbits): New function. (gfc_resolve_random_number): Remove empty line at end of function. libgfortran/ * Makefile.am (gfor_helper_src): Add intrinsics/mvbits.h. * intrinsics/mvbits.h: New file. testsuite/ * gfortran.fortran-torture/execute/intrinsic_mvbits.f90: New test. From-SVN: r88527
2004-10-04re PR fortran/17283 (UNPACK issues)Tobias Schlüter3-14/+290
PR fortran/17283 fortran/ * iresolve.c (gfc_resolve_pack): Choose function depending if mask is scalar. libgfortran/ * intrinsics/pack_generic.c (__pack): Allocate memory for return array if not done by caller. (__pack_s): New function. * runtime/memory.c (internal_malloc, internal_malloc64): Allow allocating zero memory. testsuite/ * gfortran.fortran-torture/execute/intrinsic_pack.f90: Add more tests. From-SVN: r88526
2004-10-04re PR libfortran/17706 (reading a value of 0.0 gives a value of -0.0)Paul Brook2-2/+16
2004-10-04 Paul Brook <paul@codesourcery.com> Bud Davis <bdavis9659@comcast.net> PR fortran/17706 PR fortran/16434 * io/format.c (parse_format_list): Set repeat count for S, SP, SS, BN and BZ formats. * io/write.c (output_float): Don't output minus zero. libgfortran/ * gfortran/pr17706.f90: New test. * gfortran.dg/g77/f77-edit-s-out.f: Remove xfail. Actually apply the patch this time. From-SVN: r88513
2004-10-04re PR libfortran/17706 (reading a value of 0.0 gives a value of -0.0)Paul Brook1-0/+9
2004-10-04 Paul Brook <paul@codesourcery.com> Bud Davis <bdavis9659@comcast.net> PR fortran/17706 PR fortran/16434 * io/format.c (parse_format_list): Set repeat count for S, SP, SS, BN and BZ formats. * io/write.c (output_float): Don't output minus zero. libgfortran/ * gfortran/pr17706.f90: New test. * gfortran.dg/g77/f77-edit-s-out.f: Remove xfail. Co-Authored-By: Bud Davis <bdavis9659@comcast.net> From-SVN: r88512
2004-10-03abort.c ("libgfortran.h"): Move.Aaron W. LaFramboise4-5/+10
2004-10-03 Aaron W. LaFramboise <aaronavay62@aaronwl.com> * intrinsics/abort.c ("libgfortran.h"): Move. * intrinsics/date_and_time.c ("libgfortran.h"): Same. * intrinsics/write.c ("libgfortran.h"): Same. From-SVN: r88444
2004-09-26re PR libfortran/16137 (Fortran compiler unable to produce executables as ↵Tobias Schlüter5-83/+249
libfortran depends on C99 math functions) PR libfortran/16137 * config.h.in (HAVE_POWF): Undefine. * configure.ac: Check for 'powf' in library. * configure: Regenerate. * intrinsics/c99_functions.c (powf): New function. From-SVN: r88128
2004-09-24* intrinsics/etime.c (etime_): New function.Tobias Schlüter2-0/+23
From-SVN: r88052
2004-09-21libgfortran.h: define gfc_alloca()Steven G. Kargl3-4/+13
2004-09-21 Steven G. Kargl <kargls@comcast.net> * libgfortran.h: define gfc_alloca() * intrinsics/env.c (getenv, get_environment_variable_i4): Use it. From-SVN: r87801
2004-09-21re PR libfortran/17286 (namelist containing more than one value cannot ↵Bud Davis2-0/+10
contain whitespace or newlines for READ) 2004-09-21 Bud Davis <bdavis9659@comcast.net> PR fortran/17286 * io/list_read.c (namelist_read): ignore spaces after the '=' for namelist reads. 2004-09-21 Bud Davis <bdavis9659@comcast.net> PR fortran/17286 * gfortran.dg/pr17286.f90: New test. From-SVN: r87799
2004-09-18config.h.in: Regenerate.Aaron W. LaFramboise5-0/+172
2004-09-15 Aaron W. LaFramboise <aaronavay62@aaronwl.com> * config.h.in: Regenerate. * configure: Regenerate. * configure.ac (AC_CHECK_HEADERS): Check for sys/mman.h. * unix.c: Include stdio.h. (HAVE_SYS_MMAN_H): Check. (PROT_READ, PROT_WRITE): Provide default definitions. From-SVN: r87714
2004-09-15check.c (gfc_check_getcwd_sub): New function.Steven G. Kargl1-0/+6
2004-09-15 Steven G. Kargl <kargls@comcast.net> * check.c (gfc_check_getcwd_sub): New function. * gfortran.h (GFC_ISYM_GETCWD): New symbol. * intrinsic.c (add_functions): Add function definition; Use symbol. * intrinsic.c (add_subroutines): Add subroutine definitions. * intrinsic.h: Add prototypes. * iresolve.c (gfc_resolve_getcwd, gfc_resolve_getcwd_sub): New functions. * trans-intrinsic.c (gfc_conv_intrinsic_function): Use symbol. libgfortran/ * intrincics/getcwd.c: New file. * Makefile.am: Add getcwd.c. * Makefile.in: Regenerated. From-SVN: r87555
2004-09-15check.c (gfc_check_getcwd_sub): New function.Steven G. Kargl3-2/+84
2004-09-15 Steven G. Kargl <kargls@comcast.net> * check.c (gfc_check_getcwd_sub): New function. * gfortran.h (GFC_ISYM_GETCWD): New symbol. * intrinsic.c (add_functions): Add function definition; Use symbol. * intrinsic.c (add_subroutines): Add subroutine definitions. * intrinsic.h: Add prototypes. * iresolve.c (gfc_resolve_getcwd, gfc_resolve_getcwd_sub): New functions. * trans-intrinsic.c (gfc_conv_intrinsic_function): Use symbol. libgfortran/ * intrinsics/getcwd.c: New file. * Makefile.am: Add getcwd.c. * Makefile.in: Regenerated. From-SVN: r87552
2004-09-15Fix typo.Paul Brook1-1/+1
From-SVN: r87548
2004-09-15env.c (getenv, [...]): Remove trailing white space.Steven G. Kargl2-13/+30
2004-09-15 Steven G. Kargl <kargls@comcast.net> Paul Brook <paul@codesourcery.com> * intrinsics/env.c (getenv, get_environmental_variable): Remove trailing white space. Uase alloca. Honour trim_name. Co-Authored-By: Paul Brook <paul@codesourcery.com> From-SVN: r87547
2004-09-14re PR libfortran/17090 (Runtime I/O error)Bud Davis2-1/+13
2004-09-13 Bud Davis <bdavis9659@comcast.net> PR fortran/17090 * io/list_read.c (list_formatted_read): Handle trailing spaces at end of line. 2004-09-13 Bud Davis <bdavis9659@comcast.net> PR fortran/17090 * gfortran.dg/pr17090.f90: New test. From-SVN: r87474
2004-09-06Put ChangeLog entry in the right place.Paul Brook1-0/+5
From-SVN: r87120
2004-09-06[multiple changes]Paul Brook1-5/+2
2004-09-06 Steven G. Kargl <kargls@comcast.net> * io/write.c (output_float): Typo in comment. Remove debugging printf. Fix format for FP of form 1e10. 2004-09-06 Paul Brook <paul@codesourcery.com> * gfortran.dg/edit_real_1.f90: Add new test. From-SVN: r87119
2004-09-03cshift0.c (DEF_COPY_LOOP, [...]): New.Richard Henderson2-19/+92
* intrinsics/cshift0.c (DEF_COPY_LOOP, copy_loop_int, copy_loop_long, copy_loop_double, copy_loop_ldouble): New. (__cshift0): Make shift type ssize_t. Use % operator instead of div. Use specialized versions of copy loop depending on the shape. From-SVN: r87045
2004-09-02format.c (parse_format_list): Set repeat count for P descriptors.Paul Brook3-3/+19
* io/format.c (parse_format_list): Set repeat count for P descriptors. * write.c (output_float): Fix condition. Correctly handle nonzero scale factor. testsuite/ * gfortran.dg/edit_real_1.f90: Add new tests. From-SVN: r86952
2004-09-01mk-sik-inc.sh: Use a temporary string instead of 'echo -n'.Eric Botcazou3-6/+13
* mk-sik-inc.sh: Use a temporary string instead of 'echo -n'. * mk-srk-inc.sh: Likewise. From-SVN: r86919
2004-08-31error.c (generate_error): Set both iostat and library_return.Paul Brook2-6/+12
* runtime/error.c (generate_error): Set both iostat and library_return. testsuite/ * gfortran.dg/eof_2.f90: New test. From-SVN: r86852
2004-08-31re PR libfortran/16805 (Runtime failure using list directed read from string)Paul Brook3-5/+17
PR libfortran/16805 * io/list_read.c (next_char): Don't signal EOF for internal files. * io/unix.c (mem_alloc_r_at): Don't return NULL for incomplete reads. testsuite/ 2004-08-31 Bud Davis <bdavis9659@comcast.net> * gfortran.dg/list_read_2.f90: New test. From-SVN: r86844
2004-08-31unit.c: Separate copyright years by ','.Tobias Schlüter2-11/+9
* io/unit.c: Separate copyright years by ','. (compare, insert_unit, delete_unit, is_internal_unit, close_units): Remove blank line in beginning of function. (get_unit): Simplify code. From-SVN: r86841
2004-08-31* io/unit.c (get_unit): Remove superfluous if.Paul Brook2-3/+5
From-SVN: r86838
2004-08-31transfer.c (read_sf): Rename uinty to readlen.Paul Brook3-13/+28
* io/transfer.c (read_sf): Rename uinty to readlen. Detect EOF. (finalize_transfer): Move setjmp after namlist IO. * io/unix.c (mem_alloc_r_at): Calculate remaining length correctly. testsuite/ * gfortran.dg/eof_1.f90: New test. From-SVN: r86831
2004-08-31list_read.c (eat_separator): Set at_eo when a '/' is seen.Paul Brook2-0/+5
* list_read.c (eat_separator): Set at_eo when a '/' is seen. testsuite/ * gfortran.dg/list_read_1.f90: New file. From-SVN: r86830
2004-08-31trans-decl.c, [...]: Replace all occurences of 'gfc_strlen_type_node' by ↵Tobias Schlüter6-16/+23
'gfc_charlen_type_node'. fortran/ * trans-decl.c, trans-expr.c, trans-io.c, trans-types.c: Replace all occurences of 'gfc_strlen_type_node' by 'gfc_charlen_type_node'. * trans-types.h: Same. Also update comment accordingly. libgfortran/ * libgfortran.h: Replace 'gfc_strlen_type' by 'gfc_charlen_type'. Update comment accordingly. * intrinsics/args.c, intrinsics/env.c, io/io.h, io/transfer.c: Replace all occurences of 'gfc_strlen_type' by 'gfc_charlen_type'. From-SVN: r86828
2004-08-30trans-types.h: Add comments.Paul Brook2-0/+8
* trans-types.h: Add comments. (intmax_type_node, string_type_node, const_string_type_node): Remove. libgfortran/ * libgfortran.h: Add comments. From-SVN: r86810
2004-08-30Makefile.am (gfor_helper_src): Split selected_kind.f90.Richard Henderson7-45/+159
* Makefile.am (gfor_helper_src): Split selected_kind.f90. (gfor_built_src): Add selected_int_kind.inc selected_real_kind.inc. (selected_int_kind.inc selected_real_kind.inc): New rules. * Makefile.in: Regenerate. * mk-sik-inc.sh, mk-srk-inc.sh: New files. * intrinsics/selected_int_kind.f90: Split from selected_kind.f90, include table of detected kinds. * intrinsics/selected_real_kind.f90: Similarly. From-SVN: r86801
2004-08-29bessel.c: New file.Steven G. Kargl2-0/+111
2004-08-29 Steven G. Kargl <kargls@comcast.net> Paul Brook <paul@codesourcery.com> * intrinsics/bessel.c: New file. * intrinsics/erf.c: New file. * Makefie.am: Add intrinsics/bessel.c and intrinsics/erf.c. * configure.ac: Test for C99 Bessel and Error functions. * Makefile.in: Regenerate. * config.h.in: Regenerate. * configure: Regenerate. From-SVN: r86728
2004-08-29check.c (gfc_check_besn, [...]): New functions.Steven G. Kargl6-8/+1243
2004-08-29 Steven G. Kargl <kargls@comcast.net> Paul Brook <paul@codesourcery.com> * check.c (gfc_check_besn, gfc_check_g77_math1): New functions. * f95-lang.c (DO_DEFINE_MATH_BUILTIN): Define. (DEFINE_MATH_BUILTIN, DEFINE_MATH_BUILTIN_C): Use it. (build_builtin_fntypes): New function. (gfc_init_builtin_functions): Use it. * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_{J,Y}{0,1,N} and GFC_ISYM_ERF{,C}. (gfc_c_int_kind): Declare. * intrinsic.c (add_functions): Add [d]bes* and [d]erf*. * intrinsic.h (gfc_check_besn, gfc_check_g77_math1, gfc_resolve_besn, gfc_resolve_g77_math1): Add prototypes. * resolve.c (gfc_resolve_besn, gfc_resolve_g77_math1): New functions. * mathbuiltins.def: Add comment. Change third argument. Use DEFINE_MATH_BUILTIN_C. Add bessel and error functions. * trans-intrinsic.c (BUILT_IN_FUNCTION): Define. (DEFINE_MATH_BUILTIN, DEFINE_MATH_BUILTIN_C): Use it. * trans-types.c (gfc_c_int_kind): Declare. (gfc_init_kinds): Set it. testsuite/ * gfortran.dg/g77/README: Update. * gfortran.dg/g77/erfc.f: Copy from g77.f-torture. * gfortran.dg/g77/intrinsic-unix-bessel.f: Ditto. * gfortran.dg/g77/intrinsic-unix-erf.f: Ditto. libgfortran/ * intrinsics/bessel.c: New file. * intrinsics/erf.c: New file. * Makefie.am: Add intrinsics/bessel.c and intrinsics/erf.c. * configure.ac: Test for C99 Bessel and Error functions. * Makefile.in: Regenerate. * config.h.in: Regenerate. * configure: Regenerate. Co-Authored-By: Paul Brook <paul@codesourcery.com> From-SVN: r86727
2004-08-28gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_GET?ID.Steven G. Kargl7-121/+369
2004-08-29 Steven G. Kargl <kargls@comcast.net> Paul Brook <paul@codesourcery.com> * gfortran.h (enum gfc_generic_isym_id): Add GFC_ISYM_GET?ID. (gfc_check_f, gfc_simplify_f): Add f0. * intrinsic.c (do_check): Call f0. Flatten. (add_sym_0): Fix prototype. Set f0. (add_functions): Add getgid, getgid and getuid. (resolve_intrinsic): Remove obsolete comment. (do_simplify): Call f0. * intrinsic.h (gfc_resolve_getgid, gfc_resolve_getpid, gfc_resolve_getuid): Add prototypes. * iresolve.c (gfc_resolve_getgid, gfc_resolve_getpid, gfc_resolve_getuid): New functions. * trans-intrinsic.c (gfc_conv_intrinsic_function): Handle GFC_ISYM_GET?ID. libgfortran/ * Makefile.am: Add intrinsics/getXid.c. * configure.ac: Add tests for get{g,p,u}id. * config.h.in: Regenerate. * Makefile.in: Regenerate. * configure: Regenerate. Co-Authored-By: Paul Brook <paul@codesourcery.com> From-SVN: r86703
2004-08-28re PR libfortran/17195 (Infinite loop in output_float in libgfortran/io/write.c)Paul Brook4-250/+324
PR libfortran/17195 * libgfortran.h (rtoa): Remove prototype. * runtime/error.c (rtoa): Remove. * io/write.c (calculate_G_format): Don't add blanks if E format is used. Add correct number of blanks when exponent width is specified. (output_float): Rewrite. testsuite/ * gfortran.dg/edit_real_1.f90: New test. From-SVN: r86701
2004-08-27Comment typo.Paul Brook1-1/+1
From-SVN: r86660
2004-08-27rewind.c (st_rewind): Reset unit to read mode.Paul Brook2-0/+9
* io/rewind.c (st_rewind): Reset unit to read mode. testsuite/ * gfortran.dg/rewind_1.f90: New test. From-SVN: r86659
2004-08-27re PR libfortran/16597 (gfortran: bug in unformatted I/O on scratch files)Bud Davis4-4/+22
2004-08-27 Bud Davis <bdavis9659@comcast.net> PR fortran/16597 * io/io.h: created typedef for unit_mode. * io/io.h (gfc_unit): added mode to unit structure. * io/transfer.c (data_transfer_init): flush if a write then read is done on a unit (direct access files). * io/rewind.c (st_rewind): Used unit mode instead of global. * gfortran.dg/pr16597.f90: New test. From-SVN: r86654
2004-08-26io.h, [...]: Fix formatting issues, update copyright years.Tobias Schlüter1-0/+5
* io/io.h, io/list_read.c, io/open.c, io/transfer.c, io/write.c: Fix formatting issues, update copyright years. (Add Previously missing ChangeLog entry) From-SVN: r86621
2004-08-25re PR libfortran/17143 (2**63 prints garbage)Bud Davis2-4/+12
2004-08-24 Bud Davis <bdavis9659@comcast.net> PR fortran/17143 * runtime/error.c (itoa): keep from overflowing during mod operation by using unsigned variable. * gfortran.dg/pr17143.f90: New test. From-SVN: r86532
2004-08-25re PR libfortran/17164 (index function not working properly)Bud Davis2-0/+9
2004-08-24 Bud Davis <bdavis9659@comcast.net> PR fortran/17164 * runtime/string_intrinsics.c (string_index):check for substring longer than string. * gfortran.dg/pr17164.f90: New test. From-SVN: r86527
2004-08-24Makefile.am (libgfortran_la_LDFLAGS): Add -lm.David Edelsohn3-2/+7
* Makefile.am (libgfortran_la_LDFLAGS): Add -lm. * Makefile.in: Rebuilt. From-SVN: r86486
2004-08-23ignore autom4te.cacheR. Kelley Cook1-0/+1
From-SVN: r86446
2004-08-23io.h, [...]: Fix formatting issues, update copyright years.Tobias Schlüter5-349/+346
* io/io.h, io/list_read.c, io/open.c, io/transfer.c, io/write.c: Fix formatting issues, update copyright years. From-SVN: r86425
2004-08-21Fix typo.Paul Brook1-1/+1
From-SVN: r86363
2004-08-21re PR libfortran/16908 (Segfault in libgfortran/io/transfer.c)Bud Davis2-4/+18
2004-08-21 Bud Davis <bdavis9659@comcast.net> PR 16908 * io/transfer.c (next_record_w): Do not blank pad. * io/transfer.c (next_record): Take into account partial records. testsuite/ * gfortran.dg/direct_io.f90: New test. From-SVN: r86361
2004-08-18re PR fortran/13278 (derived type namelist I/O support missing, causes ICE)Victor Leikehman4-14/+40
2004-08-18 Victor Leikehman <lei@il.ibm.com> PR fortran/13278 * trans-io.c (transfer_namelist_element): New. Recursively handle derived-type variables. Pass string lengths. (build_dt): Code moved to build_namelist, with some changes and additions. (gfc_build_io_library_fndecls): Declare the fifth argument in st_set_nml_var_char -- string_length. libgfortran/ * io/transfer.c (st_set_nml_var) * io/write.c (namelist_write): Allow var_name and var_name_len to be null. For strings, use string_length field instead of len. * io/io.h (struct namelist_type): New field string_length. (st_set_nml_var_char): New argument string_length. From-SVN: r86166