X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Fsoftware%2Fhelena%2Fsrc%2Fbasic_ag%2FbagUntrusted.mli;h=41188ff21dbcd45900bbe235584c6f061c5bdfbf;hb=2976c347e18717e691825ebdf73a5ce941c57d1b;hp=d9ea418979fd0124dce6e08850a29ea955866a60;hpb=f72311aa07e71090a24eef9e4fb97cc2e95e6b16;p=helm.git

diff --git a/helm/software/helena/src/basic_ag/bagUntrusted.mli b/helm/software/helena/src/basic_ag/bagUntrusted.mli
index d9ea41897..41188ff21 100644
--- a/helm/software/helena/src/basic_ag/bagUntrusted.mli
+++ b/helm/software/helena/src/basic_ag/bagUntrusted.mli
@@ -9,6 +9,10 @@
      \ /   This software is distributed as is, NO WARRANTY.              
       V_______________________________________________________________ *)
 
+IFDEF TYPE THEN
+
 val type_check:
    (Bag.message -> 'a) -> (Bag.term -> Bag.entity -> 'a) ->
-   Status.status -> Bag.entity -> 'a
+   Layer.status -> Bag.entity -> 'a
+
+END