Mercurial > urweb
diff src/list_util.sig @ 6:38bf996e1c2e
Check for leftover kind unifs
author | Adam Chlipala <adamc@hcoop.net> |
---|---|
date | Sat, 26 Jan 2008 16:44:39 -0500 |
parents | 258261a53842 |
children | bfa2e9ae4df8 |
line wrap: on
line diff
--- a/src/list_util.sig Sat Jan 26 16:02:47 2008 -0500 +++ b/src/list_util.sig Sat Jan 26 16:44:39 2008 -0500 @@ -30,4 +30,7 @@ val mapfoldl : ('data1 * 'state -> 'state * 'data2) -> 'state -> 'data1 list -> 'state * 'data2 list + val mapfold : ('data, 'state, 'abort) Search.mapfolder + -> ('data list, 'state, 'abort) Search.mapfolder + end