diff src/elab_util.sig @ 59:abb2b32c19fb

Subsignatures
author Adam Chlipala <adamc@hcoop.net>
date Sun, 22 Jun 2008 19:10:38 -0400
parents 44b5405e74c7
children 522f4bd3955e
line wrap: on
line diff
--- a/src/elab_util.sig	Sun Jun 22 18:17:21 2008 -0400
+++ b/src/elab_util.sig	Sun Jun 22 19:10:38 2008 -0400
@@ -83,6 +83,7 @@
              RelC of string * Elab.kind
            | NamedC of string * Elab.kind
            | Str of string * Elab.sgn
+           | Sgn of string * Elab.sgn
 
     val mapfoldB : {kind : (Elab.kind', 'state, 'abort) Search.mapfolder,
                     con : ('context, Elab.con', 'state, 'abort) Search.mapfolderB,