diff options
-rw-r--r-- | errorout.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/errorout.adb b/errorout.adb index 87e5493..9892728 100644 --- a/errorout.adb +++ b/errorout.adb @@ -841,7 +841,7 @@ package body Errorout is begin if Loc = Location_Nil then -- Avoid a crash. - return "??:??:??:"; + return "??:??:??"; else Location_To_Position (Loc, Name, Line, Col); return Get_Location_Str (Name, Line, Col, Filename); |