some interfaces improved

[helm.git] / helm / software / lambda-delta / basic_ag / bagOutput.mli

diff --git a/helm/software/lambda-delta/basic_ag/bagOutput.mli b/helm/software/lambda-delta/basic_ag/bagOutput.mli
index 58c63f110b5fd57575c9da604e39603b531df80e..f3761ac1abdc69ac839641a3d950646274ceaeb7 100644 (file)
--- a/helm/software/lambda-delta/basic_ag/bagOutput.mli
+++ b/helm/software/lambda-delta/basic_ag/bagOutput.mli
@@ -13,7 +13,7 @@ type counters
 
 val initial_counters: counters
 
-val count_item: (counters -> 'a) -> counters -> Bag.item -> 'a
+val count_unit: (counters -> 'a) -> counters -> Bag.unit -> 'a
 
 val print_counters: (unit -> 'a) -> counters -> 'a