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

[Ada] Do not set Current_Error_Node to a node without location

Browse Source 
The message "No source file position information available" is displayed
in the bugbox when Current_Error_Node has no location, which is useless.

gcc/ada/

	* gcc-interface/trans.cc (gnat_to_gnu): Do not set Current_Error_Node
	to a node without location.
This commit is contained in:
Eric Botcazou 2022-02-19 12:20:50 +01:00 committed by Pierre-Marie de Rodat
parent 795f74c735
commit b64c4968c7
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
gcc/ada/gcc-interface/trans.cc
View File

@ -6139,7 +6139,8 @@ gnat_to_gnu (Node_Id gnat_node)
bool aa_sync;
/* Save node number for error message and set location information. */
Current_Error_Node = gnat_node;
if (Sloc (gnat_node) > No_Location)
Current_Error_Node = gnat_node;
Sloc_to_locus (Sloc (gnat_node), &input_location);
/* If we are only annotating types and this node is a statement, return