From 3c199388700c523932761c56a423577ef7aee7f2 Mon Sep 17 00:00:00 2001 From: Hugo Herbelin Date: Wed, 22 Oct 2014 17:47:43 +0200 Subject: Pushing Pierre's factorization of names in goal context printing from coqide to coqtop. (Joint work with Pierre) --- kernel/context.mli | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) (limited to 'kernel/context.mli') diff --git a/kernel/context.mli b/kernel/context.mli index b7eb7a76a..e1ff708e7 100644 --- a/kernel/context.mli +++ b/kernel/context.mli @@ -54,7 +54,7 @@ val eq_rel_declaration : type named_context = named_declaration list type section_context = named_context -type compacted_named_context = named_list_declaration list +type named_list_context = named_list_declaration list type rel_context = rel_declaration list (** In [rel_context], more recent declaration is on top *) @@ -74,6 +74,9 @@ val named_context_equal : named_context -> named_context -> bool val fold_named_context : (named_declaration -> 'a -> 'a) -> named_context -> init:'a -> 'a +val fold_named_list_context : + (named_list_declaration -> 'a -> 'a) -> named_list_context -> init:'a -> 'a + (** newer declarations first *) val fold_named_context_reverse : ('a -> named_declaration -> 'a) -> init:'a -> named_context -> 'a -- cgit v1.2.3