From 4e724634839726aa11534f16e4bfb95cd81232a4 Mon Sep 17 00:00:00 2001 From: Enrico Tassi Date: Wed, 23 Jul 2014 11:54:36 +0200 Subject: STM: code restructured to reuse task queue for tactics --- lib/system.mli | 3 +++ 1 file changed, 3 insertions(+) (limited to 'lib/system.mli') diff --git a/lib/system.mli b/lib/system.mli index 9cfb1456f..0569c7889 100644 --- a/lib/system.mli +++ b/lib/system.mli @@ -69,3 +69,6 @@ val time_difference : time -> time -> float (** in seconds *) val fmt_time_difference : time -> time -> Pp.std_ppcmds val with_time : bool -> ('a -> 'b) -> 'a -> 'b + +(** {6 Name of current process.} *) +val process_id : unit -> string -- cgit v1.2.3