Lines Matching defs:pad
45 gfc_array_c17 * const restrict pad,
66 /* p.* indicates the pad array. */
125 if (pad)
127 pdim = GFC_DESCRIPTOR_RANK (pad);
133 pstride[n] = GFC_DESCRIPTOR_STRIDE(pad,n);
134 pextent[n] = GFC_DESCRIPTOR_EXTENT(pad,n);
146 pptr = pad->base_addr;
181 if (rs > source_extent && (!pad || pempty))
268 ssize, pad ? (char *)pad->base_addr : NULL, psize);
281 /* Pretend we are using the pad array the first time around, too. */
296 /* Select between the source and pad arrays. */
340 if (sptr && pad)
342 /* Switch to the pad array. */
353 /* We now start again from the beginning of the pad array. */