From c2e3326a10f585fb252a1d54e7a83e7efecbf99a Mon Sep 17 00:00:00 2001 From: Viljar Indus Date: Mon, 22 Jul 2024 09:45:03 +0300 Subject: [PATCH] ada: Print Insertion_Sloc in dmsg gcc/ada/ * erroutc.adb (dmsg): Print Insertion_Sloc. --- gcc/ada/erroutc.adb | 5 +++++ 1 file changed, 5 insertions(+) diff --git a/gcc/ada/erroutc.adb b/gcc/ada/erroutc.adb index 4e0a9f26e0d..db1c0923e90 100644 --- a/gcc/ada/erroutc.adb +++ b/gcc/ada/erroutc.adb @@ -327,6 +327,11 @@ package body Erroutc is Write_Location (E.Optr.Ptr); Write_Eol; + Write_Str + (" Insertion_Sloc = "); + Write_Location (E.Insertion_Sloc); + Write_Eol; + w (" Line = ", Int (E.Line)); w (" Col = ", Int (E.Col)); w (" Info = ", E.Info); -- 2.47.2