comparison src/core_util.sig @ 1185:338be96f8533

Undo an Especialize change that turned out to be unecessary
author Adam Chlipala <adamc@hcoop.net>
date Tue, 16 Mar 2010 10:09:01 -0400
parents 54ec237a3028
children
comparison
equal deleted inserted replaced
1184:d6f0e972b706 1185:338be96f8533
71 con : Core.con' * 'state -> 'state} 71 con : Core.con' * 'state -> 'state}
72 -> 'state -> Core.con -> 'state 72 -> 'state -> Core.con -> 'state
73 73
74 val exists : {kind : Core.kind' -> bool, 74 val exists : {kind : Core.kind' -> bool,
75 con : Core.con' -> bool} -> Core.con -> bool 75 con : Core.con' -> bool} -> Core.con -> bool
76
77 val existsB : {kind : 'context * Core.kind' -> bool,
78 con : 'context * Core.con' -> bool,
79 bind : 'context * binder -> 'context}
80 -> 'context -> Core.con -> bool
76 81
77 val foldMap : {kind : Core.kind' * 'state -> Core.kind' * 'state, 82 val foldMap : {kind : Core.kind' * 'state -> Core.kind' * 'state,
78 con : Core.con' * 'state -> Core.con' * 'state} 83 con : Core.con' * 'state -> Core.con' * 'state}
79 -> 'state -> Core.con -> Core.con * 'state 84 -> 'state -> Core.con -> Core.con * 'state
80 end 85 end