X-Git-Url: http://git.nguyen.vg/gitweb/?a=blobdiff_plain;ds=inline;f=src%2FstateSet.ml;fp=src%2FstateSet.ml;h=c55ff6ee844f9ee77e3e842fe0a578f5867d1c99;hb=4f265eb7d78b740292b5543d94f9f0fa40d206d5;hp=47ad460d7642df507300b26cb523a52683a1483b;hpb=31d45495fda9a110fd348f8b492761c28b434ec9;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 }"