Skip to content

Instantly share code, notes, and snippets.

@slang25
Last active July 18, 2019 12:03
Show Gist options
  • Save slang25/90ed87767b62f5c4f43a7b691e98f2ee to your computer and use it in GitHub Desktop.
Save slang25/90ed87767b62f5c4f43a7b691e98f2ee to your computer and use it in GitHub Desktop.
open Microsoft.AspNetCore.Hosting
open Microsoft.Extensions.Hosting
open Giraffe
let webApp = GET >=> route "/" >=> text "Hello world"
[<EntryPoint>]
let main args =
Host.CreateDefaultBuilder(args)
.ConfigureWebHostDefaults(fun webBuilder ->
webBuilder.Configure(fun app ->
app.UseGiraffe(webApp) |> ignore
) |> ignore
).Build().Run()
0
@Krzysztof-Cieslak
Copy link

open Giraffe
open Saturn

let app = application {
    use_router (GET >=> route "/" >=> text "Hello world")
}

[<EntryPoint>]
let main _ =
    run app
    0

;-)

@slang25
Copy link
Author

slang25 commented Jul 1, 2019

Damn! That's hot

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment