diff mbox series

[Ada] Compiler crash on mixed-case source file names

Message ID 20170908101818.GA47026@adacore.com
State New
Headers show
Series [Ada] Compiler crash on mixed-case source file names | expand

Commit Message

Arnaud Charlet Sept. 8, 2017, 10:18 a.m. UTC 
This patch fixes a bug in which if mixed-case file names are used, and a
file name contains any of the capital letters 'U', 'W', 'Q', or 'O',
then in rare cases the compiler can crash. No small test is available.

Tested on x86_64-pc-linux-gnu, committed on trunk

2017-09-08  Bob Duff  <duff@adacore.com>

	* exp_intr.adb (Add_Source_Info): Do not decode
	file names; they were not encoded in the first place.
diff mbox series

Patch

Index: exp_intr.adb
===================================================================
--- exp_intr.adb	(revision 251883)
+++ exp_intr.adb	(working copy)
@@ -125,7 +125,7 @@ 
             Append (Buf, Nat (Get_Logical_Line_Number (Loc)));
 
          when Name_File =>
-            Append_Decoded (Buf, Reference_Name (Get_Source_File_Index (Loc)));
+            Append (Buf, Reference_Name (Get_Source_File_Index (Loc)));
 
          when Name_Source_Location =>
             Build_Location_String (Buf, Loc);