···99 in
1010 Gvecdb.load_all_schemas db;
1111 Switch.run @@ fun sw ->
1212- let service_id = Capnp_rpc_unix.Vat_config.derived_id config "main" in
1312 let service = Gvecdb_rpc.Gvecdb_service.local db in
1313+ let service_id =
1414+ Capnp_rpc_net.Restorer.Id.public "" in
1415 let restore = Capnp_rpc_net.Restorer.single service_id service in
1516 let vat = Capnp_rpc_unix.serve ~sw ~restore config in
1617 (match Capnp_rpc_unix.Cap_file.save_service vat service_id "gvecdb.cap" with
1718 | Error (`Msg m) -> traceln "Warning: could not save cap file: %s" m
1819 | Ok () -> traceln "Saved capability to gvecdb.cap");
1919- let uri = Vat.sturdy_uri vat service_id in
2020- traceln "gvecdb server running at:@.%a" Uri.pp_hum uri;
2020+ traceln "gvecdb server running";
2121 traceln "Database: %s" db_path;
2222 Fiber.await_cancel ()
2323