diff options
| author | filliatr | 1999-12-08 15:15:47 +0000 |
|---|---|---|
| committer | filliatr | 1999-12-08 15:15:47 +0000 |
| commit | c4dccc430e10b784e65b5bf3330c55d658d2883d (patch) | |
| tree | 42afd0f7ff5f3c2079f65597fe15f46a1b830203 /toplevel/class.ml | |
| parent | b3e6d156fbc13ae6d79075265fc20f8912c520da (diff) | |
deplacement de Discharge dans toplevel
git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@222 85f007b7-540e-0410-9357-904b9bb8a0f7
Diffstat (limited to 'toplevel/class.ml')
| -rw-r--r-- | toplevel/class.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/toplevel/class.ml b/toplevel/class.ml index 35e8e5b87a..d4cd6fec6c 100644 --- a/toplevel/class.ml +++ b/toplevel/class.ml @@ -290,7 +290,7 @@ let build_id_coercion idf_opt ids = (string_of_cl (fst (constructor_at_head t)))) in let constr_entry = {const_entry_body = constr_f; const_entry_type = None } in - declare_constant idf (constr_entry,NeverDischarge,false); + declare_constant idf (constr_entry,NeverDischarge); idf let coercion_syntax_entry id n = |