Skip to content

Commit

Permalink
Remove ported code from build.fsx
Browse files Browse the repository at this point in the history
  • Loading branch information
Maxime Mangel committed Sep 28, 2023
1 parent de634d4 commit ee3bd56
Showing 1 changed file with 0 additions and 38 deletions.
38 changes: 0 additions & 38 deletions build copy.fsx
Original file line number Diff line number Diff line change
Expand Up @@ -344,40 +344,6 @@ let githubRelease() =
printfn $"Github release failed: %s{ex.Message}"
| _ -> failwith "Expecting GITHUB_USER and GITHUB_TOKEN enviromental variables"

let packages() =
["Fable.AST", doNothing
"Fable.Core", doNothing
"Fable.Cli", (fun () ->
// TODO: Add library versions for other languages
let compilerVersion = Publish.loadReleaseVersion "src/Fable.Cli"
let updatedLibs = updateVersionsInFableTransforms compilerVersion [
"js", getNpmVersion "src/fable-library"
]
// buildLibraryTs()
// buildLibraryPy()
// buildLibraryRust()
// buildLibraryDart true
if updatedLibs.Contains("js") then
pushNpmWithoutReleaseNotesCheck "build/fable-library"
)
"Fable.PublishUtils", doNothing
"fable-metadata", doNothing
"fable-standalone", fun () -> buildStandalone {|minify=true; watch=false|}
"fable-compiler-js", fun () -> buildCompilerJs true
]

let publishPackages restArgs =
let packages =
match List.tryHead restArgs with
| Some pkg -> packages() |> List.filter (fun (name,_) -> name = pkg)
| None -> packages()
for (pkg, buildAction) in packages do
if Char.IsUpper pkg[0] then
let projFile = "src" </> pkg </> pkg + ".fsproj"
pushFableNuget projFile ["Pack", "true"] buildAction
else
pushNpm ("src" </> pkg) buildAction

let hasFlag flag =
BUILD_ARGS_LOWER |> List.contains flag

Expand All @@ -388,9 +354,6 @@ match BUILD_ARGS_LOWER with
// |> List.singleton |> quicktest
// | "coverage"::_ -> coverage()

| "test-standalone"::_ ->
let minify = hasFlag "--no-minify" |> not
testStandalone(minify)
// | "test-standalone-fast"::_ -> testStandaloneFast()
| "test-repos"::_ -> testRepos()

Expand All @@ -413,7 +376,6 @@ match BUILD_ARGS_LOWER with
buildWorker {|minify=minify; watch=false|}
| "watch-standalone"::_ -> buildStandalone {|minify=false; watch=true|}

| "publish"::restArgs -> publishPackages restArgs
| "github-release"::_ ->
publishPackages []
githubRelease ()
Expand Down

0 comments on commit ee3bd56

Please sign in to comment.