basic_rg: reduction was not tail recursive by mistake

[helm.git] / helm / software / lambda-delta / basic_rg / brgEnvironment.mli

diff --git a/helm/software/lambda-delta/basic_rg/brgEnvironment.mli b/helm/software/lambda-delta/basic_rg/brgEnvironment.mli
index a6fec6db08fe90625c05ce0625da5c8c53d36445..1f51f1e61e32f1860e5229eaccc728ba30d08852 100644 (file)
--- a/helm/software/lambda-delta/basic_rg/brgEnvironment.mli
+++ b/helm/software/lambda-delta/basic_rg/brgEnvironment.mli
@@ -9,8 +9,6 @@
      \ /   This software is distributed as is, NO WARRANTY.              
       V_______________________________________________________________ *)
 
-exception ObjectNotFound of string Lazy.t
+val set_entity: Brg.entity -> Brg.entity
 
-val set_obj: (Brg.obj -> NUri.uri -> 'a) -> Brg.obj -> NUri.uri -> 'a
-
-val get_obj: (Brg.obj -> NUri.uri -> 'a) -> NUri.uri -> 'a
+val get_entity: Brg.uri -> Brg.entity