Problem with LOC intrinsic for assumed size arrays
Mark Hesselink
mhesseli@caltech.edu
Tue Jan 24 23:06:00 GMT 2006
> Index: resolve.c
> ===================================================================
> --- resolve.c (revision 110183)
> +++ resolve.c (working copy)
> @@ -1275,7 +1275,8 @@ resolve_function (gfc_expr * expr)
> else if (expr->value.function.actual != NULL
> && expr->value.function.isym != NULL
> && expr->value.function.isym->generic_id !=
> GFC_ISYM_LBOUND
> - && expr->value.function.isym->generic_id !=
> GFC_ISYM_PRESENT)
> + && expr->value.function.isym->generic_id !=
> GFC_ISYM_PRESENT
> + && expr->value.function.isym->generic_id != GFC_ISYM_LOC)
> {
I will try this patch and hope to report back in a few hours. What is
the fastest way to rebuild GCC without doing a full bootstrap?
Thanks,
Mark
More information about the Fortran
mailing list