public inbox for gcc-bugs@sourceware.org
help / color / mirror / Atom feed
* [Bug fortran/35990] New: run-time abort for MATMUL of run-time zero sized array
@ 2008-04-20 19:28 dick dot hendrickson at gmail dot com
2008-04-20 19:40 ` [Bug fortran/35990] run-time abort for PACK " burnus at gcc dot gnu dot org
` (10 more replies)
0 siblings, 11 replies; 12+ messages in thread
From: dick dot hendrickson at gmail dot com @ 2008-04-20 19:28 UTC (permalink / raw)
To: gcc-bugs
Two of the following 4 subroutines abort at run time. They
have a zero sized array argument to PACK. If the left and
right hand zero sizes are "the same", it works. Also works if
the zero size is a compile time thing.
Dick Hendrickson
program try_gf1048
! fails on Windows XP
! gcc version 4.4.0 20080312 (experimental) [trunk revision 133139]
call gf1048a( 10, 8, 7, 1, 0, .true.)
call gf1048b( 10, 8, 7, 1, 0, .true.)
call gf1048c( 10, 8, 7, 1, 0, .true.) !fails
call gf1048d( 10, 8, 7, 1, 0, .true.) !fails
end program
SUBROUTINE GF1048a(nf10,nf8,nf7,nf1,nf0,nf_true)
logical nf_true
CHARACTER(9) BDA(10)
CHARACTER(9) BDA1(10)
print *, 'gf1048a started'
BDA( 8:7) = PACK(BDA1( 10: 1), NF_TRUE)
print *, 'gf1048a finished'
END SUBROUTINE
SUBROUTINE GF1048b(nf10,nf8,nf7,nf1,nf0,nf_true)
logical nf_true
CHARACTER(9) BDA(10)
CHARACTER(9) BDA1(nf10)
print *, 'gf1048b started'
BDA(NF8:NF7) = PACK(BDA1(NF8:NF7), NF_TRUE)
print *, 'gf1048b finished'
END SUBROUTINE
SUBROUTINE GF1048c(nf10,nf8,nf7,nf1,nf0,nf_true)
! on windows XP, natters to itself a while and then goes
! back to command line prompt with no obvious message
logical nf_true
CHARACTER(9) BDA(10)
CHARACTER(9) BDA1(10)
print *, 'gf1048c started'
BDA(NF8:NF7) = PACK(BDA1(NF10:NF1), NF_TRUE)
print *, 'gf1048c finished'
END SUBROUTINE
SUBROUTINE GF1048d(nf10,nf8,nf7,nf1,nf0,nf_true)
! on windows XP, natters to itself a while and then opens
! a run time error box and offers to send report to MS
logical nf_true
CHARACTER(9) BDA(10)
CHARACTER(9) BDA1(nf10)
print *, 'gf1048d started'
BDA(NF8:NF7) = PACK(BDA1(NF10:NF1), NF_TRUE)
print *, 'gf1048d finished'
END SUBROUTINE
C:\gfortran:gfortran gf1048.f
C:\gfortran:a
gf1048a started
gf1048a finished
gf1048b started
gf1048b finished
gf1048c started
C:\gfortran:gfortran gf1048.f
! call gf1048c commented out
C:\gfortran:a
gf1048a started
gf1048a finished
gf1048b started
gf1048b finished
gf1048d started
C:\gfortran:
--
Summary: run-time abort for MATMUL of run-time zero sized array
Product: gcc
Version: 4.4.0
Status: UNCONFIRMED
Severity: normal
Priority: P3
Component: fortran
AssignedTo: unassigned at gcc dot gnu dot org
ReportedBy: dick dot hendrickson at gmail dot com
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35990
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/35990] run-time abort for PACK of run-time zero sized array
2008-04-20 19:28 [Bug fortran/35990] New: run-time abort for MATMUL of run-time zero sized array dick dot hendrickson at gmail dot com
@ 2008-04-20 19:40 ` burnus at gcc dot gnu dot org
2008-04-23 5:58 ` tkoenig at gcc dot gnu dot org
` (9 subsequent siblings)
10 siblings, 0 replies; 12+ messages in thread
From: burnus at gcc dot gnu dot org @ 2008-04-20 19:40 UTC (permalink / raw)
To: gcc-bugs
------- Comment #1 from burnus at gcc dot gnu dot org 2008-04-20 19:39 -------
Confirm. Valgrind shows:
gf1048c started
==9694==
==9694== Invalid write of size 1
==9694== at 0x4C26264: memcpy (in
/usr/lib64/valgrind/amd64-linux/vgpreload_memcheck.so)
==9694== by 0x4EEA167: pack_s_internal (pack_generic.c:521)
==9694== by 0x400F9D: gf1048c_ (agf.f90:37)
==9694== Address 0x7ff001001 is not stack'd, malloc'd or (recently) free'd
--
burnus at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|UNCONFIRMED |NEW
Ever Confirmed|0 |1
Keywords| |wrong-code
Last reconfirmed|0000-00-00 00:00:00 |2008-04-20 19:39:48
date| |
Summary|run-time abort for MATMUL of|run-time abort for PACK of
|run-time zero sized array |run-time zero sized array
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35990
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/35990] run-time abort for PACK of run-time zero sized array
2008-04-20 19:28 [Bug fortran/35990] New: run-time abort for MATMUL of run-time zero sized array dick dot hendrickson at gmail dot com
2008-04-20 19:40 ` [Bug fortran/35990] run-time abort for PACK " burnus at gcc dot gnu dot org
@ 2008-04-23 5:58 ` tkoenig at gcc dot gnu dot org
2008-04-23 20:33 ` tkoenig at gcc dot gnu dot org
` (8 subsequent siblings)
10 siblings, 0 replies; 12+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2008-04-23 5:58 UTC (permalink / raw)
To: gcc-bugs
------- Comment #2 from tkoenig at gcc dot gnu dot org 2008-04-23 05:58 -------
These tests call the library function, so whatever goes
wrong here probably needs to be fixed in the
generated functions as well.
--
tkoenig at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
CC| |tkoenig at gcc dot gnu dot
| |org
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35990
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/35990] run-time abort for PACK of run-time zero sized array
2008-04-20 19:28 [Bug fortran/35990] New: run-time abort for MATMUL of run-time zero sized array dick dot hendrickson at gmail dot com
2008-04-20 19:40 ` [Bug fortran/35990] run-time abort for PACK " burnus at gcc dot gnu dot org
2008-04-23 5:58 ` tkoenig at gcc dot gnu dot org
@ 2008-04-23 20:33 ` tkoenig at gcc dot gnu dot org
2008-05-03 21:09 ` tkoenig at gcc dot gnu dot org
` (7 subsequent siblings)
10 siblings, 0 replies; 12+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2008-04-23 20:33 UTC (permalink / raw)
To: gcc-bugs
------- Comment #3 from tkoenig at gcc dot gnu dot org 2008-04-23 20:32 -------
Created an attachment (id=15520)
--> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=15520&action=view)
(first) patch
This fixes the test case, at least, and passes a test of
all *pack* test cases.
I'll have to see if other code paths have a similar problem.
--
tkoenig at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
AssignedTo|unassigned at gcc dot gnu |tkoenig at gcc dot gnu dot
|dot org |org
Status|NEW |ASSIGNED
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35990
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/35990] run-time abort for PACK of run-time zero sized array
2008-04-20 19:28 [Bug fortran/35990] New: run-time abort for MATMUL of run-time zero sized array dick dot hendrickson at gmail dot com
` (2 preceding siblings ...)
2008-04-23 20:33 ` tkoenig at gcc dot gnu dot org
@ 2008-05-03 21:09 ` tkoenig at gcc dot gnu dot org
2008-05-04 8:07 ` tkoenig at gcc dot gnu dot org
` (6 subsequent siblings)
10 siblings, 0 replies; 12+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2008-05-03 21:09 UTC (permalink / raw)
To: gcc-bugs
------- Comment #4 from tkoenig at gcc dot gnu dot org 2008-05-03 21:08 -------
Created an attachment (id=15573)
--> (http://gcc.gnu.org/bugzilla/attachment.cgi?id=15573&action=view)
second patch
This works for the test case and survives the intrinsic_pack test cases.
--
tkoenig at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Attachment #15520|0 |1
is obsolete| |
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35990
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/35990] run-time abort for PACK of run-time zero sized array
2008-04-20 19:28 [Bug fortran/35990] New: run-time abort for MATMUL of run-time zero sized array dick dot hendrickson at gmail dot com
` (3 preceding siblings ...)
2008-05-03 21:09 ` tkoenig at gcc dot gnu dot org
@ 2008-05-04 8:07 ` tkoenig at gcc dot gnu dot org
2008-05-04 9:04 ` tkoenig at gcc dot gnu dot org
` (5 subsequent siblings)
10 siblings, 0 replies; 12+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2008-05-04 8:07 UTC (permalink / raw)
To: gcc-bugs
------- 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
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/35990] run-time abort for PACK of run-time zero sized array
2008-04-20 19:28 [Bug fortran/35990] New: run-time abort for MATMUL of run-time zero sized array dick dot hendrickson at gmail dot com
` (4 preceding siblings ...)
2008-05-04 8:07 ` tkoenig at gcc dot gnu dot org
@ 2008-05-04 9:04 ` tkoenig at gcc dot gnu dot org
2008-05-04 10:00 ` dominiq at lps dot ens dot fr
` (4 subsequent siblings)
10 siblings, 0 replies; 12+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2008-05-04 9:04 UTC (permalink / raw)
To: gcc-bugs
------- Comment #6 from tkoenig at gcc dot gnu dot org 2008-05-04 09:03 -------
Fixed on trunk.
--
tkoenig at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Known to fail| |4.3.1
Known to work| |4.4.0
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35990
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/35990] run-time abort for PACK of run-time zero sized array
2008-04-20 19:28 [Bug fortran/35990] New: run-time abort for MATMUL of run-time zero sized array dick dot hendrickson at gmail dot com
` (5 preceding siblings ...)
2008-05-04 9:04 ` tkoenig at gcc dot gnu dot org
@ 2008-05-04 10:00 ` dominiq at lps dot ens dot fr
2008-05-04 10:16 ` tkoenig at netcologne dot de
` (3 subsequent siblings)
10 siblings, 0 replies; 12+ messages in thread
From: dominiq at lps dot ens dot fr @ 2008-05-04 10:00 UTC (permalink / raw)
To: gcc-bugs
------- Comment #7 from dominiq at lps dot ens dot fr 2008-05-04 09:59 -------
If I am not mistaken, the patch for libgfortran/intrinsics/pack_generic.c has
not been commited yet.
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35990
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/35990] run-time abort for PACK of run-time zero sized array
2008-04-20 19:28 [Bug fortran/35990] New: run-time abort for MATMUL of run-time zero sized array dick dot hendrickson at gmail dot com
` (7 preceding siblings ...)
2008-05-04 10:16 ` tkoenig at netcologne dot de
@ 2008-05-04 10:16 ` tkoenig at gcc dot gnu dot org
2008-05-06 20:48 ` tkoenig at gcc dot gnu dot org
2008-05-06 20:50 ` tkoenig at gcc dot gnu dot org
10 siblings, 0 replies; 12+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2008-05-04 10:16 UTC (permalink / raw)
To: gcc-bugs
------- Comment #8 from tkoenig at gcc dot gnu dot org 2008-05-04 10:15 -------
Subject: Bug 35990
Author: tkoenig
Date: Sun May 4 10:14:49 2008
New Revision: 134928
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=134928
Log:
2008-05-04 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/35990
* intrinsics/pack_generic.c: Really commit.
Modified:
trunk/libgfortran/ChangeLog
trunk/libgfortran/intrinsics/pack_generic.c
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35990
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/35990] run-time abort for PACK of run-time zero sized array
2008-04-20 19:28 [Bug fortran/35990] New: run-time abort for MATMUL of run-time zero sized array dick dot hendrickson at gmail dot com
` (6 preceding siblings ...)
2008-05-04 10:00 ` dominiq at lps dot ens dot fr
@ 2008-05-04 10:16 ` tkoenig at netcologne dot de
2008-05-04 10:16 ` tkoenig at gcc dot gnu dot org
` (2 subsequent siblings)
10 siblings, 0 replies; 12+ messages in thread
From: tkoenig at netcologne dot de @ 2008-05-04 10:16 UTC (permalink / raw)
To: gcc-bugs
------- Comment #9 from tkoenig at netcologne dot de 2008-05-04 10:15 -------
Subject: Re: run-time abort for PACK of run-time zero
sized array
On Sun, 2008-05-04 at 09:59 +0000, dominiq at lps dot ens dot fr wrote:
>
> ------- Comment #7 from dominiq at lps dot ens dot fr 2008-05-04 09:59 -------
> If I am not mistaken, the patch for libgfortran/intrinsics/pack_generic.c has
> not been commited yet.
Thanks a lot, Dominique!
I just committed that part.
Thomas
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35990
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/35990] run-time abort for PACK of run-time zero sized array
2008-04-20 19:28 [Bug fortran/35990] New: run-time abort for MATMUL of run-time zero sized array dick dot hendrickson at gmail dot com
` (8 preceding siblings ...)
2008-05-04 10:16 ` tkoenig at gcc dot gnu dot org
@ 2008-05-06 20:48 ` tkoenig at gcc dot gnu dot org
2008-05-06 20:50 ` tkoenig at gcc dot gnu dot org
10 siblings, 0 replies; 12+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2008-05-06 20:48 UTC (permalink / raw)
To: gcc-bugs
------- Comment #10 from tkoenig at gcc dot gnu dot org 2008-05-06 20:47 -------
Subject: Bug 35990
Author: tkoenig
Date: Tue May 6 20:46:41 2008
New Revision: 134999
URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=134999
Log:
2008-05-06 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/35995
PR libfortran/35990
Backport from trunk.
* m4/ifunction_logical.m4: If the extent of "array"
is less than zero, set it to zero. Use an explicit
flag for breaking out of the main loop to avoid, because
the data pointer for "array" may be NULL for an empty
array.
* m4/ifunction.m4: Likewise.
* generated/all_l1.c: Regenerated.
* generated/all_l16.c: Regenerated.
* generated/all_l2.c: Regenerated.
* generated/all_l4.c: Regenerated.
* generated/all_l8.c: Regenerated.
* generated/any_l1.c: Regenerated.
* generated/any_l16.c: Regenerated.
* generated/any_l2.c: Regenerated.
* generated/any_l4.c: Regenerated.
* generated/any_l8.c: Regenerated.
* generated/count_16_l.c: Regenerated.
* generated/count_1_l.c: Regenerated.
* generated/count_2_l.c: Regenerated.
* generated/count_4_l.c: Regenerated.
* generated/count_8_l.c: Regenerated.
* generated/maxloc1_16_i1.c: Regenerated.
* generated/maxloc1_16_i16.c: Regenerated.
* generated/maxloc1_16_i2.c: Regenerated.
* generated/maxloc1_16_i4.c: Regenerated.
* generated/maxloc1_16_i8.c: Regenerated.
* generated/maxloc1_16_r10.c: Regenerated.
* generated/maxloc1_16_r16.c: Regenerated.
* generated/maxloc1_16_r4.c: Regenerated.
* generated/maxloc1_16_r8.c: Regenerated.
* generated/maxloc1_4_i1.c: Regenerated.
* generated/maxloc1_4_i16.c: Regenerated.
* generated/maxloc1_4_i2.c: Regenerated.
* generated/maxloc1_4_i4.c: Regenerated.
* generated/maxloc1_4_i8.c: Regenerated.
* generated/maxloc1_4_r10.c: Regenerated.
* generated/maxloc1_4_r16.c: Regenerated.
* generated/maxloc1_4_r4.c: Regenerated.
* generated/maxloc1_4_r8.c: Regenerated.
* generated/maxloc1_8_i1.c: Regenerated.
* generated/maxloc1_8_i16.c: Regenerated.
* generated/maxloc1_8_i2.c: Regenerated.
* generated/maxloc1_8_i4.c: Regenerated.
* generated/maxloc1_8_i8.c: Regenerated.
* generated/maxloc1_8_r10.c: Regenerated.
* generated/maxloc1_8_r16.c: Regenerated.
* generated/maxloc1_8_r4.c: Regenerated.
* generated/maxloc1_8_r8.c: Regenerated.
* generated/maxval_i1.c: Regenerated.
* generated/maxval_i16.c: Regenerated.
* generated/maxval_i2.c: Regenerated.
* generated/maxval_i4.c: Regenerated.
* generated/maxval_i8.c: Regenerated.
* generated/maxval_r10.c: Regenerated.
* generated/maxval_r16.c: Regenerated.
* generated/maxval_r4.c: Regenerated.
* generated/maxval_r8.c: Regenerated.
* generated/minloc1_16_i1.c: Regenerated.
* generated/minloc1_16_i16.c: Regenerated.
* generated/minloc1_16_i2.c: Regenerated.
* generated/minloc1_16_i4.c: Regenerated.
* generated/minloc1_16_i8.c: Regenerated.
* generated/minloc1_16_r10.c: Regenerated.
* generated/minloc1_16_r16.c: Regenerated.
* generated/minloc1_16_r4.c: Regenerated.
* generated/minloc1_16_r8.c: Regenerated.
* generated/minloc1_4_i1.c: Regenerated.
* generated/minloc1_4_i16.c: Regenerated.
* generated/minloc1_4_i2.c: Regenerated.
* generated/minloc1_4_i4.c: Regenerated.
* generated/minloc1_4_i8.c: Regenerated.
* generated/minloc1_4_r10.c: Regenerated.
* generated/minloc1_4_r16.c: Regenerated.
* generated/minloc1_4_r4.c: Regenerated.
* generated/minloc1_4_r8.c: Regenerated.
* generated/minloc1_8_i1.c: Regenerated.
* generated/minloc1_8_i16.c: Regenerated.
* generated/minloc1_8_i2.c: Regenerated.
* generated/minloc1_8_i4.c: Regenerated.
* generated/minloc1_8_i8.c: Regenerated.
* generated/minloc1_8_r10.c: Regenerated.
* generated/minloc1_8_r16.c: Regenerated.
* generated/minloc1_8_r4.c: Regenerated.
* generated/minloc1_8_r8.c: Regenerated.
* generated/minval_i1.c: Regenerated.
* generated/minval_i16.c: Regenerated.
* generated/minval_i2.c: Regenerated.
* generated/minval_i4.c: Regenerated.
* generated/minval_i8.c: Regenerated.
* generated/minval_r10.c: Regenerated.
* generated/minval_r16.c: Regenerated.
* generated/minval_r4.c: Regenerated.
* generated/minval_r8.c: Regenerated.
* generated/product_c10.c: Regenerated.
* generated/product_c16.c: Regenerated.
* generated/product_c4.c: Regenerated.
* generated/product_c8.c: Regenerated.
* generated/product_i1.c: Regenerated.
* generated/product_i16.c: Regenerated.
* generated/product_i2.c: Regenerated.
* generated/product_i4.c: Regenerated.
* generated/product_i8.c: Regenerated.
* generated/product_r10.c: Regenerated.
* generated/product_r16.c: Regenerated.
* generated/product_r4.c: Regenerated.
* generated/product_r8.c: Regenerated.
* generated/sum_c10.c: Regenerated.
* generated/sum_c16.c: Regenerated.
* generated/sum_c4.c: Regenerated.
* generated/sum_c8.c: Regenerated.
* generated/sum_i1.c: Regenerated.
* generated/sum_i16.c: Regenerated.
* generated/sum_i2.c: Regenerated.
* generated/sum_i4.c: Regenerated.
* generated/sum_i8.c: Regenerated.
* generated/sum_r10.c: Regenerated.
* generated/sum_r16.c: Regenerated.
* generated/sum_r4.c: Regenerated.
* generated/sum_r8.c: Regenerated.
* 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-06 Thomas Koenig <tkoenig@gcc.gnu.org>
PR libfortran/35995
PR libfortran/35990
Backport from trunk
* gfortran.dg/intrinsic_ifunction_1.f90: New test case.
* gfortran.dg/intrinsic_pack_4.f90: New test case.
Added:
branches/gcc-4_3-branch/gcc/testsuite/gfortran.dg/intrinsic_ifunction_1.f90
branches/gcc-4_3-branch/gcc/testsuite/gfortran.dg/intrinsic_pack_4.f90
Modified:
branches/gcc-4_3-branch/gcc/testsuite/ChangeLog
branches/gcc-4_3-branch/libgfortran/ChangeLog
branches/gcc-4_3-branch/libgfortran/generated/all_l1.c
branches/gcc-4_3-branch/libgfortran/generated/all_l16.c
branches/gcc-4_3-branch/libgfortran/generated/all_l2.c
branches/gcc-4_3-branch/libgfortran/generated/all_l4.c
branches/gcc-4_3-branch/libgfortran/generated/all_l8.c
branches/gcc-4_3-branch/libgfortran/generated/any_l1.c
branches/gcc-4_3-branch/libgfortran/generated/any_l16.c
branches/gcc-4_3-branch/libgfortran/generated/any_l2.c
branches/gcc-4_3-branch/libgfortran/generated/any_l4.c
branches/gcc-4_3-branch/libgfortran/generated/any_l8.c
branches/gcc-4_3-branch/libgfortran/generated/count_16_l.c
branches/gcc-4_3-branch/libgfortran/generated/count_1_l.c
branches/gcc-4_3-branch/libgfortran/generated/count_2_l.c
branches/gcc-4_3-branch/libgfortran/generated/count_4_l.c
branches/gcc-4_3-branch/libgfortran/generated/count_8_l.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_i1.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_i16.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_i2.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_i4.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_i8.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_r10.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_r16.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_r4.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_16_r8.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_i1.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_i16.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_i2.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_i4.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_i8.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_r10.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_r16.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_r4.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_4_r8.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_i1.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_i16.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_i2.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_i4.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_i8.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_r10.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_r16.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_r4.c
branches/gcc-4_3-branch/libgfortran/generated/maxloc1_8_r8.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_i1.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_i16.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_i2.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_i4.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_i8.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_r10.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_r16.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_r4.c
branches/gcc-4_3-branch/libgfortran/generated/maxval_r8.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_i1.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_i16.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_i2.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_i4.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_i8.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_r10.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_r16.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_r4.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_16_r8.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_i1.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_i16.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_i2.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_i4.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_i8.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_r10.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_r16.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_r4.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_4_r8.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_i1.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_i16.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_i2.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_i4.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_i8.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_r10.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_r16.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_r4.c
branches/gcc-4_3-branch/libgfortran/generated/minloc1_8_r8.c
branches/gcc-4_3-branch/libgfortran/generated/minval_i1.c
branches/gcc-4_3-branch/libgfortran/generated/minval_i16.c
branches/gcc-4_3-branch/libgfortran/generated/minval_i2.c
branches/gcc-4_3-branch/libgfortran/generated/minval_i4.c
branches/gcc-4_3-branch/libgfortran/generated/minval_i8.c
branches/gcc-4_3-branch/libgfortran/generated/minval_r10.c
branches/gcc-4_3-branch/libgfortran/generated/minval_r16.c
branches/gcc-4_3-branch/libgfortran/generated/minval_r4.c
branches/gcc-4_3-branch/libgfortran/generated/minval_r8.c
branches/gcc-4_3-branch/libgfortran/generated/product_c10.c
branches/gcc-4_3-branch/libgfortran/generated/product_c16.c
branches/gcc-4_3-branch/libgfortran/generated/product_c4.c
branches/gcc-4_3-branch/libgfortran/generated/product_c8.c
branches/gcc-4_3-branch/libgfortran/generated/product_i1.c
branches/gcc-4_3-branch/libgfortran/generated/product_i16.c
branches/gcc-4_3-branch/libgfortran/generated/product_i2.c
branches/gcc-4_3-branch/libgfortran/generated/product_i4.c
branches/gcc-4_3-branch/libgfortran/generated/product_i8.c
branches/gcc-4_3-branch/libgfortran/generated/product_r10.c
branches/gcc-4_3-branch/libgfortran/generated/product_r16.c
branches/gcc-4_3-branch/libgfortran/generated/product_r4.c
branches/gcc-4_3-branch/libgfortran/generated/product_r8.c
branches/gcc-4_3-branch/libgfortran/generated/sum_c10.c
branches/gcc-4_3-branch/libgfortran/generated/sum_c16.c
branches/gcc-4_3-branch/libgfortran/generated/sum_c4.c
branches/gcc-4_3-branch/libgfortran/generated/sum_c8.c
branches/gcc-4_3-branch/libgfortran/generated/sum_i1.c
branches/gcc-4_3-branch/libgfortran/generated/sum_i16.c
branches/gcc-4_3-branch/libgfortran/generated/sum_i2.c
branches/gcc-4_3-branch/libgfortran/generated/sum_i4.c
branches/gcc-4_3-branch/libgfortran/generated/sum_i8.c
branches/gcc-4_3-branch/libgfortran/generated/sum_r10.c
branches/gcc-4_3-branch/libgfortran/generated/sum_r16.c
branches/gcc-4_3-branch/libgfortran/generated/sum_r4.c
branches/gcc-4_3-branch/libgfortran/generated/sum_r8.c
branches/gcc-4_3-branch/libgfortran/intrinsics/pack_generic.c
branches/gcc-4_3-branch/libgfortran/m4/ifunction.m4
branches/gcc-4_3-branch/libgfortran/m4/ifunction_logical.m4
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35990
^ permalink raw reply [flat|nested] 12+ messages in thread
* [Bug fortran/35990] run-time abort for PACK of run-time zero sized array
2008-04-20 19:28 [Bug fortran/35990] New: run-time abort for MATMUL of run-time zero sized array dick dot hendrickson at gmail dot com
` (9 preceding siblings ...)
2008-05-06 20:48 ` tkoenig at gcc dot gnu dot org
@ 2008-05-06 20:50 ` tkoenig at gcc dot gnu dot org
10 siblings, 0 replies; 12+ messages in thread
From: tkoenig at gcc dot gnu dot org @ 2008-05-06 20:50 UTC (permalink / raw)
To: gcc-bugs
------- Comment #11 from tkoenig at gcc dot gnu dot org 2008-05-06 20:50 -------
Fixed on 4.3.
Closing.
--
tkoenig at gcc dot gnu dot org changed:
What |Removed |Added
----------------------------------------------------------------------------
Status|ASSIGNED |RESOLVED
Known to fail|4.3.1 |
Known to work|4.4.0 |4.4.0 4.3.1
Resolution| |FIXED
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35990
^ permalink raw reply [flat|nested] 12+ messages in thread
end of thread, other threads:[~2008-05-06 20:50 UTC | newest]
Thread overview: 12+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2008-04-20 19:28 [Bug fortran/35990] New: run-time abort for MATMUL of run-time zero sized array dick dot hendrickson at gmail dot com
2008-04-20 19:40 ` [Bug fortran/35990] run-time abort for PACK " burnus at gcc dot gnu dot org
2008-04-23 5:58 ` tkoenig at gcc dot gnu dot org
2008-04-23 20:33 ` tkoenig at gcc dot gnu dot org
2008-05-03 21:09 ` tkoenig at gcc dot gnu dot org
2008-05-04 8:07 ` tkoenig at gcc dot gnu dot org
2008-05-04 9:04 ` tkoenig at gcc dot gnu dot org
2008-05-04 10:00 ` dominiq at lps dot ens dot fr
2008-05-04 10:16 ` tkoenig at netcologne dot de
2008-05-04 10:16 ` tkoenig at gcc dot gnu dot org
2008-05-06 20:48 ` tkoenig at gcc dot gnu dot org
2008-05-06 20:50 ` tkoenig at gcc dot gnu dot org
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).