X-Git-Url: http://git.nguyen.vg/gitweb/?p=tatoo.git;a=blobdiff_plain;f=src%2FstateSet.ml;h=c55ff6ee844f9ee77e3e842fe0a578f5867d1c99;hp=2fec234cf385cd692972e2cab177e6271d240586;hb=4f265eb7d78b740292b5543d94f9f0fa40d206d5;hpb=b00bff88c7902e828804c06b7f9dc55222fdc84e diff --git a/src/stateSet.ml b/src/stateSet.ml index 2fec234..c55ff6e 100644 --- a/src/stateSet.ml +++ b/src/stateSet.ml @@ -13,13 +13,9 @@ (* *) (***********************************************************************) -(* - Time-stamp: -*) - open Format -include Ptset.Make (Hcons.PosInt) +include Ptset.Make (State) let print ppf s = fprintf ppf "{ %a }"