TeamHeptaMirrors/gcc
1
0
Fork 1
mirror of https://github.com/gcc-mirror/gcc.git synced 2026-05-06 23:25:24 +02:00
Code Issues Packages Projects Releases Wiki Activity

re PR middle-end/64421 (Incorrect vector function name generated for log)

Browse Source 
PR middle-end/64421
	* omp-low.c (simd_clone_mangle): If DECL_ASSEMBLER_NAME starts
	with asterisk, skip the first character.

	* gcc.dg/vect/pr64421.c: New test.

From-SVN: r220137
This commit is contained in:
Jakub Jelinek
2015-01-26 22:28:57 +01:00
committed by Jakub Jelinek
parent b25affbdc1
commit 4cd76837a8
4 changed files with 52 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
gcc/ChangeLog
View File

@@ -1,3 +1,9 @@
2015-01-26 Jakub Jelinek <jakub@redhat.com>
PR middle-end/64421
* omp-low.c (simd_clone_mangle): If DECL_ASSEMBLER_NAME starts
with asterisk, skip the first character.
2015-01-26 H.J. Lu <hongjiu.lu@intel.com>
PR target/64806

8
gcc/omp-low.c
View File

@@ -12663,9 +12663,11 @@ simd_clone_mangle (struct cgraph_node *node,
}
pp_underscore (&pp);
pp_string (&pp,
IDENTIFIER_POINTER (DECL_ASSEMBLER_NAME (node->decl)));
const char *str = pp_formatted_text (&pp);
const char *str = IDENTIFIER_POINTER (DECL_ASSEMBLER_NAME (node->decl));
if (*str == '*')
++str;
pp_string (&pp, str);
str = pp_formatted_text (&pp);
/* If there already is a SIMD clone with the same mangled name, don't
add another one. This can happen e.g. for

5
gcc/testsuite/ChangeLog
View File

@@ -1,3 +1,8 @@
2015-01-26 Jakub Jelinek <jakub@redhat.com>
PR middle-end/64421
* gcc.dg/vect/pr64421.c: New test.
2015-01-26 Tobias Burnus <burnus@net-b.de>
PR fortran/64771

36
gcc/testsuite/gcc.dg/vect/pr64421.c Normal file
View File

@@ -0,0 +1,36 @@
/* PR middle-end/64421 */
/* { dg-require-effective-target vect_simd_clones } */
/* { dg-additional-options "-fopenmp-simd" } */
/* { dg-additional-options "-mavx" { target avx_runtime } } */
#include "tree-vect.h"
#pragma omp declare simd linear (y) notinbranch
int foo (int x, int y) __asm ("bar");
#pragma omp declare simd linear (y) notinbranch
int
foo (int x, int y)
{
return x + y;
}
int a[1024] = { 1, 2 };
int
main ()
{
int i;
check_vect ();
#pragma omp simd
for (i = 0; i < 1024; i++)
a[i] = foo (a[i], i);
if (a[0] != 1 || a[1] != 3)
abort ();
for (i = 2; i < 1024; i++)
if (a[i] != i)
abort ();
return 0;
}
/* { dg-final { cleanup-tree-dump "vect" } } */