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 8f9f8b1b070b8b4062947f2dfbb0f9394c0e34a3..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 Brg.message
+val set_entity: Brg.entity -> Brg.entity
 
-val set_obj: (Brg.obj -> 'a) -> Brg.obj -> 'a
-
-val get_obj: (Brg.obj -> 'a) -> NUri.uri -> 'a
+val get_entity: Brg.uri -> Brg.entity