Lines Matching defs:pack
1 /* Generic implementation of the PACK intrinsic
29 /* PACK is specified as follows:
31 13.14.80 PACK (ARRAY, MASK, [VECTOR])
33 Description: Pack an array into an array of rank one under the
61 | 9 0 0 | may be "gathered" by the function PACK. The result of
63 PACK (M, MASK = M.NE.0) is [9,7] and the result of PACK (M, M.NE.0,
66 There are two variants of the PACK intrinsic: one, where MASK is
178 runtime_error ("Incorrect extent in return value of PACK intrinsic;"
253 extern void pack (gfc_array_char *, const gfc_array_char *,
255 export_proto(pack);
258 pack (gfc_array_char *ret, const gfc_array_char *array,
Indexes created Mon Apr 20 00:23:12 UTC 2026