wip: state server side; websocket

src/dune

@@ -14,7 +14,8 @@
   syntax
   template
   tyx_util
-  user)
+  user
+  ws)
  (libraries
   bos
   caqti
@@ -23,6 +24,7 @@
   directories
   dream
   emile
+  shared
   fpath
   lambdasoup
   lwt
@@ -37,10 +39,15 @@
 
 (executable
  (name island_client)
- (modules island_client)
- (libraries js_of_ocaml brr)
+ (modules island_client ws_client)
+ (libraries js_of_ocaml brr shared)
  (modes js))
 
+(library
+ (name shared)
+ (modules map network state)
+ (libraries))
+
 (rule
  (target content.ml)
  (deps