From c5a4aba58f973898ebc9af5176753c7962bddb3c Mon Sep 17 00:00:00 2001
From: Pierre-Marie Pédrot <pierre-marie.pedrot@inria.fr>
Date: Sat, 9 Aug 2014 18:24:30 +0200
Subject: Adding a primitive to merge ContextSets which is more efficient when
 one of the argument is smaller than the other one.

---
 kernel/univ.mli | 5 +++++
 1 file changed, 5 insertions(+)

(limited to 'kernel/univ.mli')

diff --git a/kernel/univ.mli b/kernel/univ.mli
index 3779c055d..c9b7547f2 100644
--- a/kernel/univ.mli
+++ b/kernel/univ.mli
@@ -339,6 +339,11 @@ sig
   val of_set : universe_set -> t
 
   val union : t -> t -> t
+
+  val append : t -> t -> t
+  (** Variant of {!union} which is more efficient when the left argument is
+      much smaller than the right one. *)
+
   val diff : t -> t -> t
   val add_universe : universe_level -> t -> t
   val add_constraints : constraints -> t -> t
-- 
cgit v1.2.3