[Bug libfortran/34670] bounds checking for array intrinsics

[tkoenig at gcc dot gnu dot org]

------- Comment #15 from tkoenig at gcc dot gnu dot org  2009-08-25 17:05 -------
Subject: Bug 34670

Author: tkoenig
Date: Tue Aug 25 17:05:10 2009
New Revision: 151085

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=151085
Log:
2009-08-25  Thomas Koenig  <tkoenig@gcc.gnu.org>

        PR libfortran/34670
        * runtime/bounds.c (count_0):  New function.
        * intrinsics/unpack_generic (unpack_bounds):  New function.
        (unpack_internal):  Remove zero stride checks.
        (unpack1):  Use unpack_bounds.
        (unpack1_char):  Likeweise.
        (unpack1_char4):  Likewise
        (unpack0):  Likewise.
        (unpack0_char):  Likewise.
        (unpack0_char4):  Likewise.

2009-08-25  Thomas Koenig  <tkoenig@gcc.gnu.org>

        PR libfortran/34670
        * gfortran.dg/unpack_bounds_1.f90:  New test.
        * gfortran.dg/unpack_bounds_2.f90:  New test.
        * gfortran.dg/unpack_bounds_3.f90:  New test.



Added:
    trunk/gcc/testsuite/gfortran.dg/unpack_bounds_1.f90   (with props)
    trunk/gcc/testsuite/gfortran.dg/unpack_bounds_2.f90   (with props)
    trunk/gcc/testsuite/gfortran.dg/unpack_bounds_3.f90   (with props)
Modified:
    trunk/gcc/testsuite/ChangeLog
    trunk/libgfortran/ChangeLog
    trunk/libgfortran/intrinsics/unpack_generic.c
    trunk/libgfortran/libgfortran.h
    trunk/libgfortran/runtime/bounds.c

Propchange: trunk/gcc/testsuite/gfortran.dg/unpack_bounds_1.f90
            ('svn:executable' added)

Propchange: trunk/gcc/testsuite/gfortran.dg/unpack_bounds_2.f90
            ('svn:executable' added)

Propchange: trunk/gcc/testsuite/gfortran.dg/unpack_bounds_3.f90
            ('svn:executable' added)


-- 


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