\ / This software is distributed as is, NO WARRANTY.
V_______________________________________________________________ *)
-val set_entity: (Brg.entity -> 'a) -> Brg.entity -> 'a
+val set_entity: Brg.entity -> Brg.entity
-val get_entity: (unit -> 'a) -> (Brg.entity -> 'a) -> Brg.uri -> 'a
+val get_entity: Brg.uri -> Brg.entity