[hsa] Set program allocation for static local variables
2018-02-08 Martin Jambor <mjambor@suse.cz> * hsa-gen.c (get_symbol_for_decl): Set program allocation for static local variables. libgomp/ * testsuite/libgomp.hsa.c/staticvar.c: New test. From-SVN: r257484
This commit is contained in:
parent
414fef4e66
commit
c7c30edd4a
@ -1,3 +1,8 @@
|
|||||||
|
2018-02-08 Martin Jambor <mjambor@suse.cz>
|
||||||
|
|
||||||
|
* hsa-gen.c (get_symbol_for_decl): Set program allocation for
|
||||||
|
static local variables.
|
||||||
|
|
||||||
2018-02-08 Richard Biener <rguenther@suse.de>
|
2018-02-08 Richard Biener <rguenther@suse.de>
|
||||||
|
|
||||||
PR tree-optimization/84278
|
PR tree-optimization/84278
|
||||||
|
@ -932,9 +932,13 @@ get_symbol_for_decl (tree decl)
|
|||||||
else if (lookup_attribute ("hsa_group_segment",
|
else if (lookup_attribute ("hsa_group_segment",
|
||||||
DECL_ATTRIBUTES (decl)))
|
DECL_ATTRIBUTES (decl)))
|
||||||
segment = BRIG_SEGMENT_GROUP;
|
segment = BRIG_SEGMENT_GROUP;
|
||||||
else if (TREE_STATIC (decl)
|
else if (TREE_STATIC (decl))
|
||||||
|| lookup_attribute ("hsa_global_segment",
|
{
|
||||||
DECL_ATTRIBUTES (decl)))
|
segment = BRIG_SEGMENT_GLOBAL;
|
||||||
|
allocation = BRIG_ALLOCATION_PROGRAM;
|
||||||
|
}
|
||||||
|
else if (lookup_attribute ("hsa_global_segment",
|
||||||
|
DECL_ATTRIBUTES (decl)))
|
||||||
segment = BRIG_SEGMENT_GLOBAL;
|
segment = BRIG_SEGMENT_GLOBAL;
|
||||||
else
|
else
|
||||||
segment = BRIG_SEGMENT_PRIVATE;
|
segment = BRIG_SEGMENT_PRIVATE;
|
||||||
|
@ -1,3 +1,7 @@
|
|||||||
|
2018-02-08 Martin Jambor <mjambor@suse.cz>
|
||||||
|
|
||||||
|
* testsuite/libgomp.hsa.c/staticvar.c: New test.
|
||||||
|
|
||||||
2018-02-07 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
|
2018-02-07 Rainer Orth <ro@CeBiTec.Uni-Bielefeld.DE>
|
||||||
|
|
||||||
* testsuite/libgomp.oacc-c-c++-common/pr84217.c (abort)
|
* testsuite/libgomp.oacc-c-c++-common/pr84217.c (abort)
|
||||||
|
23
libgomp/testsuite/libgomp.hsa.c/staticvar.c
Normal file
23
libgomp/testsuite/libgomp.hsa.c/staticvar.c
Normal file
@ -0,0 +1,23 @@
|
|||||||
|
extern void abort (void);
|
||||||
|
|
||||||
|
#pragma omp declare target
|
||||||
|
int
|
||||||
|
foo (void)
|
||||||
|
{
|
||||||
|
static int s;
|
||||||
|
return ++s;
|
||||||
|
}
|
||||||
|
#pragma omp end declare target
|
||||||
|
|
||||||
|
int
|
||||||
|
main ()
|
||||||
|
{
|
||||||
|
int r;
|
||||||
|
#pragma omp target map(from:r)
|
||||||
|
{
|
||||||
|
r = foo ();
|
||||||
|
}
|
||||||
|
if (r != 1)
|
||||||
|
abort ();
|
||||||
|
return 0;
|
||||||
|
}
|
Loading…
Reference in New Issue
Block a user