Message ID | 0412D7B7-8E47-4FC6-8D2E-5EDE8F03B2D3@gmail.com |
---|---|
State | New |
Headers | show |
Hi FX,
> Bootstrapped and regtested on x86_64-linux, OK to commit?
OK. Thanks for catching this!
Thomas
Index: intrinsics/pack_generic.c =================================================================== --- intrinsics/pack_generic.c (revision 164213) +++ intrinsics/pack_generic.c (working copy) @@ -374,6 +373,7 @@ pack (gfc_array_char *ret, const gfc_arr { pack_i8 ((gfc_array_i8 *) ret, (gfc_array_i8 *) array, (gfc_array_l1 *) mask, (gfc_array_i8 *) vector); + return; } #ifdef HAVE_GFC_INTEGER_16