On Sat, 30 Oct 2021 20:11:13 +0200
Harald Anlauf via Fortran <[email protected]> wrote:
> Committed as r12-4807.
>
> Thanks for the patch!
>
> Harald
>
> Am 30.10.21 um 01:15 schrieb Manfred Schwarb via Gcc-patches:
> > Am 29.10.21 um 21:51 schrieb Harald Anlauf via Fortran:
> >> Hi Manfred,
> >>
> >> Am 29.10.21 um 16:12 schrieb Manfred Schwarb via Fortran:
> >>> Hi,
> >>>
> >>> on 2019-07-23, support for SHORT and LONG intrinsics were removed be
> >>> Steve Kargl by
> >>> adding an error message in check.c. However, the error message
> >>> Error: 'long' intrinsic subprogram at (1) has been deprecated
> >>> is misleading, as support has been disabled by this patch.
> >>>
> >>> Adjust the error message. This error message does not appear in the
> >>> testsuite AFAIK.
I just saw a related spot where we may want to give a hint on the
modern replacement iff folks think that's a good thing to have.
match.c::gfc_match_intrinsic_op
---8<---
case 'x':
if (gfc_next_ascii_char () == 'o'
&& gfc_next_ascii_char () == 'r'
&& gfc_next_ascii_char () == '.')
{
if (!gfc_notify_std (GFC_STD_LEGACY, ".XOR. operator at %C"))
return MATCH_ERROR;
/* Matched ".xor." - equivalent to ".neqv.". */
*result = INTRINSIC_NEQV;
return MATCH_YES;
}
break;
---8<---
