From 79d15a2baec54f10ba5114667d3d686982a90bee Mon Sep 17 00:00:00 2001 From: Clombrong Date: Fri, 27 Jun 2025 08:22:57 +0200 Subject: feat(portal): make close a simple stanza --- test/hello.ml | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) (limited to 'test') diff --git a/test/hello.ml b/test/hello.ml index 9b58de1..f9d429b 100644 --- a/test/hello.ml +++ b/test/hello.ml @@ -9,8 +9,7 @@ let program (p : Portal.t) config (features : Stream.features) = | Error (MalformedRequest, Some (_, text)) -> print_endline ("Malformed request: " ^ text) | Error _ -> print_endline "Error!" | Ok _ -> print_endline "Success!" - end; - Portal.close p + end let main = let config : Sasl.auth_config = { -- cgit v1.2.3