| /dports/lang/gcc6-aux/gcc-6-20180516/libgfortran/generated/ |
| H A D | reshape_c4.c | 52 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_c4() local
221 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_c4()
222 if (rextent[n] < 0) in reshape_c4()
223 rextent[n] = 0; in reshape_c4()
225 if (rextent[n] != shape_data[dim]) in reshape_c4()
229 rsize *= rextent[n]; in reshape_c4()
232 if (rextent[n] <= 0) in reshape_c4()
300 while (rcount[n] == rextent[n]) in reshape_c4()
307 rptr -= rstride[n] * rextent[n]; in reshape_c4()
|
| H A D | reshape_i4.c | 52 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_4() local
221 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_4()
222 if (rextent[n] < 0) in reshape_4()
223 rextent[n] = 0; in reshape_4()
225 if (rextent[n] != shape_data[dim]) in reshape_4()
229 rsize *= rextent[n]; in reshape_4()
232 if (rextent[n] <= 0) in reshape_4()
300 while (rcount[n] == rextent[n]) in reshape_4()
307 rptr -= rstride[n] * rextent[n]; in reshape_4()
|
| H A D | reshape_i8.c | 52 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_8() local
221 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_8()
222 if (rextent[n] < 0) in reshape_8()
223 rextent[n] = 0; in reshape_8()
225 if (rextent[n] != shape_data[dim]) in reshape_8()
229 rsize *= rextent[n]; in reshape_8()
232 if (rextent[n] <= 0) in reshape_8()
300 while (rcount[n] == rextent[n]) in reshape_8()
307 rptr -= rstride[n] * rextent[n]; in reshape_8()
|
| H A D | reshape_r10.c | 52 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_r10() local
221 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_r10()
222 if (rextent[n] < 0) in reshape_r10()
223 rextent[n] = 0; in reshape_r10()
225 if (rextent[n] != shape_data[dim]) in reshape_r10()
229 rsize *= rextent[n]; in reshape_r10()
232 if (rextent[n] <= 0) in reshape_r10()
300 while (rcount[n] == rextent[n]) in reshape_r10()
307 rptr -= rstride[n] * rextent[n]; in reshape_r10()
|
| H A D | reshape_r16.c | 52 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_r16() local
221 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_r16()
222 if (rextent[n] < 0) in reshape_r16()
223 rextent[n] = 0; in reshape_r16()
225 if (rextent[n] != shape_data[dim]) in reshape_r16()
229 rsize *= rextent[n]; in reshape_r16()
232 if (rextent[n] <= 0) in reshape_r16()
300 while (rcount[n] == rextent[n]) in reshape_r16()
307 rptr -= rstride[n] * rextent[n]; in reshape_r16()
|
| H A D | reshape_r8.c | 52 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_r8() local
221 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_r8()
222 if (rextent[n] < 0) in reshape_r8()
223 rextent[n] = 0; in reshape_r8()
225 if (rextent[n] != shape_data[dim]) in reshape_r8()
229 rsize *= rextent[n]; in reshape_r8()
232 if (rextent[n] <= 0) in reshape_r8()
300 while (rcount[n] == rextent[n]) in reshape_r8()
307 rptr -= rstride[n] * rextent[n]; in reshape_r8()
|
| H A D | reshape_c10.c | 52 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_c10() local
221 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_c10()
222 if (rextent[n] < 0) in reshape_c10()
223 rextent[n] = 0; in reshape_c10()
225 if (rextent[n] != shape_data[dim]) in reshape_c10()
229 rsize *= rextent[n]; in reshape_c10()
232 if (rextent[n] <= 0) in reshape_c10()
300 while (rcount[n] == rextent[n]) in reshape_c10()
307 rptr -= rstride[n] * rextent[n]; in reshape_c10()
|
| H A D | reshape_c16.c | 52 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_c16() local
221 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_c16()
222 if (rextent[n] < 0) in reshape_c16()
223 rextent[n] = 0; in reshape_c16()
225 if (rextent[n] != shape_data[dim]) in reshape_c16()
229 rsize *= rextent[n]; in reshape_c16()
232 if (rextent[n] <= 0) in reshape_c16()
300 while (rcount[n] == rextent[n]) in reshape_c16()
307 rptr -= rstride[n] * rextent[n]; in reshape_c16()
|
| H A D | reshape_c8.c | 52 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_c8() local
221 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_c8()
222 if (rextent[n] < 0) in reshape_c8()
223 rextent[n] = 0; in reshape_c8()
225 if (rextent[n] != shape_data[dim]) in reshape_c8()
229 rsize *= rextent[n]; in reshape_c8()
232 if (rextent[n] <= 0) in reshape_c8()
300 while (rcount[n] == rextent[n]) in reshape_c8()
307 rptr -= rstride[n] * rextent[n]; in reshape_c8()
|
| H A D | reshape_i16.c | 52 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_16() local
221 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_16()
222 if (rextent[n] < 0) in reshape_16()
223 rextent[n] = 0; in reshape_16()
225 if (rextent[n] != shape_data[dim]) in reshape_16()
229 rsize *= rextent[n]; in reshape_16()
232 if (rextent[n] <= 0) in reshape_16()
300 while (rcount[n] == rextent[n]) in reshape_16()
307 rptr -= rstride[n] * rextent[n]; in reshape_16()
|
| H A D | reshape_r4.c | 52 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_r4() local
221 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_r4()
222 if (rextent[n] < 0) in reshape_r4()
223 rextent[n] = 0; in reshape_r4()
225 if (rextent[n] != shape_data[dim]) in reshape_r4()
229 rsize *= rextent[n]; in reshape_r4()
232 if (rextent[n] <= 0) in reshape_r4()
300 while (rcount[n] == rextent[n]) in reshape_r4()
307 rptr -= rstride[n] * rextent[n]; in reshape_r4()
|
| /dports/lang/gcc8/gcc-8.5.0/libgfortran/generated/ |
| H A D | reshape_c4.c | 50 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_c4() local
222 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_c4()
223 if (rextent[n] < 0) in reshape_c4()
224 rextent[n] = 0; in reshape_c4()
226 if (rextent[n] != shape_data[dim]) in reshape_c4()
230 rsize *= rextent[n]; in reshape_c4()
233 if (rextent[n] <= 0) in reshape_c4()
306 while (rcount[n] == rextent[n]) in reshape_c4()
313 rptr -= rstride[n] * rextent[n]; in reshape_c4()
|
| H A D | reshape_c8.c | 50 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_c8() local
222 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_c8()
223 if (rextent[n] < 0) in reshape_c8()
224 rextent[n] = 0; in reshape_c8()
226 if (rextent[n] != shape_data[dim]) in reshape_c8()
230 rsize *= rextent[n]; in reshape_c8()
233 if (rextent[n] <= 0) in reshape_c8()
306 while (rcount[n] == rextent[n]) in reshape_c8()
313 rptr -= rstride[n] * rextent[n]; in reshape_c8()
|
| H A D | reshape_i4.c | 50 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_4() local
222 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_4()
223 if (rextent[n] < 0) in reshape_4()
224 rextent[n] = 0; in reshape_4()
226 if (rextent[n] != shape_data[dim]) in reshape_4()
230 rsize *= rextent[n]; in reshape_4()
233 if (rextent[n] <= 0) in reshape_4()
306 while (rcount[n] == rextent[n]) in reshape_4()
313 rptr -= rstride[n] * rextent[n]; in reshape_4()
|
| H A D | reshape_i8.c | 50 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_8() local
222 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_8()
223 if (rextent[n] < 0) in reshape_8()
224 rextent[n] = 0; in reshape_8()
226 if (rextent[n] != shape_data[dim]) in reshape_8()
230 rsize *= rextent[n]; in reshape_8()
233 if (rextent[n] <= 0) in reshape_8()
306 while (rcount[n] == rextent[n]) in reshape_8()
313 rptr -= rstride[n] * rextent[n]; in reshape_8()
|
| H A D | reshape_r16.c | 50 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_r16() local
222 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_r16()
223 if (rextent[n] < 0) in reshape_r16()
224 rextent[n] = 0; in reshape_r16()
226 if (rextent[n] != shape_data[dim]) in reshape_r16()
230 rsize *= rextent[n]; in reshape_r16()
233 if (rextent[n] <= 0) in reshape_r16()
306 while (rcount[n] == rextent[n]) in reshape_r16()
313 rptr -= rstride[n] * rextent[n]; in reshape_r16()
|
| H A D | reshape_r4.c | 50 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_r4() local
222 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_r4()
223 if (rextent[n] < 0) in reshape_r4()
224 rextent[n] = 0; in reshape_r4()
226 if (rextent[n] != shape_data[dim]) in reshape_r4()
230 rsize *= rextent[n]; in reshape_r4()
233 if (rextent[n] <= 0) in reshape_r4()
306 while (rcount[n] == rextent[n]) in reshape_r4()
313 rptr -= rstride[n] * rextent[n]; in reshape_r4()
|
| H A D | reshape_c16.c | 50 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_c16() local
222 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_c16()
223 if (rextent[n] < 0) in reshape_c16()
224 rextent[n] = 0; in reshape_c16()
226 if (rextent[n] != shape_data[dim]) in reshape_c16()
230 rsize *= rextent[n]; in reshape_c16()
233 if (rextent[n] <= 0) in reshape_c16()
306 while (rcount[n] == rextent[n]) in reshape_c16()
313 rptr -= rstride[n] * rextent[n]; in reshape_c16()
|
| H A D | reshape_r10.c | 50 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_r10() local
222 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_r10()
223 if (rextent[n] < 0) in reshape_r10()
224 rextent[n] = 0; in reshape_r10()
226 if (rextent[n] != shape_data[dim]) in reshape_r10()
230 rsize *= rextent[n]; in reshape_r10()
233 if (rextent[n] <= 0) in reshape_r10()
306 while (rcount[n] == rextent[n]) in reshape_r10()
313 rptr -= rstride[n] * rextent[n]; in reshape_r10()
|
| H A D | reshape_c10.c | 50 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_c10() local
222 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_c10()
223 if (rextent[n] < 0) in reshape_c10()
224 rextent[n] = 0; in reshape_c10()
226 if (rextent[n] != shape_data[dim]) in reshape_c10()
230 rsize *= rextent[n]; in reshape_c10()
233 if (rextent[n] <= 0) in reshape_c10()
306 while (rcount[n] == rextent[n]) in reshape_c10()
313 rptr -= rstride[n] * rextent[n]; in reshape_c10()
|
| H A D | reshape_i16.c | 50 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_16() local
222 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_16()
223 if (rextent[n] < 0) in reshape_16()
224 rextent[n] = 0; in reshape_16()
226 if (rextent[n] != shape_data[dim]) in reshape_16()
230 rsize *= rextent[n]; in reshape_16()
233 if (rextent[n] <= 0) in reshape_16()
306 while (rcount[n] == rextent[n]) in reshape_16()
313 rptr -= rstride[n] * rextent[n]; in reshape_16()
|
| H A D | reshape_r8.c | 50 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_r8() local
222 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_r8()
223 if (rextent[n] < 0) in reshape_r8()
224 rextent[n] = 0; in reshape_r8()
226 if (rextent[n] != shape_data[dim]) in reshape_r8()
230 rsize *= rextent[n]; in reshape_r8()
233 if (rextent[n] <= 0) in reshape_r8()
306 while (rcount[n] == rextent[n]) in reshape_r8()
313 rptr -= rstride[n] * rextent[n]; in reshape_r8()
|
| /dports/lang/gcc48/gcc-4.8.5/libgfortran/generated/ |
| H A D | reshape_c4.c | 52 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_c4() local
221 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_c4()
222 if (rextent[n] < 0) in reshape_c4()
223 rextent[n] = 0; in reshape_c4()
225 if (rextent[n] != shape_data[dim]) in reshape_c4()
229 rsize *= rextent[n]; in reshape_c4()
232 if (rextent[n] <= 0) in reshape_c4()
300 while (rcount[n] == rextent[n]) in reshape_c4()
307 rptr -= rstride[n] * rextent[n]; in reshape_c4()
|
| H A D | reshape_c8.c | 52 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_c8() local
221 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_c8()
222 if (rextent[n] < 0) in reshape_c8()
223 rextent[n] = 0; in reshape_c8()
225 if (rextent[n] != shape_data[dim]) in reshape_c8()
229 rsize *= rextent[n]; in reshape_c8()
232 if (rextent[n] <= 0) in reshape_c8()
300 while (rcount[n] == rextent[n]) in reshape_c8()
307 rptr -= rstride[n] * rextent[n]; in reshape_c8()
|
| H A D | reshape_i16.c | 52 index_type rextent[GFC_MAX_DIMENSIONS]; in reshape_16() local
221 rextent[n] = GFC_DESCRIPTOR_EXTENT(ret,dim); in reshape_16()
222 if (rextent[n] < 0) in reshape_16()
223 rextent[n] = 0; in reshape_16()
225 if (rextent[n] != shape_data[dim]) in reshape_16()
229 rsize *= rextent[n]; in reshape_16()
232 if (rextent[n] <= 0) in reshape_16()
300 while (rcount[n] == rextent[n]) in reshape_16()
307 rptr -= rstride[n] * rextent[n]; in reshape_16()
|