diff options
| author | letouzey | 2012-05-29 11:08:17 +0000 |
|---|---|---|
| committer | letouzey | 2012-05-29 11:08:17 +0000 |
| commit | 69929de6eccf6d60886ea0795376e9288863fc1f (patch) | |
| tree | 0c63bd8295976a7f7dd2a996bfb748ef30196e66 /parsing | |
| parent | 442feb2c07f8f5824e814bba504f02c2742637e2 (diff) | |
Decl_kinds becomes a pure mli file, remaining ops in new file kindops.ml
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@15368 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'parsing')
| -rw-r--r-- | parsing/ppvernac.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/parsing/ppvernac.ml b/parsing/ppvernac.ml index 0852f846ac..9f0cc4c031 100644 --- a/parsing/ppvernac.ml +++ b/parsing/ppvernac.ml @@ -360,7 +360,7 @@ let pr_ne_params_list pr_c l = prlist_with_sep pr_semicolon (pr_params pr_c) *) -let pr_thm_token k = str (string_of_theorem_kind k) +let pr_thm_token k = str (Kindops.string_of_theorem_kind k) let pr_syntax_modifier = function | SetItemLevel (l,NextLevel) -> @@ -532,7 +532,7 @@ let rec pr_vernac = function (* Gallina *) | VernacDefinition (d,id,b,f) -> (* A verifier... *) - let pr_def_token dk = str (string_of_definition_kind dk) in + let pr_def_token dk = str (Kindops.string_of_definition_kind dk) in let pr_reduce = function | None -> mt() | Some r -> |