X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;f=src%2FstateSet.ml;h=c55ff6ee844f9ee77e3e842fe0a578f5867d1c99;hb=fed343e8df1900043dc993ac5458c757d3ac2ee0;hp=47ad460d7642df507300b26cb523a52683a1483b;hpb=cba2938d929fd5119b1491686ddc224d5af618c6;p=tatoo.git

diff --git a/src/stateSet.ml b/src/stateSet.ml
index 47ad460..c55ff6e 100644
--- a/src/stateSet.ml
+++ b/src/stateSet.ml
@@ -15,7 +15,7 @@
 
 open Format
 
-include Ptset.Make (Hcons.PosInt)
+include Ptset.Make (State)
 
 let print ppf s =
   fprintf ppf "{ %a }"