diff options
| author |  Adam Chlipala <adam@chlipala.net> | 2017-03-31 17:35:05 -0400 |
|---|---|---|
| committer | Adam Chlipala <adam@chlipala.net> | 2017-03-31 17:35:05 -0400 |
| commit | 680da1afd0b8d2f4b4a6b4ec0ef3bad48d0babde (patch) | |
| tree | 1afb2917fb6891741d056d2fdeae3fd3fe93ed21 /src/elab_env.sig | |
| parent | a478380e74c658637c90436c4e78c894f7076f4c (diff) | |
Fix normalization of signatures that project signatures from other modules with multi-element paths (fixes #72)
Diffstat (limited to 'src/elab_env.sig')
| -rw-r--r-- | src/elab_env.sig | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/elab_env.sig b/src/elab_env.sig index cbc85cdd..47b31c08 100644 --- a/src/elab_env.sig +++ b/src/elab_env.sig @@ -96,6 +96,7 @@ signature ELAB_ENV = sig val pushStrNamed : env -> string -> Elab.sgn -> env * int val pushStrNamedAs : env -> string -> int -> Elab.sgn -> env + val pushStrNamedAs' : bool (* also enrich typeclass instances? *) -> env -> string -> int -> Elab.sgn -> env val lookupStrNamed : env -> int -> string * Elab.sgn val lookupStr : env -> string -> (int * Elab.sgn) option @@ -123,6 +124,4 @@ signature ELAB_ENV = sig val patBinds : env -> Elab.pat -> env val patBindsN : Elab.pat -> int - exception Bad of Elab.con * Elab.con - end |