Mercurial > urweb

diff src/flat_util.sig @ 28:104d43266b33

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Field sorting for Flat
author Adam Chlipala <adamc@hcoop.net>
date Tue, 10 Jun 2008 16:22:46 -0400
parents 4ab19c19665f
children
line wrap: on
line diff
--- a/src/flat_util.sig	Tue Jun 10 16:05:10 2008 -0400
+++ b/src/flat_util.sig	Tue Jun 10 16:22:46 2008 -0400
@@ -28,6 +28,9 @@
 signature FLAT_UTIL = sig
 
 structure Typ : sig
+    val compare : Flat.typ * Flat.typ -> order
+    val sortFields : (string * Flat.typ) list -> (string * Flat.typ) list
+
     val mapfold : (Flat.typ', 'state, 'abort) Search.mapfolder
                   -> (Flat.typ, 'state, 'abort) Search.mapfolder