From 3e5ba8bb1188e9c0f59c04bd0e8fa7c9ff5bc52b Mon Sep 17 00:00:00 2001 From: Gaëtan Gilbert Date: Sat, 4 Nov 2017 15:59:31 +0100 Subject: Finish removing Show Goal uid Syntax removed in faa064c746e20a12b3c8f792f69537b18e387be6 --- proofs/goal.ml | 1 - proofs/goal.mli | 3 --- 2 files changed, 4 deletions(-) (limited to 'proofs') diff --git a/proofs/goal.ml b/proofs/goal.ml index 7d830146f..61f3e4a02 100644 --- a/proofs/goal.ml +++ b/proofs/goal.ml @@ -21,7 +21,6 @@ type goal = Evd.evar let pr_goal e = str "GOAL:" ++ Pp.int (Evar.repr e) let uid e = string_of_int (Evar.repr e) -let get_by_uid u = Evar.unsafe_of_int (int_of_string u) (* Layer to implement v8.2 tactic engine ontop of the new architecture. Types are different from what they used to be due to a change of the diff --git a/proofs/goal.mli b/proofs/goal.mli index 6d3ec8bd4..ad968cdfb 100644 --- a/proofs/goal.mli +++ b/proofs/goal.mli @@ -15,9 +15,6 @@ type goal = Evar.t (* Gives a unique identifier to each goal. The identifier is guaranteed to contain no space. *) val uid : goal -> string -(* Returns the goal (even if it has been partially solved) - corresponding to a unique identifier obtained by {!uid}. *) -val get_by_uid : string -> goal (* Debugging help *) val pr_goal : goal -> Pp.t -- cgit v1.2.3