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=c9b0b7c4d4316a34fe1256528355dc48c034c6dd;hpb=bbc1c6ccb596693c46f4d75d7875b94c79f1d575;p=helm.git

diff --git a/helm/software/helena/src/basic_ag/bagUntrusted.mli b/helm/software/helena/src/basic_ag/bagUntrusted.mli
index c9b0b7c4d..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) ->
    Layer.status -> Bag.entity -> 'a
+
+END