Skip to content

Commit 7f31c04

Browse files
committed
Instrument: enable C support by default
Change-Id: I37d6471db8be6764e97a18f69178d3eb7fe0138a TN: V913-006
1 parent 7113cd9 commit 7f31c04

File tree

1 file changed

+8
-11
lines changed

1 file changed

+8
-11
lines changed

tools/gnatcov/gnatcov_bits_specific.adb

Lines changed: 8 additions & 11 deletions
Original file line numberDiff line numberDiff line change
@@ -479,19 +479,16 @@ procedure GNATcov_Bits_Specific is
479479
-- Compute the languages for which we want coverage analysis, or enable
480480
-- just the default ones.
481481

482-
if Args.String_List_Args (Opt_Restricted_To_Languages).Is_Empty
483-
then
484-
-- C instrumentation is a beta feature and not yet fully functional.
485-
-- It will thus not be part of the languages enabled by default.
486-
487-
Src_Enabled_Languages (Ada_Language) := True;
482+
if Args.String_List_Args (Opt_Restricted_To_Languages).Is_Empty then
488483

489-
-- It must be enabled for "gnatcov setup", as the core runtime is
490-
-- implemented in C.
484+
-- C++ instrumentation is a beta feature and not yet fully
485+
-- functional. It will thus not be part of the languages enabled by
486+
-- default.
491487

492-
if Args.Command = Cmd_Setup then
493-
Src_Enabled_Languages (C_Language) := True;
494-
end if;
488+
Src_Enabled_Languages :=
489+
(Ada_Language => True,
490+
C_Language => True,
491+
CPP_Language => False);
495492
else
496493
for Arg of Args.String_List_Args (Opt_Restricted_To_Languages) loop
497494
Src_Enabled_Languages (To_Language (+Arg)) := True;

0 commit comments

Comments
 (0)