Skip to content

Commit a6bbe72

Browse files
committed
Output exception information to simplify investigation.
1 parent 818a730 commit a6bbe72

File tree

1 file changed

+4
-0
lines changed

1 file changed

+4
-0
lines changed

source/ada/lsp-ada_driver.adb

Lines changed: 4 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -115,6 +115,8 @@ procedure LSP.Ada_Driver is
115115
begin
116116
Trace (Server_Trace,
117117
"EXCEPTION: " & Exception_Name (E) &
118+
Ada.Characters.Latin_1.LF &
119+
"INFORMATION: " & Exception_Information (E) &
118120
Ada.Characters.Latin_1.LF &
119121
Symbolic_Traceback (E));
120122
Ada_Handler.Handle_Error;
@@ -128,6 +130,8 @@ procedure LSP.Ada_Driver is
128130
begin
129131
Trace (Server_Trace,
130132
"EXCEPTION: " & Exception_Name (E) &
133+
Ada.Characters.Latin_1.LF &
134+
"INFORMATION: " & Exception_Information (E) &
131135
Ada.Characters.Latin_1.LF &
132136
Symbolic_Traceback (E));
133137
-- An exception occurred while fuzzing: make it fatal.

0 commit comments

Comments
 (0)