Mercurial > urweb
comparison src/elab_env.sig @ 42:b3fbbc6cb1e5
Elaborating 'where'
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Thu, 19 Jun 2008 16:35:40 -0400 |
parents | 02f42e9a1825 |
children | d3cc191cb25f |
comparison
equal
deleted
inserted
replaced
41:1405d8c26790 | 42:b3fbbc6cb1e5 |
---|---|
74 val lookupStr : env -> string -> (int * Elab.sgn) option | 74 val lookupStr : env -> string -> (int * Elab.sgn) option |
75 | 75 |
76 val declBinds : env -> Elab.decl -> env | 76 val declBinds : env -> Elab.decl -> env |
77 val sgiBinds : env -> Elab.sgn_item -> env | 77 val sgiBinds : env -> Elab.sgn_item -> env |
78 | 78 |
79 val hnormSgn : env -> Elab.sgn -> Elab.sgn | |
80 | |
79 val projectCon : env -> { sgn : Elab.sgn, str : Elab.str, field : string } -> (Elab.kind * Elab.con option) option | 81 val projectCon : env -> { sgn : Elab.sgn, str : Elab.str, field : string } -> (Elab.kind * Elab.con option) option |
80 val projectVal : env -> { sgn : Elab.sgn, str : Elab.str, field : string } -> Elab.con option | 82 val projectVal : env -> { sgn : Elab.sgn, str : Elab.str, field : string } -> Elab.con option |
81 val projectStr : env -> { sgn : Elab.sgn, str : Elab.str, field : string } -> Elab.sgn option | 83 val projectStr : env -> { sgn : Elab.sgn, str : Elab.str, field : string } -> Elab.sgn option |
82 | 84 |
83 | |
84 | |
85 end | 85 end |