expoe global_ev

src/picos/global_ev.ml

@@ -1,4 +1,4 @@
-(** Global loop *)
+(** Global loop. *)
 
 open Common_
 

src/picos/nanoev_picos.ml

@@ -1,6 +1,7 @@
 module Background_thread = Background_thread
 module Base = Base
 include Base
+module Global_ev = Global_ev
 module IO_in = IO_in
 module IO_out = IO_out
 module Net_client = Net_client

src/picos/nanoev_picos.mli

@@ -1,6 +1,7 @@
 (** Basic interface with picos *)
 
 module Background_thread = Background_thread
+module Global_ev = Global_ev
 
 (** {2 Non blocking IO primitives} *)