use connect instead of create

arenadotio · May 3, 2020 · 6079cbe · 6079cbe
1 parent e8c482d
commit 6079cbe
Show file tree

Hide file tree

Showing 3 changed files with 3 additions and 3 deletions.
diff --git a/pgx_lwt_mirage/src/pgx_lwt_mirage.ml b/pgx_lwt_mirage/src/pgx_lwt_mirage.ml
@@ -109,7 +109,7 @@ struct
     ch, ch
   ;;
 
-  let create stack =
+  let connect stack =
     let open_connection = connect_stack stack in
     (module struct
       module T = struct

diff --git a/pgx_lwt_mirage/src/pgx_lwt_mirage.mli b/pgx_lwt_mirage/src/pgx_lwt_mirage.mli
@@ -24,5 +24,5 @@ module Make : functor
   (CLOCK : Mirage_clock.MCLOCK)
   (STACK : Mirage_stack.V4)
   -> sig
-  val create : STACK.t -> (module Pgx_lwt.S.Pgx_impl)
+  val connect : STACK.t -> (module Pgx_lwt.S.Pgx_impl)
 end
diff --git a/unikernel/unikernel.ml b/unikernel/unikernel.ml
@@ -66,7 +66,7 @@ struct
     let user = Key_gen.pguser () in
     let password = Key_gen.pgpassword () in
     let database = Key_gen.pgdatabase () in
-    let pgx = Pgx_mirage.create stack in
+    let pgx = Pgx_mirage.connect stack in
     setup_database ~port ~host ~user ~password ~database pgx ()
     >>= fun () -> print_users (get_users ~port ~host ~user ~password ~database pgx ())
   ;;