OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

re PR fortran/17676 (Problem with user operator)

Browse Source 
PR fortran/17676
* resolve.c (resolve_operator): Use correct operator name in message.

From-SVN: r88726
This commit is contained in:
Tobias Schlüter 2004-10-08 02:16:28 +02:00 committed by Tobias Schlüter
parent 9c049d3808
commit edbfca8fd7
2 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/fortran/ChangeLog
View File

@ -1,3 +1,8 @@
2004-10-07 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
PR fortran/17676
* resolve.c (resolve_operator): Use correct operator name in message.
2004-10-07 Tobias Schlueter <tobias.schlueter@physik.uni-muenchen.de>
* primary.c (match_boz_constant): Allow kind parameter suffixes.

4
gcc/fortran/resolve.c
View File

@ -1413,10 +1413,10 @@ resolve_operator (gfc_expr * e)
case INTRINSIC_USER:
if (op2 == NULL)
sprintf (msg, "Operand of user operator '%s' at %%L is %s",
e->uop->ns->proc_name->name, gfc_typename (&op1->ts));
e->uop->name, gfc_typename (&op1->ts));
else
sprintf (msg, "Operands of user operator '%s' at %%L are %s/%s",
e->uop->ns->proc_name->name, gfc_typename (&op1->ts),
e->uop->name, gfc_typename (&op1->ts),
gfc_typename (&op2->ts));
goto bad_op;