Proof of concept

fable-compiler · Oct 21, 2023 · b12508d · b12508d
1 parent b1ab3e6
commit b12508d
Show file tree

Hide file tree

Showing 14 changed files with 2,187 additions and 1 deletion.
diff --git a/Fable.sln b/Fable.sln
@@ -62,6 +62,10 @@ Project("{F2A71F9B-5D33-465A-A702-920D77279786}") = "Fable.Tests.Spaces", "tests
 EndProject
 Project("{F2A71F9B-5D33-465A-A702-920D77279786}") = "Fable.Build", "src\Fable.Build\Fable.Build.fsproj", "{F2E323CE-FDF3-4A1E-AE97-B723D2E63763}"
 EndProject
+Project("{F2A71F9B-5D33-465A-A702-920D77279786}") = "Fable.Compiler.Service", "src\Fable.Compiler.Service\Fable.Compiler.Service.fsproj", "{942DD29B-07C0-4ACF-891E-85C1235A9BE0}"
+EndProject
+Project("{F2A71F9B-5D33-465A-A702-920D77279786}") = "FCSTest", "tests\FCSTest\FCSTest.fsproj", "{81642B88-A7A2-4BBB-8EAD-0584C018D370}"
+EndProject
 Global
 	GlobalSection(SolutionConfigurationPlatforms) = preSolution
 		Debug|Any CPU = Debug|Any CPU
@@ -160,6 +164,14 @@ Global
 		{F2E323CE-FDF3-4A1E-AE97-B723D2E63763}.Debug|Any CPU.Build.0 = Debug|Any CPU
 		{F2E323CE-FDF3-4A1E-AE97-B723D2E63763}.Release|Any CPU.ActiveCfg = Release|Any CPU
 		{F2E323CE-FDF3-4A1E-AE97-B723D2E63763}.Release|Any CPU.Build.0 = Release|Any CPU
+		{942DD29B-07C0-4ACF-891E-85C1235A9BE0}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{942DD29B-07C0-4ACF-891E-85C1235A9BE0}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{942DD29B-07C0-4ACF-891E-85C1235A9BE0}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{942DD29B-07C0-4ACF-891E-85C1235A9BE0}.Release|Any CPU.Build.0 = Release|Any CPU
+		{81642B88-A7A2-4BBB-8EAD-0584C018D370}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
+		{81642B88-A7A2-4BBB-8EAD-0584C018D370}.Debug|Any CPU.Build.0 = Debug|Any CPU
+		{81642B88-A7A2-4BBB-8EAD-0584C018D370}.Release|Any CPU.ActiveCfg = Release|Any CPU
+		{81642B88-A7A2-4BBB-8EAD-0584C018D370}.Release|Any CPU.Build.0 = Release|Any CPU
 	EndGlobalSection
 	GlobalSection(SolutionProperties) = preSolution
 		HideSolutionNode = FALSE
@@ -189,6 +201,8 @@ Global
 		{F9134F40-C6CD-4368-A28E-33E5102FD4AB} = {CF0A8EC3-841F-4A54-B9FC-8D174CCD4A90}
 		{C90E23AF-4B5B-44A7-ADCC-3BF89547395B} = {DA29278E-3808-42DE-8333-964F129F295D}
 		{F2E323CE-FDF3-4A1E-AE97-B723D2E63763} = {C8CB96CF-68A8-4083-A0F8-319275CF8097}
+		{942DD29B-07C0-4ACF-891E-85C1235A9BE0} = {C8CB96CF-68A8-4083-A0F8-319275CF8097}
+		{81642B88-A7A2-4BBB-8EAD-0584C018D370} = {CF0A8EC3-841F-4A54-B9FC-8D174CCD4A90}
 	EndGlobalSection
 	GlobalSection(ExtensibilityGlobals) = postSolution
 		SolutionGuid = {58DF9285-8523-4EAC-B598-BE5B02A76A00}

diff --git a/src/Fable.Cli/Fable.Cli.fsproj b/src/Fable.Cli/Fable.Cli.fsproj
@@ -55,6 +55,7 @@
     <Content Include="Properties\launchSettings.json" />
   </ItemGroup>
   <ItemGroup>
+    <ProjectReference Include="..\Fable.Compiler.Service\Fable.Compiler.Service.fsproj" />
     <ProjectReference Include="..\Fable.Transforms\Fable.Transforms.fsproj" />
     <Reference Include="../../lib/fcs/FSharp.Compiler.Service.dll" />
     <Reference Include="../../lib/fcs/FSharp.DependencyManager.Nuget.dll" />

diff --git a/src/Fable.Cli/Pipeline.fs b/src/Fable.Cli/Pipeline.fs
@@ -118,7 +118,7 @@ module Js =
                     let sourcePath = defaultArg file sourcePath |> Path.getRelativeFileOrDirPath false targetPath false
                     mapGenerator.Force().AddMapping(generated, original, source=sourcePath, ?name=displayName)
 
-    let compileFile (com: Compiler) (cliArgs: CliArgs) pathResolver isSilent (outPath: string) = async {
+    let compileFile (com: Compiler) (cliArgs: CliArgs) (pathResolver: PathResolver) (isSilent: bool) (outPath: string): Async<unit> = async {
         let babel =
             FSharp2Fable.Compiler.transformFile com
             |> FableTransforms.transformFile com

diff --git a/src/Fable.Compiler.Service/Fable.Compiler.Service.fsproj b/src/Fable.Compiler.Service/Fable.Compiler.Service.fsproj
@@ -0,0 +1,33 @@
+<Project Sdk="Microsoft.NET.Sdk">
+
+    <PropertyGroup>
+        <TargetFramework>net6.0</TargetFramework>
+        <GenerateDocumentationFile>true</GenerateDocumentationFile>
+        <DisableImplicitFSharpCoreReference>true</DisableImplicitFSharpCoreReference>
+    </PropertyGroup>
+
+    <ItemGroup>
+        <Compile Include="Util.fsi" />
+        <Compile Include="Util.fs" />
+        <Compile Include="Globbing.fsi" />
+        <Compile Include="Globbing.fs" />
+        <Compile Include="ProjectCracker.fsi" />
+        <Compile Include="ProjectCracker.fs" />
+        <Compile Include="Library.fsi"/>
+        <Compile Include="Library.fs"/>
+    </ItemGroup>
+
+    <ItemGroup>
+        <ProjectReference Include="..\Fable.Transforms\Fable.Transforms.fsproj"/>
+    </ItemGroup>
+
+    <ItemGroup>
+        <Reference Include="../../lib/fcs/FSharp.Core.dll"/>
+        <Reference Include="../../lib/fcs/FSharp.Compiler.Service.dll"/>
+    </ItemGroup>
+
+    <ItemGroup>
+        <PackageReference Include="FSharp.SystemTextJson" Version="1.2.42" />
+    </ItemGroup>
+
+</Project>