Minor performance optimization

Author: BennieCopeland

src/FSharpLint.Core/Application/Lint.fs

@@ -113,7 +113,7 @@ module Lint =
         { CancellationToken:CancellationToken option
           ErrorReceived:Suggestion.LintWarning -> unit
           ReportLinterProgress:ProjectProgress -> unit
-          Configuration:Configuration.Configuration }
+          Rules:Configuration.LoadedRules }
 
     type Context =
         { IndentationRuleContext:Map<int,bool*int>
@@ -207,7 +207,7 @@ module Lint =
             | Some(x) -> not x.IsCancellationRequested
             | None -> true
 
-        let enabledRules = Configuration.flattenConfig lintInfo.Configuration
+        let enabledRules = lintInfo.Rules
 
         let lines = String.toLines fileInfo.Text |> Array.map (fun (line, _, _) -> line)
         let allRuleNames =
@@ -411,7 +411,7 @@ module Lint =
 
                 let parseFilesInProject files projectOptions =
                     let lintInformation =
-                        { Configuration = config
+                        { Rules = Configuration.flattenConfig config
                           CancellationToken = optionalParams.CancellationToken
                           ErrorReceived = warningReceived
                           ReportLinterProgress = projectProgress }
@@ -517,7 +517,7 @@ module Lint =
 
                 optionalParams.ReceivedWarning |> Option.iter (fun func -> func warning)
             let lintInformation =
-                { Configuration = config
+                { Rules = Configuration.flattenConfig config
                   CancellationToken = optionalParams.CancellationToken
                   ErrorReceived = warningReceived
                   ReportLinterProgress = Option.defaultValue ignore optionalParams.ReportLinterProgress }
@@ -560,7 +560,7 @@ module Lint =
                 optionalParams.ReceivedWarning |> Option.iter (fun func -> func warning)
 
             let lintInformation =
-                { Configuration = config
+                { Rules = Configuration.flattenConfig config
                   CancellationToken = optionalParams.CancellationToken
                   ErrorReceived = warningReceived
                   ReportLinterProgress = Option.defaultValue ignore optionalParams.ReportLinterProgress }