Cleanup: trailing spaces

Author: auduchinok

ReSharper.FSharp/src/FSharp.Common/src/Checker/FSharpAssemblyContentProvider.fs

@@ -29,7 +29,7 @@ type FSharpAssemblyContentProvider(lifetime, onSolutionCloseNotifier: OnSolution
                       |> Seq.toList
                       |> List.rev // if mscorlib.dll is the first then FSC raises exception when we try to
                                   // get Content.Entities from it.
-        
+
                   for fileName, signatures in assembliesByFileName do
                       yield! AssemblyContent.GetAssemblyContent entityCache.Locking AssemblyContentType.Public fileName signatures ]
             }

ReSharper.FSharp/src/FSharp.Common/src/Checker/FSharpCoreFix.fs

@@ -32,7 +32,7 @@ let private tryFindFile dirs file =
               | _ -> "")
           |> Seq.filter ((<>) "")
           |> Seq.cache
-      if not (Seq.isEmpty files) then Some(Seq.head files) 
+      if not (Seq.isEmpty files) then Some(Seq.head files)
       else None
 
 let fsharpCoreOpt =

ReSharper.FSharp/src/FSharp.Common/src/Checker/FcsCheckerService.fs

@@ -180,7 +180,7 @@ type FcsCheckerService(lifetime: Lifetime, logger: ILogger, onSolutionCloseNotif
         x.ResolveNameAtLocation(context.GetSourceFile(), List.ofSeq names, coords, opName)
 
 
-type FSharpParseAndCheckResults = 
+type FSharpParseAndCheckResults =
     { ParseResults: FSharpParseFileResults
       CheckResults: FSharpCheckFileResults }
 

ReSharper.FSharp/src/FSharp.Common/src/Checker/FcsProjectBuilder.fs

@@ -208,7 +208,7 @@ type FcsProjectBuilder(checkerService: FcsCheckerService, itemsContainer: IFShar
             not (hasFSharpCoreReference options || options.OtherOptions |> Array.contains "--compiling-fslib")
 
         let options =
-            if shouldAddFSharpCore projectOptions then 
+            if shouldAddFSharpCore projectOptions then
                 { projectOptions with
                     OtherOptions = FSharpCoreFix.ensureCorrectFSharpCore projectOptions.OtherOptions }
             else projectOptions

ReSharper.FSharp/src/FSharp.Common/src/Checker/FcsProjectProvider.fs

@@ -29,7 +29,7 @@ open JetBrains.Util
 [<AutoOpen>]
 module FcsProjectProvider =
     let isProjectModule (psiModule: IPsiModule) =
-        psiModule :? IProjectPsiModule 
+        psiModule :? IProjectPsiModule
 
     let isMiscModule (psiModule: IPsiModule) =
         psiModule.IsMiscFilesProjectModule()
@@ -179,7 +179,7 @@ type FcsProjectProvider(lifetime: Lifetime, solution: ISolution, changeManager:
         getOrCreateFcsProject sourceFile.PsiModule
 
     let isScriptLike file =
-        fsFileService.IsScriptLike(file) || isMiscModule file.PsiModule || isNull (file.GetProject())        
+        fsFileService.IsScriptLike(file) || isMiscModule file.PsiModule || isNull (file.GetProject())
 
     let getParsingOptionsForSingleFile ([<NotNull>] sourceFile: IPsiSourceFile) isScript =
         { FSharpParsingOptions.Default with
@@ -190,7 +190,7 @@ type FcsProjectProvider(lifetime: Lifetime, solution: ISolution, changeManager:
     let invalidateProject (project: IProject) =
         for psiModule in psiModules.GetPsiModules(project) do
             dirtyModules.Add(psiModule) |> ignore
-    
+
     member x.FcsProjectInvalidated = fcsProjectInvalidated
 
     member x.ProcessChange(obj: ChangeEventArgs) =
@@ -295,7 +295,7 @@ type FcsProjectProvider(lifetime: Lifetime, solution: ISolution, changeManager:
                 let path = sourceFile.GetLocation()
                 tryGetValue path fsProject.FileIndices)
             |> Option.defaultWith (fun _ -> -1)
-        
+
         member x.ModuleInvalidated = x.FcsProjectInvalidated :> _
 
         member x.InvalidateReferencesToProject(project: IProject) =

ReSharper.FSharp/src/FSharp.Common/src/ProjectModel/FSharpLanguageLevelProvider.fs

@@ -48,7 +48,7 @@ type FSharpLanguageLevelProjectProperty(lifetime, locks, projectPropertiesListen
 
     let getFSharpProjectConfiguration (project: IProject) targetFrameworkId =
         project.ProjectProperties.TryGetConfiguration<IFSharpProjectConfiguration>(targetFrameworkId)
-    
+
     let (|Version|) (version: Version) =
         version.Major, version.Minor
 
@@ -66,7 +66,7 @@ type FSharpLanguageLevelProjectProperty(lifetime, locks, projectPropertiesListen
     let getVersionMappingByToolset () =
         let languageLevel = getLanguageLevelByToolsetVersion ()
         VersionMapping(languageLevel, languageLevel)
-    
+
     // todo: more versions
     let getLanguageLevelByCompilerVersion (fscVersion: Version): VersionMapping =
         match fscVersion with

ReSharper.FSharp/src/FSharp.Common/src/ProjectModel/FSharpLanguageVersion.fs

@@ -15,7 +15,7 @@ type FSharpLanguageLevel =
     /// Anon records
     | FSharp46 = 46
 
-    /// Implicit yield, wild pat self id, constructor/static method parameters deindent 
+    /// Implicit yield, wild pat self id, constructor/static method parameters deindent
     | FSharp47 = 47
 
     /// String interpolation, nameof, open types
@@ -57,7 +57,7 @@ module FSharpLanguageLevel =
     let key = Key<Boxed<FSharpLanguageLevel>>("LanguageLevel")
 
     let private ofPsiModuleNoCache (psiModule: IPsiModule) =
-        let levelProvider = 
+        let levelProvider =
             psiModule.GetPsiServices()
                 .GetComponent<SolutionFeaturePartsContainer>()
                 .GetFeatureParts<ILanguageLevelProvider<FSharpLanguageLevel, FSharpLanguageVersion>>(fun p ->
@@ -86,8 +86,8 @@ module FSharpLanguageVersion =
 
         match langVersion with
         | IgnoreCase "Default" -> FSharpLanguageVersion.Default
-        | IgnoreCase "LatestMajor" -> FSharpLanguageVersion.LatestMajor 
-        | IgnoreCase "Latest" -> FSharpLanguageVersion.Latest 
+        | IgnoreCase "LatestMajor" -> FSharpLanguageVersion.LatestMajor
+        | IgnoreCase "Latest" -> FSharpLanguageVersion.Latest
         | IgnoreCase "Preview" -> FSharpLanguageVersion.Preview
 
         | "4.6" -> FSharpLanguageVersion.FSharp46

ReSharper.FSharp/src/FSharp.Common/src/ProjectModel/FSharpScriptPsiModuleFactory.fs

@@ -266,13 +266,13 @@ type FSharpScriptPsiModulesProvider(lifetime: Lifetime, solution: ISolution, cha
             removePsiModule psiModule
 
             psiModule.LifetimeDefinition.Terminate()
-            let changeBuilder = PsiModuleChangeBuilder() 
+            let changeBuilder = PsiModuleChangeBuilder()
             changeBuilder.AddModuleChange(psiModule, PsiModuleChange.ChangeType.Removed)
             changeBuilder.AddFileChange(psiModule.SourceFile, PsiModuleChange.ChangeType.Removed)
             changeManager.OnProviderChanged(this, changeBuilder.Result, SimpleTaskExecutor.Instance))
 
     member x.GetPsiModulesForPath(path) =
-        getPsiModulesForPath path 
+        getPsiModulesForPath path
 
     member x.TargetFrameworkId =
         targetFrameworkId
@@ -283,7 +283,7 @@ type FSharpScriptPsiModulesProvider(lifetime: Lifetime, solution: ISolution, cha
         | null -> ()
         | change ->
             let path = change.ProjectFile.Location
-            if scriptsReferences.ContainsKey(path) then 
+            if scriptsReferences.ContainsKey(path) then
                 updateReferences path change.Document
 
     member x.Dump(writer: TextWriter) =
@@ -308,7 +308,7 @@ type FSharpScriptPsiModulesProvider(lifetime: Lifetime, solution: ISolution, cha
         member x.Execute _ = null
 
 
-/// Overriding psi module handler for each project (a real project, misc files project, solution folder, etc). 
+/// Overriding psi module handler for each project (a real project, misc files project, solution folder, etc).
 type FSharpScriptPsiModuleHandler(lifetime, solution, handler, modulesProvider, changeManager) as this =
     inherit DelegatingProjectPsiModuleHandler(handler)
 
@@ -342,7 +342,7 @@ type FSharpScriptPsiModuleHandler(lifetime, solution, handler, modulesProvider,
         | _ -> handler.OnProjectFileChanged(projectFile, oldLocation, changeType, changeBuilder)
 
     override x.GetPsiSourceFilesFor(projectFile) =
-        let defaultSourceFiles = handler.GetPsiSourceFilesFor(projectFile) 
+        let defaultSourceFiles = handler.GetPsiSourceFilesFor(projectFile)
 
         let mutable sourceFile = Unchecked.defaultof<IPsiSourceFile>
         match sourceFiles.TryGetValue(projectFile.Location, &sourceFile) with
@@ -351,7 +351,7 @@ type FSharpScriptPsiModuleHandler(lifetime, solution, handler, modulesProvider,
                 yield sourceFile
                 yield! defaultSourceFiles
             }
-        | _ -> defaultSourceFiles 
+        | _ -> defaultSourceFiles
 
     override x.InternalsVisibleTo(moduleTo, moduleFrom) =
         moduleTo :? FSharpScriptPsiModule && moduleFrom :? FSharpScriptPsiModule ||
@@ -363,7 +363,7 @@ type FSharpScriptPsiModule(lifetime, path, solution, sourceFileCtor, moduleId, a
     inherit ConcurrentUserDataHolder()
 
     let lifetimeDefinition = Lifetime.Define(lifetime)
-    let lifetime = lifetimeDefinition.Lifetime 
+    let lifetime = lifetimeDefinition.Lifetime
 
     let psiServices = solution.GetPsiServices()
     let psiModules = solution.PsiModules()

ReSharper.FSharp/src/FSharp.Common/src/ProjectModel/Host/FSharpLanguageSpecificItemsProvider.fs

@@ -33,10 +33,10 @@ type FSharpProjectPropertiesBuilder(projectPropertiesRequests) =
         base.BuildProjectConfiguration(rdProjectDescriptor, project, configuration)
 
         let languageVersion = project.GetPropertyValueIgnoreCase(MSBuildProjectUtil.LanguageVersionProperty)
-        let languageVersion = FSharpLanguageVersion.parseCompilationOption languageVersion 
+        let languageVersion = FSharpLanguageVersion.parseCompilationOption languageVersion
 
         let configuration = configuration.As<IFSharpProjectConfiguration>()
-        configuration.LanguageVersion <- languageVersion 
+        configuration.LanguageVersion <- languageVersion
 
 
 [<SolutionComponent>]

ReSharper.FSharp/src/FSharp.Common/src/ProjectModel/Host/ProjectItems/FSharpItemsContainer.fs

@@ -216,7 +216,7 @@ type FSharpItemsContainer(logger: ILogger, containerLoader: FSharpItemsContainer
                         itemsByName.AddValue(rdItem.EvaluatedInclude, rdItem.ItemType)
 
                 let compileBeforeItems = getItems msBuildProject projectDescriptor isCompileBefore itemsByName true
-                let compileAfterItems = getItems msBuildProject projectDescriptor isCompileAfter itemsByName true 
+                let compileAfterItems = getItems msBuildProject projectDescriptor isCompileAfter itemsByName true
                 let restItems = getItems msBuildProject projectDescriptor (changesOrder >> not) itemsByName false
                 let items =
                     compileBeforeItems.Concat(restItems).Concat(compileAfterItems)
@@ -306,7 +306,7 @@ type FSharpItemsContainer(logger: ILogger, containerLoader: FSharpItemsContainer
         member x.TryGetParentFolderIdentity(viewFile: FSharpViewItem): FSharpViewFolderIdentity option =
             use lock = locker.UsingReadLock()
             tryGetProjectMark viewFile.ProjectItem
-            |> Option.bind tryGetProjectMapping 
+            |> Option.bind tryGetProjectMapping
             |> Option.bind (fun mapping ->
                 mapping.TryGetProjectItem(viewFile)
                 |> Option.bind (fun item ->
@@ -356,10 +356,10 @@ type ProjectMapping(projectDirectory, projectUniqueName, targetFrameworkIds: ISe
 
     let addChild (item: FSharpProjectItem) =
         children.AddValue(item.Parent, item)
-    
+
     let removeChild (item: FSharpProjectItem) =
         children.RemoveValue(item.Parent, item)
-    
+
     let tryGetFile path =
         tryGetValue path files
 
@@ -498,7 +498,7 @@ type ProjectMapping(projectDirectory, projectUniqueName, targetFrameworkIds: ISe
                                 relativeParent, secondRelativeParent.LogicalPath
                             | _ -> failwith "item parent"
                         splitFolder relativeItemParent secondRelativeItemParentPath sortKey itemsUpdater
-    
+
                         let relativeParent, relativeItem =
                             match relativeItem.Parent with
                             | ProjectItem item -> item.Parent, item
@@ -532,7 +532,7 @@ type ProjectMapping(projectDirectory, projectUniqueName, targetFrameworkIds: ISe
                 | RelativeToType.After
                 | RelativeToType.Inside -> Seq.tryLast children
                 | _ -> relativeToType |> failwithf "Got relativeToType %O"
-        
+
             match relativeChildItem with
             | Some item when canBeRelative item modifiedItem -> Some (item, relativeToType)
             | Some item -> tryGetRelativeChildItem (ProjectItem item) modifiedItem relativeToType
@@ -626,7 +626,7 @@ type ProjectMapping(projectDirectory, projectUniqueName, targetFrameworkIds: ISe
             folders.RemoveValue(itemAfter.PhysicalPath, itemAfter)
             children.RemoveKey(ProjectItem itemAfter)
             removeChild itemAfter
-            
+
             moveFollowingItems itemAfter.Parent itemAfter.SortKey MoveDirection.Up itemUpdater
 
             let lastChildBefore = List.tryLast folderBeforeChildren
@@ -866,7 +866,7 @@ type ProjectMapping(projectDirectory, projectUniqueName, targetFrameworkIds: ISe
             addChild newItem
 
             if oldLocation <> newLocation then
-                // renaming linked files isn't currently supported, but 
+                // renaming linked files isn't currently supported, but
                 info.LogicalPath <- info.LogicalPath.Directory / newLocation.Name
                 info.PhysicalPath <- info.PhysicalPath.Directory / newLocation.Name
         | item -> failwithf "got item %O" item
@@ -926,7 +926,7 @@ type ProjectMapping(projectDirectory, projectUniqueName, targetFrameworkIds: ISe
             match tryGetAdjacentRelativeItem (ProjectItem relativeChildItem) modifiedItemBuildAction relativeToType with
             | Some (adjacentItem, relativeToType) ->
                   Some (adjacentItem.PhysicalPath, changeDirection relativeToType)
-            | _ -> 
+            | _ ->
                 // There were no adjacent items in this direction, try the other one.
                 let relativeToType = changeDirection relativeToType
                 tryGetAdjacentRelativeItem (ProjectItem relativeChildItem) modifiedItemBuildAction relativeToType
@@ -981,7 +981,7 @@ type FSharpProjectModelElement =
 [<StructuredFormatDisplay("{RelativePhysicalPath}")>]
 type FSharpProjectItem =
     | FileItem of ItemInfo * BuildAction * ISet<TargetFrameworkId> * isThisProjectItem: bool
-    | FolderItem of ItemInfo * FSharpViewFolderIdentity 
+    | FolderItem of ItemInfo * FSharpViewFolderIdentity
 
     member x.ItemInfo =
         match x with
@@ -1001,7 +1001,7 @@ type FSharpProjectItem =
         match x with
         | FileItem(_, _, _, isThisProjectItem) -> not isThisProjectItem
         | _ -> false
-    
+
     override x.ToString() =
         let name =
             match x with
@@ -1110,8 +1110,8 @@ type FSharpItemsContainerRefresher(lifetime: Lifetime, solution: ISolution, view
 
         // todo: single identity
         member x.RefreshFolder(projectMark, folder, _) =
-            refresh projectMark (fun project -> project.FindProjectItemsByLocation(folder).OfType<IProjectFolder>()) 
-    
+            refresh projectMark (fun project -> project.FindProjectItemsByLocation(folder).OfType<IProjectFolder>())
+
         member x.UpdateFile(projectMark, path) =
             update projectMark path (function
                 | ProjectFile file -> Some(FSharpViewFile(file))
@@ -1240,6 +1240,6 @@ type FSharpBuildActionsProvider() =
     let buildActions =
         [| BuildActions.compileBefore
            BuildActions.compileAfter |]
-    
+
     override x.DefaultBuildActions = buildActions :> _
     override x.IsApplicable(projectProperties) = projectProperties :? FSharpProjectProperties