Mercurial > urweb
diff src/list_util.sig @ 34:44b5405e74c7
Elaborating module projection
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Tue, 17 Jun 2008 16:38:54 -0400 |
parents | 1c91c5e6840f |
children | 02f42e9a1825 |
line wrap: on
line diff
--- a/src/list_util.sig Thu Jun 12 17:41:32 2008 -0400 +++ b/src/list_util.sig Tue Jun 17 16:38:54 2008 -0400 @@ -29,6 +29,8 @@ val mapfold : ('data, 'state, 'abort) Search.mapfolder -> ('data list, 'state, 'abort) Search.mapfolder + val mapfoldB : ('context * 'data -> 'context * ('state -> ('data * 'state, 'abort) Search.result)) + -> ('context, 'data list, 'state, 'abort) Search.mapfolderB val foldlMap : ('data1 * 'state -> 'data2 * 'state) -> 'state -> 'data1 list -> 'data2 list * 'state