From 744cdbb9e3907db9bb01576750634c614147e1a3 Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Sun, 3 Aug 2008 19:49:21 -0400 Subject: Datatype representation optimization --- src/expl_util.sig | 2 ++ 1 file changed, 2 insertions(+) (limited to 'src/expl_util.sig') diff --git a/src/expl_util.sig b/src/expl_util.sig index 2a6c7abe..d15e7a76 100644 --- a/src/expl_util.sig +++ b/src/expl_util.sig @@ -27,6 +27,8 @@ signature EXPL_UTIL = sig +val classifyDatatype : (string * int * Expl.con option) list -> Expl.datatype_kind + structure Kind : sig val mapfold : (Expl.kind', 'state, 'abort) Search.mapfolder -> (Expl.kind, 'state, 'abort) Search.mapfolder -- cgit v1.2.3