Home | History | Annotate | Download | only in intrinsics

Lines Matching refs:from

33 move_alloc (gfc_array_char * from, gfc_array_char * to)
39   for (i = 0; i < GFC_DESCRIPTOR_RANK (from); i++)
41       GFC_DIMENSION_SET(to->dim[i],GFC_DESCRIPTOR_LBOUND(from,i),
42 			GFC_DESCRIPTOR_UBOUND(from,i),
43 			GFC_DESCRIPTOR_STRIDE(from,i));
44       GFC_DIMENSION_SET(from->dim[i],GFC_DESCRIPTOR_LBOUND(from,i),
45 			GFC_DESCRIPTOR_LBOUND(from,i), 0);
48   to->offset = from->offset;
49   GFC_DTYPE_COPY(to,from);
50   to->base_addr = from->base_addr;
51   from->base_addr = NULL;
59 move_alloc_c (gfc_array_char * from,
64   move_alloc (from, to);