diff options
author | Adam Chlipala <adam@chlipala.net> | 2012-04-29 13:17:31 -0400 |
---|---|---|
committer | Adam Chlipala <adam@chlipala.net> | 2012-04-29 13:17:31 -0400 |
commit | 05b7d79819dd5f006527bef7679b06868b3e0da7 (patch) | |
tree | 0ecad148d41060d9728486fd61309de6e8cb561e /src/elab_util.sig | |
parent | c5521a5f402e3d5f7c2e9c4a36966df196a70fdd (diff) |
Initial support for reusing elaboration results
Diffstat (limited to 'src/elab_util.sig')
-rw-r--r-- | src/elab_util.sig | 11 |
1 files changed, 10 insertions, 1 deletions
diff --git a/src/elab_util.sig b/src/elab_util.sig index 8a013554..b63d9b7f 100644 --- a/src/elab_util.sig +++ b/src/elab_util.sig @@ -1,4 +1,4 @@ -(* Copyright (c) 2008-2010, Adam Chlipala +(* Copyright (c) 2008-2010, 2012, Adam Chlipala * All rights reserved. * * Redistribution and use in source and binary forms, with or without @@ -229,6 +229,15 @@ structure Decl : sig decl : 'context -> Elab.decl' -> Elab.decl', bind : 'context * binder -> 'context} -> 'context -> Elab.decl -> Elab.decl + + val fold : {kind : Elab.kind' * 'state -> 'state, + con : Elab.con' * 'state -> 'state, + exp : Elab.exp' * 'state -> 'state, + sgn_item : Elab.sgn_item' * 'state -> 'state, + sgn : Elab.sgn' * 'state -> 'state, + str : Elab.str' * 'state -> 'state, + decl : Elab.decl' * 'state -> 'state} + -> 'state -> Elab.decl -> 'state end structure File : sig |