/dports/lang/gcc8/gcc-8.5.0/libgfortran/generated/ |
H A D | cshift1_16_c16.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_16_c16() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_16_c16() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_16_c16() 111 if (hstride[0] == 0) in cshift1_16_c16() 112 hstride[0] = 1; in cshift1_16_c16() 117 hstride0 = hstride[0]; in cshift1_16_c16() 187 hptr += hstride[n]; in cshift1_16_c16()
|
H A D | cshift1_16_c4.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_16_c4() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_16_c4() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_16_c4() 111 if (hstride[0] == 0) in cshift1_16_c4() 112 hstride[0] = 1; in cshift1_16_c4() 117 hstride0 = hstride[0]; in cshift1_16_c4() 187 hptr += hstride[n]; in cshift1_16_c4()
|
H A D | cshift1_16_r10.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_16_r10() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_16_r10() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_16_r10() 111 if (hstride[0] == 0) in cshift1_16_r10() 112 hstride[0] = 1; in cshift1_16_r10() 117 hstride0 = hstride[0]; in cshift1_16_r10() 187 hptr += hstride[n]; in cshift1_16_r10()
|
H A D | cshift1_16_r4.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_16_r4() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_16_r4() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_16_r4() 111 if (hstride[0] == 0) in cshift1_16_r4() 112 hstride[0] = 1; in cshift1_16_r4() 117 hstride0 = hstride[0]; in cshift1_16_r4() 187 hptr += hstride[n]; in cshift1_16_r4()
|
H A D | cshift1_8_c10.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_8_c10() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_8_c10() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_8_c10() 111 if (hstride[0] == 0) in cshift1_8_c10() 112 hstride[0] = 1; in cshift1_8_c10() 117 hstride0 = hstride[0]; in cshift1_8_c10() 187 hptr += hstride[n]; in cshift1_8_c10()
|
H A D | cshift1_8_c16.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_8_c16() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_8_c16() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_8_c16() 111 if (hstride[0] == 0) in cshift1_8_c16() 112 hstride[0] = 1; in cshift1_8_c16() 117 hstride0 = hstride[0]; in cshift1_8_c16() 187 hptr += hstride[n]; in cshift1_8_c16()
|
H A D | cshift1_8_i4.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_8_i4() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_8_i4() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_8_i4() 111 if (hstride[0] == 0) in cshift1_8_i4() 112 hstride[0] = 1; in cshift1_8_i4() 117 hstride0 = hstride[0]; in cshift1_8_i4() 187 hptr += hstride[n]; in cshift1_8_i4()
|
H A D | cshift1_8_i8.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_8_i8() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_8_i8() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_8_i8() 111 if (hstride[0] == 0) in cshift1_8_i8() 112 hstride[0] = 1; in cshift1_8_i8() 117 hstride0 = hstride[0]; in cshift1_8_i8() 187 hptr += hstride[n]; in cshift1_8_i8()
|
H A D | cshift1_8_r10.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_8_r10() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_8_r10() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_8_r10() 111 if (hstride[0] == 0) in cshift1_8_r10() 112 hstride[0] = 1; in cshift1_8_r10() 117 hstride0 = hstride[0]; in cshift1_8_r10() 187 hptr += hstride[n]; in cshift1_8_r10()
|
H A D | cshift1_8_r16.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_8_r16() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_8_r16() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_8_r16() 111 if (hstride[0] == 0) in cshift1_8_r16() 112 hstride[0] = 1; in cshift1_8_r16() 117 hstride0 = hstride[0]; in cshift1_8_r16() 187 hptr += hstride[n]; in cshift1_8_r16()
|
H A D | cshift1_8_r4.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_8_r4() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_8_r4() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_8_r4() 111 if (hstride[0] == 0) in cshift1_8_r4() 112 hstride[0] = 1; in cshift1_8_r4() 117 hstride0 = hstride[0]; in cshift1_8_r4() 187 hptr += hstride[n]; in cshift1_8_r4()
|
H A D | cshift1_8_r8.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_8_r8() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_8_r8() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_8_r8() 111 if (hstride[0] == 0) in cshift1_8_r8() 112 hstride[0] = 1; in cshift1_8_r8() 117 hstride0 = hstride[0]; in cshift1_8_r8() 187 hptr += hstride[n]; in cshift1_8_r8()
|
H A D | cshift1_16_c10.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_16_c10() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_16_c10() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_16_c10() 111 if (hstride[0] == 0) in cshift1_16_c10() 112 hstride[0] = 1; in cshift1_16_c10() 117 hstride0 = hstride[0]; in cshift1_16_c10() 187 hptr += hstride[n]; in cshift1_16_c10()
|
H A D | cshift1_16_c8.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_16_c8() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_16_c8() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_16_c8() 111 if (hstride[0] == 0) in cshift1_16_c8() 112 hstride[0] = 1; in cshift1_16_c8() 117 hstride0 = hstride[0]; in cshift1_16_c8() 187 hptr += hstride[n]; in cshift1_16_c8()
|
H A D | cshift1_16_i1.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_16_i1() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_16_i1() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_16_i1() 111 if (hstride[0] == 0) in cshift1_16_i1() 112 hstride[0] = 1; in cshift1_16_i1() 117 hstride0 = hstride[0]; in cshift1_16_i1() 187 hptr += hstride[n]; in cshift1_16_i1()
|
H A D | cshift1_16_r16.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_16_r16() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_16_r16() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_16_r16() 111 if (hstride[0] == 0) in cshift1_16_r16() 112 hstride[0] = 1; in cshift1_16_r16() 117 hstride0 = hstride[0]; in cshift1_16_r16() 187 hptr += hstride[n]; in cshift1_16_r16()
|
H A D | cshift1_4_i1.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_4_i1() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_4_i1() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_4_i1() 111 if (hstride[0] == 0) in cshift1_4_i1() 112 hstride[0] = 1; in cshift1_4_i1() 117 hstride0 = hstride[0]; in cshift1_4_i1() 187 hptr += hstride[n]; in cshift1_4_i1()
|
H A D | cshift1_4_i16.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_4_i16() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_4_i16() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_4_i16() 111 if (hstride[0] == 0) in cshift1_4_i16() 112 hstride[0] = 1; in cshift1_4_i16() 117 hstride0 = hstride[0]; in cshift1_4_i16() 187 hptr += hstride[n]; in cshift1_4_i16()
|
H A D | cshift1_4_i8.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_4_i8() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_4_i8() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_4_i8() 111 if (hstride[0] == 0) in cshift1_4_i8() 112 hstride[0] = 1; in cshift1_4_i8() 117 hstride0 = hstride[0]; in cshift1_4_i8() 187 hptr += hstride[n]; in cshift1_4_i8()
|
H A D | cshift1_4_r16.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_4_r16() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_4_r16() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_4_r16() 111 if (hstride[0] == 0) in cshift1_4_r16() 112 hstride[0] = 1; in cshift1_4_r16() 117 hstride0 = hstride[0]; in cshift1_4_r16() 187 hptr += hstride[n]; in cshift1_4_r16()
|
H A D | cshift1_8_c8.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_8_c8() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_8_c8() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_8_c8() 111 if (hstride[0] == 0) in cshift1_8_c8() 112 hstride[0] = 1; in cshift1_8_c8() 117 hstride0 = hstride[0]; in cshift1_8_c8() 187 hptr += hstride[n]; in cshift1_8_c8()
|
H A D | cshift1_8_i2.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_8_i2() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_8_i2() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_8_i2() 111 if (hstride[0] == 0) in cshift1_8_i2() 112 hstride[0] = 1; in cshift1_8_i2() 117 hstride0 = hstride[0]; in cshift1_8_i2() 187 hptr += hstride[n]; in cshift1_8_i2()
|
H A D | cshift1_16_r8.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_16_r8() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_16_r8() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_16_r8() 111 if (hstride[0] == 0) in cshift1_16_r8() 112 hstride[0] = 1; in cshift1_16_r8() 117 hstride0 = hstride[0]; in cshift1_16_r8() 187 hptr += hstride[n]; in cshift1_16_r8()
|
H A D | cshift1_4_c4.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_4_c4() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_4_c4() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_4_c4() 111 if (hstride[0] == 0) in cshift1_4_c4() 112 hstride[0] = 1; in cshift1_4_c4() 117 hstride0 = hstride[0]; in cshift1_4_c4() 187 hptr += hstride[n]; in cshift1_4_c4()
|
H A D | cshift1_4_c8.c | 50 index_type hstride[GFC_MAX_DIMENSIONS]; in cshift1_4_c8() local 100 hstride[n] = GFC_DESCRIPTOR_STRIDE(h,n); in cshift1_4_c8() 103 hs_ex[n] = hstride[n] * extent[n]; in cshift1_4_c8() 111 if (hstride[0] == 0) in cshift1_4_c8() 112 hstride[0] = 1; in cshift1_4_c8() 117 hstride0 = hstride[0]; in cshift1_4_c8() 187 hptr += hstride[n]; in cshift1_4_c8()
|