swrup/mte
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

MTE unikernel with Mkernel+Mnet+Vifu

Browse source
This commit is contained in:
swrup 2026-03-11 14:17:52 +01:00 • committed by Swrup
parent 76662bf23c
commit a23e59dfca
31 changed files with 535 additions and 376 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/respond.ml
View file

@ -4,7 +4,7 @@ let encode_error_detail err =
| Ok s -> s
let respond_json req content status =
let open Vif.Response in
let open Vifu.Response in
let open Syntax in
let* () = add ~field:"content-type" "application/json" in
let* () = with_string req content in
@ -32,14 +32,14 @@ let ok content req =
let no_content () =
Logs.debug (fun m -> m "no content");
let open Vif.Response in
let open Vifu.Response in
let open Syntax in
let* () = empty in
respond `No_content
let not_modified () =
Logs.debug (fun m -> m "not modified");
let open Vif.Response in
let open Vifu.Response in
let open Syntax in
let* () = empty in
respond `Not_modified