Mercurial > urweb
diff src/list_util.sig @ 313:e0ed0d4dabc9
Termination checking
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Tue, 09 Sep 2008 11:46:33 -0400 |
parents | 73456bfde988 |
children | d20d6afc1206 |
line wrap: on
line diff
--- a/src/list_util.sig Tue Sep 09 09:15:00 2008 -0400 +++ b/src/list_util.sig Tue Sep 09 11:46:33 2008 -0400 @@ -44,4 +44,6 @@ val foldli : (int * 'a * 'b -> 'b) -> 'b -> 'a list -> 'b val foldri : (int * 'a * 'b -> 'b) -> 'b -> 'a list -> 'b + val foldliMap : (int * 'data1 * 'state -> 'data2 * 'state) -> 'state -> 'data1 list -> 'data2 list * 'state + end