basics setup

This commit is contained in:
DavidOnTop 2025-06-12 14:37:09 +02:00
parent 71e3ed710d
commit a7a98fa0d0
Signed by: DavidOnTop
GPG key ID: 8D3E9A75E3E13D89
13 changed files with 301 additions and 31 deletions

View file

@ -9,6 +9,7 @@ let run cmd args =
p.StartInfo.UseShellExecute <- false
p.Start() |> ignore
p.WaitForExit()
if p.ExitCode <> 0 then
failwithf "Command '%s %s' failed with exit code %d.\n" cmd args p.ExitCode
@ -23,9 +24,8 @@ if not (System.IO.File.Exists ".restored") then
open Fake.Core
let args =
System.Environment.GetCommandLineArgs()
|> Array.skip 2
let args = System.Environment.GetCommandLineArgs() |> Array.skip 2
args
|> Array.toList
|> Context.FakeExecutionContext.Create false "build.fsx"
@ -36,13 +36,9 @@ args
Target.create "list" (fun _ ->
printfn "\n\n"
Target.listAvailable()
printfn "\n\n"
)
Target.listAvailable ()
printfn "\n\n")
let cmd =
args
|> Array.tryItem 0
|> Option.defaultValue "list"
let cmd = args |> Array.tryItem 0 |> Option.defaultValue "list"
Target.runOrDefaultWithArguments cmd
Target.runOrDefaultWithArguments cmd