From f9f808fd7044592a7d4c520c77f43e87ba245cae Mon Sep 17 00:00:00 2001
From: filliatr
Date: Mon, 26 Feb 2001 08:34:36 +0000
Subject: export open_trapping_failure pour contrib/extraction

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@1401 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 lib/system.mli | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'lib')

diff --git a/lib/system.mli b/lib/system.mli
index a91562cea9..a9ffd5b63e 100644
--- a/lib/system.mli
+++ b/lib/system.mli
@@ -42,6 +42,8 @@ val raw_extern_intern : int -> string ->
 val extern_intern : 
   int -> string -> (string -> 'a -> unit) * (load_path -> string -> 'a)
 
+val open_trapping_failure : (string -> 'a) -> string -> string -> 'a
+
 (*s Time stamps. *)
 
 type time
-- 
cgit v1.2.3