Home
last modified time | relevance | path

Searched refs:comp_cdesc (Results 1 – 10 of 10) sorted by relevance

/dports/lang/gcc12-devel/gcc-12-20211205/gcc/testsuite/gfortran.dg/
H A DISO_Fortran_binding_1.c188 CFI_cdesc_t * comp_cdesc = (CFI_cdesc_t *)&component; in select_part_c() local
194 (void)CFI_establish(comp_cdesc, NULL, CFI_attribute_other, in select_part_c()
197 (void)CFI_select_part(comp_cdesc, source, offsetof(t,y), 0); in select_part_c()
198 assert (comp_cdesc->dim[0].lower_bound == 0); in select_part_c()
199 assert (comp_cdesc->dim[1].lower_bound == 0); in select_part_c()
202 size = comp_cdesc->dim[1].extent; in select_part_c()
204 ans += cimag (*(double _Complex*)CFI_address ((CFI_cdesc_t*)comp_cdesc, in select_part_c()
/dports/lang/gcc10/gcc-10.3.0/gcc/testsuite/gfortran.dg/
H A DISO_Fortran_binding_1.c186 CFI_cdesc_t * comp_cdesc = (CFI_cdesc_t *)&component; in select_part_c() local
192 (void)CFI_establish(comp_cdesc, NULL, CFI_attribute_other, in select_part_c()
195 (void)CFI_select_part(comp_cdesc, source, offsetof(t,y), 0); in select_part_c()
196 assert (comp_cdesc->dim[0].lower_bound == 0); in select_part_c()
197 assert (comp_cdesc->dim[1].lower_bound == 0); in select_part_c()
200 size = comp_cdesc->dim[1].extent; in select_part_c()
202 ans += cimag (*(double _Complex*)CFI_address ((CFI_cdesc_t*)comp_cdesc, in select_part_c()
/dports/lang/gcc9-devel/gcc-9-20211007/gcc/testsuite/gfortran.dg/
H A DISO_Fortran_binding_1.c186 CFI_cdesc_t * comp_cdesc = (CFI_cdesc_t *)&component; in select_part_c() local
192 (void)CFI_establish(comp_cdesc, NULL, CFI_attribute_other, in select_part_c()
195 (void)CFI_select_part(comp_cdesc, source, offsetof(t,y), 0); in select_part_c()
196 assert (comp_cdesc->dim[0].lower_bound == 0); in select_part_c()
197 assert (comp_cdesc->dim[1].lower_bound == 0); in select_part_c()
200 size = comp_cdesc->dim[1].extent; in select_part_c()
202 ans += cimag (*(double _Complex*)CFI_address ((CFI_cdesc_t*)comp_cdesc, in select_part_c()
/dports/lang/gcc11-devel/gcc-11-20211009/gcc/testsuite/gfortran.dg/
H A DISO_Fortran_binding_1.c186 CFI_cdesc_t * comp_cdesc = (CFI_cdesc_t *)&component; in select_part_c() local
192 (void)CFI_establish(comp_cdesc, NULL, CFI_attribute_other, in select_part_c()
195 (void)CFI_select_part(comp_cdesc, source, offsetof(t,y), 0); in select_part_c()
196 assert (comp_cdesc->dim[0].lower_bound == 0); in select_part_c()
197 assert (comp_cdesc->dim[1].lower_bound == 0); in select_part_c()
200 size = comp_cdesc->dim[1].extent; in select_part_c()
202 ans += cimag (*(double _Complex*)CFI_address ((CFI_cdesc_t*)comp_cdesc, in select_part_c()
/dports/misc/cxx_atomics_pic/gcc-11.2.0/gcc/testsuite/gfortran.dg/
H A DISO_Fortran_binding_1.c186 CFI_cdesc_t * comp_cdesc = (CFI_cdesc_t *)&component; in select_part_c() local
192 (void)CFI_establish(comp_cdesc, NULL, CFI_attribute_other, in select_part_c()
195 (void)CFI_select_part(comp_cdesc, source, offsetof(t,y), 0); in select_part_c()
196 assert (comp_cdesc->dim[0].lower_bound == 0); in select_part_c()
197 assert (comp_cdesc->dim[1].lower_bound == 0); in select_part_c()
200 size = comp_cdesc->dim[1].extent; in select_part_c()
202 ans += cimag (*(double _Complex*)CFI_address ((CFI_cdesc_t*)comp_cdesc, in select_part_c()
/dports/devel/avr-gcc/gcc-10.2.0/gcc/testsuite/gfortran.dg/
H A DISO_Fortran_binding_1.c186 CFI_cdesc_t * comp_cdesc = (CFI_cdesc_t *)&component; in select_part_c() local
192 (void)CFI_establish(comp_cdesc, NULL, CFI_attribute_other, in select_part_c()
195 (void)CFI_select_part(comp_cdesc, source, offsetof(t,y), 0); in select_part_c()
196 assert (comp_cdesc->dim[0].lower_bound == 0); in select_part_c()
197 assert (comp_cdesc->dim[1].lower_bound == 0); in select_part_c()
200 size = comp_cdesc->dim[1].extent; in select_part_c()
202 ans += cimag (*(double _Complex*)CFI_address ((CFI_cdesc_t*)comp_cdesc, in select_part_c()
/dports/lang/gcc11/gcc-11.2.0/gcc/testsuite/gfortran.dg/
H A DISO_Fortran_binding_1.c186 CFI_cdesc_t * comp_cdesc = (CFI_cdesc_t *)&component; in select_part_c() local
192 (void)CFI_establish(comp_cdesc, NULL, CFI_attribute_other, in select_part_c()
195 (void)CFI_select_part(comp_cdesc, source, offsetof(t,y), 0); in select_part_c()
196 assert (comp_cdesc->dim[0].lower_bound == 0); in select_part_c()
197 assert (comp_cdesc->dim[1].lower_bound == 0); in select_part_c()
200 size = comp_cdesc->dim[1].extent; in select_part_c()
202 ans += cimag (*(double _Complex*)CFI_address ((CFI_cdesc_t*)comp_cdesc, in select_part_c()
/dports/lang/gcc10-devel/gcc-10-20211008/gcc/testsuite/gfortran.dg/
H A DISO_Fortran_binding_1.c186 CFI_cdesc_t * comp_cdesc = (CFI_cdesc_t *)&component; in select_part_c() local
192 (void)CFI_establish(comp_cdesc, NULL, CFI_attribute_other, in select_part_c()
195 (void)CFI_select_part(comp_cdesc, source, offsetof(t,y), 0); in select_part_c()
196 assert (comp_cdesc->dim[0].lower_bound == 0); in select_part_c()
197 assert (comp_cdesc->dim[1].lower_bound == 0); in select_part_c()
200 size = comp_cdesc->dim[1].extent; in select_part_c()
202 ans += cimag (*(double _Complex*)CFI_address ((CFI_cdesc_t*)comp_cdesc, in select_part_c()
/dports/lang/gcc9/gcc-9.4.0/gcc/testsuite/gfortran.dg/
H A DISO_Fortran_binding_1.c186 CFI_cdesc_t * comp_cdesc = (CFI_cdesc_t *)&component; in select_part_c() local
192 (void)CFI_establish(comp_cdesc, NULL, CFI_attribute_other, in select_part_c()
195 (void)CFI_select_part(comp_cdesc, source, offsetof(t,y), 0); in select_part_c()
196 assert (comp_cdesc->dim[0].lower_bound == 0); in select_part_c()
197 assert (comp_cdesc->dim[1].lower_bound == 0); in select_part_c()
200 size = comp_cdesc->dim[1].extent; in select_part_c()
202 ans += cimag (*(double _Complex*)CFI_address ((CFI_cdesc_t*)comp_cdesc, in select_part_c()
/dports/lang/gcc9-aux/gcc-9.1.0/gcc/testsuite/gfortran.dg/
H A DISO_Fortran_binding_1.c159 CFI_cdesc_t * comp_cdesc = (CFI_cdesc_t *)&component; in select_part_c() local
165 (void)CFI_establish(comp_cdesc, NULL, CFI_attribute_other, in select_part_c()
168 (void)CFI_select_part(comp_cdesc, source, offsetof(t,y), 0); in select_part_c()
171 size = comp_cdesc->dim[1].extent; in select_part_c()
173 ans += cimag (*(double _Complex*)CFI_address ((CFI_cdesc_t*)comp_cdesc, in select_part_c()