diff options
Diffstat (limited to 'gcc/ada/errout.adb')
| -rw-r--r-- | gcc/ada/errout.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/errout.adb b/gcc/ada/errout.adb index a402c684101..2b9664daac3 100644 --- a/gcc/ada/errout.adb +++ b/gcc/ada/errout.adb @@ -307,7 +307,7 @@ package body Errout is procedure Error_Msg (Msg : String; Flag_Location : Source_Ptr) is begin - Error_Msg (Msg, Flag_Location, Empty); + Error_Msg (Msg, Flag_Location, Current_Node); end Error_Msg; procedure Error_Msg |