diff options
| author | letouzey | 2013-02-26 18:52:05 +0000 |
|---|---|---|
| committer | letouzey | 2013-02-26 18:52:05 +0000 |
| commit | 7dd28b4772251af6ae3641ec63a8251153915e21 (patch) | |
| tree | d11220b4ff19473215d77e9738d2a4eb58bf681d /plugins/extraction/common.ml | |
| parent | 2b09b02c136d3d68fa19e4493d5b5ad28c4f16db (diff) | |
Names: shortcuts for building {kn, constant, mind} with empty sections
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@16249 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'plugins/extraction/common.ml')
| -rw-r--r-- | plugins/extraction/common.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/plugins/extraction/common.ml b/plugins/extraction/common.ml index 073f774039..86ea93294b 100644 --- a/plugins/extraction/common.ml +++ b/plugins/extraction/common.ml @@ -584,7 +584,7 @@ let pp_module mp = the constants are directly turned into chars *) let mk_ind path s = - make_mind (MPfile (dirpath_of_string path)) DirPath.empty (Label.make s) + MutInd.make2 (MPfile (dirpath_of_string path)) (Label.make s) let ind_ascii = mk_ind "Coq.Strings.Ascii" "ascii" |