Sign Up
Log In
Log In
or
Sign Up
Places
All Projects
Status Monitor
Collapse sidebar
home:L2G:F
gcc
gcc41-pr29091.patch
Overview
Repositories
Revisions
Requests
Users
Attributes
Meta
File gcc41-pr29091.patch of Package gcc
2006-10-04 Jakub Jelinek <jakub@redhat.com> PR c/29091 * varasm.c (output_constant): If TREE_VECTOR_CST_ELTS chain is shorter than the number of vector elements fill the rest with zeros. * gcc.dg/pr29091.c: New test. --- gcc/varasm.c.jj 2006-09-22 10:29:56.000000000 +0200 +++ gcc/varasm.c 2006-10-04 17:52:27.000000000 +0200 @@ -4128,8 +4128,12 @@ output_constant (tree exp, unsigned HOST link = TREE_VECTOR_CST_ELTS (exp); output_constant (TREE_VALUE (link), elt_size, align); + thissize = elt_size; while ((link = TREE_CHAIN (link)) != NULL) - output_constant (TREE_VALUE (link), elt_size, nalign); + { + output_constant (TREE_VALUE (link), elt_size, nalign); + thissize += elt_size; + } break; } default: --- gcc/testsuite/gcc.dg/pr29091.c.jj 2006-10-04 18:02:09.000000000 +0200 +++ gcc/testsuite/gcc.dg/pr29091.c 2006-10-04 18:05:33.000000000 +0200 @@ -0,0 +1,44 @@ +/* PR c/29091 */ +/* { dg-do run } */ +/* { dg-options "-O2" } */ + +extern void abort (void); + +__attribute__ ((vector_size (sizeof (int) * 4))) int a = { 1, 2 }; +int d = 3; +__attribute__ ((vector_size (sizeof (int) * 4))) int b = { 4, 5, 6 }; +int e = 7; +__attribute__ ((vector_size (sizeof (int) * 4))) int c = { }; + +int +main (void) +{ + int *p = (int *) &a; + if (p[0] != 1) + abort (); + if (p[1] != 2) + abort (); + if (p[2] != 0) + abort (); + if (p[3] != 0) + abort (); + p = (int *) &b; + if (p[0] != 4) + abort (); + if (p[1] != 5) + abort (); + if (p[2] != 6) + abort (); + if (p[3] != 0) + abort (); + p = (int *) &c; + if (p[0] != 0) + abort (); + if (p[1] != 0) + abort (); + if (p[2] != 0) + abort (); + if (p[3] != 0) + abort (); + return 0; +}
Locations
Projects
Search
Status Monitor
Help
OpenBuildService.org
Documentation
API Documentation
Code of Conduct
Contact
Support
@OBShq
Terms
openSUSE Build Service is sponsored by
The Open Build Service is an
openSUSE project
.
Sign Up
Log In
Places
Places
All Projects
Status Monitor