update FCS to 'Add a Paren case to SynRationalConst', commit 97a5b658…

…4b54707e3e8541fe758e1aa22132a8fe

CHANGELOG.md

@@ -4,6 +4,7 @@
 
 ### Changed
 * Update FCS to 'Included get,set in range of AutoProperty', commit d508186f510681d1261291474e3f9f25485999a8
+* Update FCS to 'Add a Paren case to SynRationalConst', commit 97a5b6584b54707e3e8541fe758e1aa22132a8fe
 
 ### Added
 * Initial support for `SynExpr.DotLambda` [#2920](https://github.com/fsprojects/fantomas/pull/2920) (See [dotnet/fsharp#13907](https://github.com/dotnet/fsharp/pull/13907))

Directory.Build.props

@@ -39,8 +39,7 @@ Some common use cases include:
 
     <!-- Versions -->
     <PropertyGroup>
-        <FCSRepo>dawedawe/fsharp</FCSRepo>
-        <FCSCommitHash>d26ba6b2f220b53ebbc16436fca37ad6291b6040</FCSCommitHash>
+        <FCSCommitHash>97a5b6584b54707e3e8541fe758e1aa22132a8fe</FCSCommitHash>
         <StreamJsonRpcVersion>2.8.28</StreamJsonRpcVersion>
         <FSharpCoreVersion>6.0.1</FSharpCoreVersion>
     </PropertyGroup>

build.fsx

@@ -189,10 +189,6 @@ pipeline "EnsureRepoConfig" {
 
 let deps = __SOURCE_DIRECTORY__ </> ".deps"
 
-let fsharpCompilerRepo =
-    let xDoc = XElement.Load(__SOURCE_DIRECTORY__ </> "Directory.Build.props")
-    xDoc.XPathSelectElements("//FCSRepo") |> Seq.head |> (fun xe -> xe.Value)
-
 let fsharpCompilerHash =
     let xDoc = XElement.Load(__SOURCE_DIRECTORY__ </> "Directory.Build.props")
     xDoc.XPathSelectElements("//FCSCommitHash") |> Seq.head |> (fun xe -> xe.Value)
@@ -208,7 +204,7 @@ let updateFileRaw (file: FileInfo) =
                 line)
     File.WriteAllLines(file.FullName, updatedLines)
 
-let downloadCompilerFile repo commitHash relativePath =
+let downloadCompilerFile commitHash relativePath =
     async {
         let file = FileInfo(deps </> commitHash </> relativePath)
         if file.Exists && file.Length <> 0 then
@@ -217,7 +213,8 @@ let downloadCompilerFile repo commitHash relativePath =
             file.Directory.Create()
             let fs = file.Create()
             let fileName = Path.GetFileName(relativePath)
-            let url = $"https://raw.githubusercontent.com/{repo}/{commitHash}/{relativePath}"
+            let url =
+                $"https://raw.githubusercontent.com/dotnet/fsharp/{commitHash}/{relativePath}"
             let! response =
                 Http.AsyncRequestStream(
                     url,
@@ -307,7 +304,7 @@ pipeline "Init" {
                "src/Compiler/SyntaxTree/LexHelpers.fs"
                "src/Compiler/SyntaxTree/LexFilter.fsi"
                "src/Compiler/SyntaxTree/LexFilter.fs" |]
-            |> Array.map (downloadCompilerFile fsharpCompilerRepo fsharpCompilerHash)
+            |> Array.map (downloadCompilerFile fsharpCompilerHash)
             |> Async.Parallel
             |> Async.Ignore)
     }