Skip to content

Commit e334a5c

Browse files
Disable the logger's code when the trace is not active
We should do that for both modes: ALS for Ada and GPR. For eng/ide/ada_language_server#1701
1 parent 073ef4d commit e334a5c

File tree

1 file changed

+5
-2
lines changed

1 file changed

+5
-2
lines changed

source/ada/lsp-ada_driver.adb

Lines changed: 5 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -740,9 +740,12 @@ begin
740740
Server.Run
741741
(Ada_Handler'Unchecked_Access,
742742
Tracer'Unchecked_Access,
743-
In_Logger => (if In_Trace.Is_Active
743+
-- Disable the In/Out additional logger if the global
744+
-- ALS.MAIN.LOGGER trace is not active or if the specific
745+
-- ALS.IN/ALS.OUT traces are not active.
746+
In_Logger => (if Server_Logger_Trace.Is_Active and then In_Trace.Is_Active
744747
then In_Logger'Unchecked_Access else null),
745-
Out_Logger => (if Out_Trace.Is_Active
748+
Out_Logger => (if Server_Logger_Trace.Is_Active and then Out_Trace.Is_Active
746749
then Out_Logger'Unchecked_Access else null),
747750
Priority => LSP.Server_Jobs.Low);
748751
end if;

0 commit comments

Comments
 (0)