aboutsummaryrefslogtreecommitdiff
path: root/proofs
diff options
context:
space:
mode:
authorfilliatr2000-05-02 20:49:25 +0000
committerfilliatr2000-05-02 20:49:25 +0000
commit5b0f516e7e1f6d2ea8ca0485ffe347a613b01a5c (patch)
treebf106a29e38172fcbd0ee48bc4531c07d46ff5aa /proofs
parent1555e5a4cf7c2662d31d7875f7cc217150b49f4c (diff)
portage Omega (mais toujours pas Zpower et Zlogarithm)
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@400 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'proofs')
-rw-r--r--proofs/tacmach.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/proofs/tacmach.ml b/proofs/tacmach.ml
index b0880065ad..9191522dc3 100644
--- a/proofs/tacmach.ml
+++ b/proofs/tacmach.ml
@@ -78,6 +78,7 @@ let pf_interp_type gls c =
Astterm.interp_type evc (sig_it gls).evar_env c
let pf_global gls id = Declare.construct_reference (sig_it gls).evar_env CCI id
+
let pf_parse_const gls = compose (pf_global gls) id_of_string
let pf_execute gls =