Skip to content

Commit 68ddfbe

Browse files
committed
minor: Correct some typos in GNATcheck driver sources
1 parent c55eb67 commit 68ddfbe

File tree

2 files changed

+4
-4
lines changed

2 files changed

+4
-4
lines changed

lkql_checker/src/gnatcheck-projects.adb

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -99,7 +99,7 @@ package body Gnatcheck.Projects is
9999
(Self : Gnatcheck_Reporter) return GPR2.Reporter.Verbosity_Level;
100100

101101
Gpr2_Reporter : Gnatcheck_Reporter;
102-
-- Make libgpt2 report messages using the proper gnatcheck.Output API
102+
-- Make libgpr2 report messages using the proper ``Gnatcheck.Output`` API.
103103

104104
function Report_Missing_File (Log : String) return Boolean
105105
is (Index (Log, "source file") /= 0 and then Index (Log, "not found") /= 0);

lkql_checker/src/gnatcheck-rules-rule_table.adb

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1019,7 +1019,7 @@ package body Gnatcheck.Rules.Rule_Table is
10191019
end if;
10201020
end loop;
10211021

1022-
-- We start by getting the instanciated rule identifier, and verify
1022+
-- We start by getting the instantiated rule identifier, and verify
10231023
-- its existence.
10241024
Rule := Get_Rule (Option (Word_Start .. Word_End));
10251025
if not Present (Rule) then
@@ -1041,7 +1041,7 @@ package body Gnatcheck.Rules.Rule_Table is
10411041
else Rule_Name (Rule)));
10421042
Instance := Get_Instance (To_String (Instance_Name));
10431043

1044-
-- Check that the option is not instanciating a rule with an already
1044+
-- Check that the option is not instantiating a rule with an already
10451045
-- registered instance name. If the option is trying to disable an
10461046
-- instance, check that this instance exists.
10471047
if Enable and then Instance /= null then
@@ -1078,7 +1078,7 @@ package body Gnatcheck.Rules.Rule_Table is
10781078

10791079
-- We need to process compiler-based rules in a separate way
10801080
if Is_Compiler_Rule (Rule) then
1081-
-- Get the rule paramater and perform the initial verification
1081+
-- Get the rule parameter and perform the initial verification
10821082
if not Check_For_Compiler_Rule (Rule, To_String (Instance_Name))
10831083
then
10841084
Bad_Rule_Detected := True;

0 commit comments

Comments
 (0)