Self bootstrapping F# script

bootstrap.fsx

open System.Diagnostics

let root = __SOURCE_DIRECTORY__
let debug = false

let exec directory executable arguments =
    let info = 
        ProcessStartInfo(
            executable, arguments,
            UseShellExecute = false, CreateNoWindow = not debug, WorkingDirectory = directory)
    let proc = Process.Start(info)
    proc.WaitForExit()
    match proc.ExitCode with | 0 -> () | c -> failwithf "Execution failed with error code %d" c

let dotnet arguments = exec root "dotnet" arguments

let restore () =
    dotnet "tool restore"
    dotnet "tool run paket install"
    dotnet "tool run paket generate-load-scripts"

restore ()

dotnet-tools.json

{
  "version": 1,
  "isRoot": true,
  "tools": {
    "paket": {
      "version": "5.255.0",
      "commands": [
        "paket"
      ]
    }
  }
}

paket.dependencies

source https://nuget.org/api/v2

storage none
framework netcoreapp31

nuget Newtonsoft.Json

test.cmd

@dotnet fsi "%~dp0\test.fsx" %*

test.fsx

#load "bootstrap.fsx"
#load "./.paket/load/main.group.fsx"

open System
open Newtonsoft.Json

printfn "%A" fsi.CommandLineArgs

{| 
    Text = "Greetings from paket powered fsx bootstrapper"
    Timestamp = DateTime.Now 
|}
|> JsonConvert.SerializeObject
|> printfn "%s"