Skip to content

Commit 167e4bc

Browse files
committed
instrument-projects.adb: minor reformattings
1 parent ef912e7 commit 167e4bc

File tree

1 file changed

+3
-8
lines changed

1 file changed

+3
-8
lines changed

tools/gnatcov/instrument-projects.adb

Lines changed: 3 additions & 8 deletions
Original file line numberDiff line numberDiff line change
@@ -1038,7 +1038,7 @@ is
10381038
C_Language => C_Instrumenter'Access,
10391039
CPP_Language => CPP_Instrumenter'Access);
10401040

1041-
-- Start of processing for Instrument_Units_Of_Interest
1041+
-- Start of processing for Instrument_Units_Of_Interest
10421042

10431043
begin
10441044
-- Set the instrumentation tag
@@ -1203,6 +1203,7 @@ begin
12031203
CPP_Instrumenter := Create_CPP_Instrumenter (IC.Tag);
12041204

12051205
if Dump_Config.Trigger = Manual then
1206+
12061207
-- Replace manual dump indications for C-like languages
12071208

12081209
for Lang in C_Family_Language loop
@@ -1248,7 +1249,6 @@ begin
12481249
Instrument_Source_Args.Append
12491250
(Common_Switches (Cmd_Instrument_Source));
12501251
for Cur in Instrumented_Sources.Iterate loop
1251-
12521252
declare
12531253
Unit_Args : String_Vectors.Vector :=
12541254
Instrument_Source_Args.Copy;
@@ -1274,12 +1274,7 @@ begin
12741274

12751275
-- Add the arguments that are specific to the compilation unit
12761276

1277-
Unit_Args.Append
1278-
(Compilation_Unit_Options
1279-
(IC,
1280-
Desc,
1281-
LU_Info));
1282-
1277+
Unit_Args.Append (Compilation_Unit_Options (IC, Desc, LU_Info));
12831278
Unit_Args.Append (+"--sid=" & Obj_SID);
12841279

12851280
-- We instrument the body, spec and separates as a whole

0 commit comments

Comments
 (0)