Mercurial > urweb
comparison src/core_util.sig @ 198:ab86aa858e6c
'Option' datatype encoding
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sat, 09 Aug 2008 19:23:31 -0400 |
parents | 8a70e2919e86 |
children | bd9ee9aeca2f |
comparison
equal
deleted
inserted
replaced
197:b1b9bcfd8c42 | 198:ab86aa858e6c |
---|---|
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 | |
31 | 29 |
32 structure Kind : sig | 30 structure Kind : sig |
33 val compare : Core.kind * Core.kind -> order | 31 val compare : Core.kind * Core.kind -> order |
34 | 32 |
35 val mapfold : (Core.kind', 'state, 'abort) Search.mapfolder | 33 val mapfold : (Core.kind', 'state, 'abort) Search.mapfolder |