Last active
July 18, 2019 12:03
-
-
Save slang25/90ed87767b62f5c4f43a7b691e98f2ee to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
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 |
๐ Nice spot, left that in from copying the C# equivalent.
open Giraffe
open Saturn
let app = application {
use_router (GET >=> route "/" >=> text "Hello world")
}
[<EntryPoint>]
let main _ =
run app
0
;-)
Damn! That's hot
Sign up for free
to join this conversation on GitHub.
Already have an account?
Sign in to comment
You can save two characters by omitting the semicolons at the end of the first two lines! ๐