vif/examples/01-hello/main.ml

#require "vif" ;;

open Vif ;;

let default req _server () =
  let* () = Response.with_string req "Hello World!\n" in
  Response.respond `OK
;;

let routes =
  let open Vif.U in
  let open Vif.R in
  let open Vif.Content_type in
  [ get (rel /?? nil) --> default ]
;;

let () = Miou_unix.run @@ fun () ->
  Vif.run routes () ;;
Add few examples about vif 2025-02-01 15:54:10 +00:00			`#require "vif" ;;`

Implement cookie (not tested) 2025-02-13 16:17:00 +00:00			`open Vif ;;`

Add static handler 2025-02-18 18:25:30 +00:00			`let default req _server () =`
Implement cookie (not tested) 2025-02-13 16:17:00 +00:00			`let* () = Response.with_string req "Hello World!\n" in`
			Response.respond `OK
Add few examples about vif 2025-02-01 15:54:10 +00:00			`;;`

Add static handler 2025-02-18 18:25:30 +00:00			`let routes =`
			`let open Vif.U in`
			`let open Vif.R in`
			`let open Vif.Content_type in`
			`[ get (rel /?? nil) --> default ]`
			`;;`

User a better API for streaming 2025-02-08 15:37:56 +00:00			`let () = Miou_unix.run @@ fun () ->`
Add static handler 2025-02-18 18:25:30 +00:00			`Vif.run routes () ;;`