[Bug fortran/31201] Too large unit number generates wrong code

["jvdelisle at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

------- Comment #10 from jvdelisle at gcc dot gnu dot org  2007-05-06 23:32 -------
Subject: Bug 31201

Author: jvdelisle
Date: Sun May  6 22:32:33 2007
New Revision: 124480

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=124480
Log:
2007-05-06  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
            Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>

        PR fortran/31201
        * gfortran.h: Add runtime error codes from libgfortran.h. Define
        MAX_UNIT_NUMBER.
        * trans.c (gfc_trans_runtime_check): Update the format of runtime error
        messages to match library runtime errors.  Use call to new library
        function runtime_error_at().
        * trans.h: Add prototype for new function gfc_trans_io_runtime_check.
        Add declaration for library functions runtime_error_at and
        generate_error.
        * trans_io.c (gfc_trans_io_runtime_check): New function.
        (set_parameter_value): Add error checking for UNIT numbers.
        (set_parameter_ref): Initialize the users variable to zero. 
        (gfc_trans_open): Move setting of unit number to after setting of
common
        flags so that runtime error trapping can be detected.
        (gfc_trans_close): Likewise. (build_filepos): Likewise.
        (gfc_trans_inquire): Likewise. (build_dt): Likewise.
        * trans-decl.c: Add declarations for runtime_error_at and
        generate_error. (gfc_build_builtin_function_decls): Build function
        declarations for runtime_error_at and generate_error.

Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/gfortran.h
    trunk/gcc/fortran/trans-decl.c
    trunk/gcc/fortran/trans-io.c
    trunk/gcc/fortran/trans.c
    trunk/gcc/fortran/trans.h


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=31201