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