comparison 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
comparison
equal deleted inserted replaced
5:258261a53842 6:38bf996e1c2e
28 signature LIST_UTIL = sig 28 signature LIST_UTIL = sig
29 29
30 val mapfoldl : ('data1 * 'state -> 'state * 'data2) -> 'state -> 'data1 list 30 val mapfoldl : ('data1 * 'state -> 'state * 'data2) -> 'state -> 'data1 list
31 -> 'state * 'data2 list 31 -> 'state * 'data2 list
32 32
33 val mapfold : ('data, 'state, 'abort) Search.mapfolder
34 -> ('data list, 'state, 'abort) Search.mapfolder
35
33 end 36 end