Mercurial > urweb
comparison src/core_util.sig @ 188:8e9f97508f0d
Datatype representation optimization
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sun, 03 Aug 2008 19:49:21 -0400 |
parents | 3bbed533fbd2 |
children | 8a70e2919e86 |
comparison
equal
deleted
inserted
replaced
187:fb6ed259f5bd | 188:8e9f97508f0d |
---|---|
24 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE | 24 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE |
25 * POSSIBILITY OF SUCH DAMAGE. | 25 * POSSIBILITY OF SUCH DAMAGE. |
26 *) | 26 *) |
27 | 27 |
28 signature CORE_UTIL = sig | 28 signature CORE_UTIL = sig |
29 | |
30 val classifyDatatype : (string * int * Core.con option) list -> Core.datatype_kind | |
29 | 31 |
30 structure Kind : sig | 32 structure Kind : sig |
31 val mapfold : (Core.kind', 'state, 'abort) Search.mapfolder | 33 val mapfold : (Core.kind', 'state, 'abort) Search.mapfolder |
32 -> (Core.kind, 'state, 'abort) Search.mapfolder | 34 -> (Core.kind, 'state, 'abort) Search.mapfolder |
33 val map : (Core.kind' -> Core.kind') -> Core.kind -> Core.kind | 35 val map : (Core.kind' -> Core.kind') -> Core.kind -> Core.kind |