This is the mail archive of the
gcc-bugs@gcc.gnu.org
mailing list for the GCC project.
[Bug fortran/35990] run-time abort for PACK of run-time zero sized array
- From: "tkoenig at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>
- To: gcc-bugs at gcc dot gnu dot org
- Date: 4 May 2008 08:06:50 -0000
- Subject: [Bug fortran/35990] run-time abort for PACK of run-time zero sized array
- References: <bug-35990-15620@http.gcc.gnu.org/bugzilla/>
- Reply-to: gcc-bugzilla at gcc dot gnu dot org
------- Comment #5 from tkoenig at gcc dot gnu dot org 2008-05-04 08:06 -------
Subject: Bug 35990
Author: tkoenig
Date: Sun May 4 08:06:02 2008
New Revision: 134927
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=134927
Log:
2008-05-04 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/35990
* intrinsics/pack_generic.c: If an extent of the source
array is less then zero, set it to zero. Set the source
pointer to NULL if the source size is zero. Set the total
number of elements to zero if the vector has an extent
less or equal to zero.
* m4/pack.m4: Set the source pointer to NULL if the
source array is zero-sized. Set the total number of
elemements to zero if the vector has an extent less or
equal to zero.
* generated/pack_i1.c: Regenerated.
* generated/pack_i2.c: Regenerated.
* generated/pack_i4.c: Regenerated.
* generated/pack_i8.c: Regenerated.
* generated/pack_i16.c: Regenerated.
* generated/pack_r4.c: Regenerated.
* generated/pack_r8.c: Regenerated.
* generated/pack_r10.c: Regenerated.
* generated/pack_r16.c: Regenerated.
* generated/pack_c4.c: Regenerated.
* generated/pack_c8.c: Regenerated.
* generated/pack_c10.c: Regenerated.
* generated/pack_c16.c: Regenerated.
2008-05-04 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/35990
* gfortran.dg/intrinsic_pack_4.f90: New test case.
Added:
trunk/gcc/testsuite/gfortran.dg/intrinsic_pack_4.f90
Modified:
trunk/gcc/testsuite/ChangeLog
trunk/libgfortran/ChangeLog
trunk/libgfortran/generated/pack_c10.c
trunk/libgfortran/generated/pack_c16.c
trunk/libgfortran/generated/pack_c4.c
trunk/libgfortran/generated/pack_c8.c
trunk/libgfortran/generated/pack_i1.c
trunk/libgfortran/generated/pack_i16.c
trunk/libgfortran/generated/pack_i2.c
trunk/libgfortran/generated/pack_i4.c
trunk/libgfortran/generated/pack_i8.c
trunk/libgfortran/generated/pack_r10.c
trunk/libgfortran/generated/pack_r16.c
trunk/libgfortran/generated/pack_r4.c
trunk/libgfortran/generated/pack_r8.c
trunk/libgfortran/m4/pack.m4
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35990