[Bug fortran/33297] SIZE intrinsic crashes gfortran on invalid usage

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

------- Comment #4 from burnus at gcc dot gnu dot org  2007-09-12 10:30 -------
Subject: Bug 33297

Author: burnus
Date: Wed Sep 12 10:30:22 2007
New Revision: 128424

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=128424
Log:
2007-09-12  Tobias Burnus  <burnus@net-b.de>

        PR fortran/33297
        * check.c (scalar_check): Move up in the file.
        (kind_check): Call scalar_check.
        (dim_check): If optional, do not call nonoptional_check; use
        bool for optional.
        (gfc_check_all_any,gfc_check_count,gfc_check_cshift,gfc_check_eoshift,
        gfc_check_lbound,gfc_check_minloc_maxloc,check_reduction,
        gfc_check_spread,gfc_check_ubound): Use true/false instead of 0/1
        for dim_check; honor changed meaning of optional.
        (gfc_check_int): Replace checks by kind_check.
        (gfc_check_size): Replace checks by dim_check.

2007-09-12  Tobias Burnus  <burnus@net-b.de>

        PR fortran/33297
        * gfortran.dg/intrinsic_size.f90: New.


Added:
    trunk/gcc/testsuite/gfortran.dg/intrinsic_size.f90
Modified:
    trunk/gcc/fortran/ChangeLog
    trunk/gcc/fortran/check.c
    trunk/gcc/testsuite/ChangeLog


-- 


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