File tree Expand file tree Collapse file tree 1 file changed +6
-6
lines changed
Expand file tree Collapse file tree 1 file changed +6
-6
lines changed Original file line number Diff line number Diff line change 6565
6666 No_Compilation_Command : constant Compilation_Command_Type :=
6767 (Language => All_Languages,
68- Filename => + " " ,
69- Target => + " " ,
68+ Filename => Null_Unbounded_String ,
69+ Target => Null_Unbounded_String ,
7070 Instrumentation_Sources => String_Vectors.Empty_Vector);
7171
7272 package Compilation_Command_Vectors is new Ada.Containers.Vectors
8484 -- driver.
8585
8686 No_Assembly_Command : constant Assembly_Command_Type :=
87- (Filename => + " " ,
88- Target => + " " );
87+ (Filename => Null_Unbounded_String ,
88+ Target => Null_Unbounded_String );
8989
9090 package Assembly_Command_Vectors is new Ada.Containers.Vectors
9191 (Index_Type => Positive, Element_Type => Assembly_Command_Type);
115115 Libraries => String_Vectors.Empty_Vector,
116116 Object_Files => String_Vectors.Empty_Vector,
117117 Source_Files => String_Vectors.Empty_Vector,
118- Target => + " " );
118+ Target => Null_Unbounded_String );
119119
120120 type Compilation_Database is record
121121 Compilation_Commands : Compilation_Command_Vectors.Vector;
220220 for C of Command loop
221221 if C = ' ' and then Arg /= " " then
222222 Result.Append (Arg);
223- Arg := + " " ;
223+ Arg := Null_Unbounded_String ;
224224 else
225225 Append (Arg, C);
226226 end if ;
You can’t perform that action at this time.
0 commit comments