From 98e20d5bc1250bf83940b7b9ea7b049e7834abfb Mon Sep 17 00:00:00 2001 From: herbelin Date: Sat, 6 Sep 2003 19:14:19 +0000 Subject: Mise en place possibilité de définitions locales dans les paramètres des records git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@4322 85f007b7-540e-0410-9357-904b9bb8a0f7 --- contrib/interface/xlate.ml | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) (limited to 'contrib/interface') diff --git a/contrib/interface/xlate.ml b/contrib/interface/xlate.ml index 72cf41ad45..3e4d486a8f 100644 --- a/contrib/interface/xlate.ml +++ b/contrib/interface/xlate.ml @@ -1508,7 +1508,8 @@ let xlate_vernac = CT_record ((if add_coercion then CT_coercion_atm else CT_coerce_NONE_to_COERCION_OPT(CT_none)), - xlate_ident s, cvt_vernac_binders binders, xlate_sort c1, record_constructor, + xlate_ident s, xlate_binder_list binders, + xlate_sort c1, record_constructor, build_record_field_list field_list) | VernacRecord _ -> xlate_error "TODO: Record in a defined sort" -- cgit v1.2.3