PR 11840

[Tobias Schlüter]

Steven Bosscher wrote:
> + 	gfc_error ("Unknown symbol '%s' at %L in NAMELIST '%s'",
> + 		   sym->name, &sym->declared_at, namelist_sym->name);
> +     }
> + }

What does this print for
	IMPLICIT none
	DIMENSION a(4)
	NAMELIST /x/ a
? It seems to me the error will point to the dimension statement, I 
haven't verified this, though.

In that case, would something like
gfc_error ("Unknown symbol '%s' in NAMELIST '%s' at %L", sym->name,
  	   namelist_sym->name, &namelist_sym->declared_at)
be a better choice for the error message?

gfortran uses assert, insted of #ifdef ENABLE_CHECKING ... abort. In the 
same vein, gfc_internal_error is not put between #ifdef's in other 
places. Don't know if either is something we want to change.

- Tobi