From b9406323848c150f5a8562ad206916c446529d65 Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Tue, 17 Jun 2008 16:38:54 -0400 Subject: Elaborating module projection --- src/list_util.sig | 2 ++ 1 file changed, 2 insertions(+) (limited to 'src/list_util.sig') diff --git a/src/list_util.sig b/src/list_util.sig index 62013d25..76d08d23 100644 --- a/src/list_util.sig +++ b/src/list_util.sig @@ -29,6 +29,8 @@ signature LIST_UTIL = sig 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 -- cgit v1.2.3