| /dports/lang/gcc10/gcc-10.3.0/libgfortran/generated/ |
| H A D | findloc0_i2.c | 47 index_type rank; in findloc0_i2() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_i2()
52 if (rank <= 0) in findloc0_i2()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_i2()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_i2()
129 base = array->base_addr; in findloc0_i2()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_i2()
191 if (rank <= 0) in mfindloc0_i2()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_i2()
289 base = array->base_addr; in mfindloc0_i2()
[all …]
|
| H A D | findloc0_r10.c | 47 index_type rank; in findloc0_r10() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_r10()
52 if (rank <= 0) in findloc0_r10()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_r10()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_r10()
129 base = array->base_addr; in findloc0_r10()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_r10()
191 if (rank <= 0) in mfindloc0_r10()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_r10()
289 base = array->base_addr; in mfindloc0_r10()
[all …]
|
| H A D | findloc0_r16.c | 47 index_type rank; in findloc0_r16() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_r16()
52 if (rank <= 0) in findloc0_r16()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_r16()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_r16()
129 base = array->base_addr; in findloc0_r16()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_r16()
191 if (rank <= 0) in mfindloc0_r16()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_r16()
289 base = array->base_addr; in mfindloc0_r16()
[all …]
|
| H A D | findloc0_i16.c | 47 index_type rank; in findloc0_i16() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_i16()
52 if (rank <= 0) in findloc0_i16()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_i16()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_i16()
129 base = array->base_addr; in findloc0_i16()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_i16()
191 if (rank <= 0) in mfindloc0_i16()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_i16()
289 base = array->base_addr; in mfindloc0_i16()
[all …]
|
| H A D | findloc0_r4.c | 47 index_type rank; in findloc0_r4() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_r4()
52 if (rank <= 0) in findloc0_r4()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_r4()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_r4()
129 base = array->base_addr; in findloc0_r4()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_r4()
191 if (rank <= 0) in mfindloc0_r4()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_r4()
289 base = array->base_addr; in mfindloc0_r4()
[all …]
|
| H A D | findloc0_r8.c | 47 index_type rank; in findloc0_r8() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_r8()
52 if (rank <= 0) in findloc0_r8()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_r8()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_r8()
129 base = array->base_addr; in findloc0_r8()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_r8()
191 if (rank <= 0) in mfindloc0_r8()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_r8()
289 base = array->base_addr; in mfindloc0_r8()
[all …]
|
| H A D | findloc0_c4.c | 47 index_type rank; in findloc0_c16() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_c16()
52 if (rank <= 0) in findloc0_c16()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_c16()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_c16()
129 base = array->base_addr; in findloc0_c16()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_c16()
191 if (rank <= 0) in mfindloc0_c16()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_c16()
289 base = array->base_addr; in mfindloc0_c16()
[all …]
|
| /dports/lang/gcc12-devel/gcc-12-20211205/libgfortran/generated/ |
| H A D | findloc0_c10.c | 47 index_type rank; in findloc0_c10() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_c10()
52 if (rank <= 0) in findloc0_c10()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_c10()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_c10()
129 base = array->base_addr; in findloc0_c10()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_c10()
191 if (rank <= 0) in mfindloc0_c10()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_c10()
289 base = array->base_addr; in mfindloc0_c10()
[all …]
|
| H A D | findloc0_c8.c | 47 index_type rank; in findloc0_c8() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_c8()
52 if (rank <= 0) in findloc0_c8()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_c8()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_c8()
129 base = array->base_addr; in findloc0_c8()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_c8()
191 if (rank <= 0) in mfindloc0_c8()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_c8()
289 base = array->base_addr; in mfindloc0_c8()
[all …]
|
| H A D | findloc0_i1.c | 47 index_type rank; in findloc0_i1() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_i1()
52 if (rank <= 0) in findloc0_i1()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_i1()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_i1()
129 base = array->base_addr; in findloc0_i1()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_i1()
191 if (rank <= 0) in mfindloc0_i1()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_i1()
289 base = array->base_addr; in mfindloc0_i1()
[all …]
|
| H A D | findloc0_r8.c | 47 index_type rank; in findloc0_r8() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_r8()
52 if (rank <= 0) in findloc0_r8()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_r8()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_r8()
129 base = array->base_addr; in findloc0_r8()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_r8()
191 if (rank <= 0) in mfindloc0_r8()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_r8()
289 base = array->base_addr; in mfindloc0_r8()
[all …]
|
| H A D | findloc0_c4.c | 47 index_type rank; in findloc0_c4() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_c4()
52 if (rank <= 0) in findloc0_c4()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_c4()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_c4()
129 base = array->base_addr; in findloc0_c4()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_c4()
191 if (rank <= 0) in mfindloc0_c4()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_c4()
289 base = array->base_addr; in mfindloc0_c4()
[all …]
|
| H A D | findloc0_r10.c | 47 index_type rank; in findloc0_r10() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_r10()
52 if (rank <= 0) in findloc0_r10()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_r10()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_r10()
129 base = array->base_addr; in findloc0_r10()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_r10()
191 if (rank <= 0) in mfindloc0_r10()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_r10()
289 base = array->base_addr; in mfindloc0_r10()
[all …]
|
| H A D | findloc0_i16.c | 47 index_type rank; in findloc0_i16() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_i16()
52 if (rank <= 0) in findloc0_i16()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_i16()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_i16()
129 base = array->base_addr; in findloc0_i16()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_i16()
191 if (rank <= 0) in mfindloc0_i16()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_i16()
289 base = array->base_addr; in mfindloc0_i16()
[all …]
|
| H A D | findloc0_i2.c | 47 index_type rank; in findloc0_i2() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_i2()
52 if (rank <= 0) in findloc0_i2()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_i2()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_i2()
129 base = array->base_addr; in findloc0_i2()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_i2()
191 if (rank <= 0) in mfindloc0_i2()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_i2()
289 base = array->base_addr; in mfindloc0_i2()
[all …]
|
| H A D | findloc0_i4.c | 47 index_type rank; in findloc0_i4() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_i4()
52 if (rank <= 0) in findloc0_i4()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_i4()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_i4()
129 base = array->base_addr; in findloc0_i4()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_i4()
191 if (rank <= 0) in mfindloc0_i4()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_i4()
289 base = array->base_addr; in mfindloc0_i4()
[all …]
|
| H A D | findloc0_i8.c | 47 index_type rank; in findloc0_i8() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_i8()
52 if (rank <= 0) in findloc0_i8()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_i8()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_i8()
129 base = array->base_addr; in findloc0_i8()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_i8()
191 if (rank <= 0) in mfindloc0_i8()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_i8()
289 base = array->base_addr; in mfindloc0_i8()
[all …]
|
| H A D | findloc0_r16.c | 47 index_type rank; in findloc0_r16() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_r16()
52 if (rank <= 0) in findloc0_r16()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_r16()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_r16()
129 base = array->base_addr; in findloc0_r16()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_r16()
191 if (rank <= 0) in mfindloc0_r16()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_r16()
289 base = array->base_addr; in mfindloc0_r16()
[all …]
|
| H A D | findloc0_r4.c | 47 index_type rank; in findloc0_r4() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_r4()
52 if (rank <= 0) in findloc0_r4()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_r4()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_r4()
129 base = array->base_addr; in findloc0_r4()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_r4()
191 if (rank <= 0) in mfindloc0_r4()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_r4()
289 base = array->base_addr; in mfindloc0_r4()
[all …]
|
| H A D | findloc0_c16.c | 47 index_type rank; in findloc0_c16() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_c16()
52 if (rank <= 0) in findloc0_c16()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_c16()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_c16()
129 base = array->base_addr; in findloc0_c16()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_c16()
191 if (rank <= 0) in mfindloc0_c16()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_c16()
289 base = array->base_addr; in mfindloc0_c16()
[all …]
|
| /dports/lang/gcc11-devel/gcc-11-20211009/libgfortran/generated/ |
| H A D | findloc0_c8.c | 47 index_type rank; in findloc0_c8() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_c8()
52 if (rank <= 0) in findloc0_c8()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_c8()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_c8()
129 base = array->base_addr; in findloc0_c8()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_c8()
191 if (rank <= 0) in mfindloc0_c8()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_c8()
289 base = array->base_addr; in mfindloc0_c8()
[all …]
|
| H A D | findloc0_c16.c | 47 index_type rank; in findloc0_c16() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_c16()
52 if (rank <= 0) in findloc0_c16()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_c16()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_c16()
129 base = array->base_addr; in findloc0_c16()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_c16()
191 if (rank <= 0) in mfindloc0_c16()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_c16()
289 base = array->base_addr; in mfindloc0_c16()
[all …]
|
| H A D | findloc0_c10.c | 47 index_type rank; in findloc0_c10() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_c10()
52 if (rank <= 0) in findloc0_c10()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_c10()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_c10()
129 base = array->base_addr; in findloc0_c10()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_c10()
191 if (rank <= 0) in mfindloc0_c10()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_c10()
289 base = array->base_addr; in mfindloc0_c10()
[all …]
|
| H A D | findloc0_c4.c | 47 index_type rank; in findloc0_c4() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_c4()
52 if (rank <= 0) in findloc0_c4()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_c4()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_c4()
129 base = array->base_addr; in findloc0_c4()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_c4()
191 if (rank <= 0) in mfindloc0_c4()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_c4()
289 base = array->base_addr; in mfindloc0_c4()
[all …]
|
| H A D | findloc0_i1.c | 47 index_type rank; in findloc0_i1() local
51 rank = GFC_DESCRIPTOR_RANK (array); in findloc0_i1()
52 if (rank <= 0) in findloc0_i1()
80 extent[n] = GFC_DESCRIPTOR_EXTENT(array,n); in findloc0_i1()
91 base = array->base_addr + (sz - 1) * 1; in findloc0_i1()
129 base = array->base_addr; in findloc0_i1()
190 rank = GFC_DESCRIPTOR_RANK (array); in mfindloc0_i1()
191 if (rank <= 0) in mfindloc0_i1()
248 base = array->base_addr + (sz - 1) * 1; in mfindloc0_i1()
289 base = array->base_addr; in mfindloc0_i1()
[all …]
|