From 54ad5aa4d1842caee3766dc5656144dca212aef5 Mon Sep 17 00:00:00 2001 From: bertot Date: Wed, 3 Mar 2004 11:17:44 +0000 Subject: make sure the implicit argument indications are in the right order git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@5423 85f007b7-540e-0410-9357-904b9bb8a0f7 --- contrib/interface/name_to_ast.ml | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/contrib/interface/name_to_ast.ml b/contrib/interface/name_to_ast.ml index 8443526930..eaff096883 100644 --- a/contrib/interface/name_to_ast.ml +++ b/contrib/interface/name_to_ast.ml @@ -61,8 +61,8 @@ let impl_args_to_string l = let implicit_args_id_to_ast_list id l ast_list = (match impl_args_to_string l with None -> ast_list - | Some(s) -> CommentString ("For " ^ (string_of_id id)):: - CommentString s:: + | Some(s) -> CommentString s:: + CommentString ("For " ^ (string_of_id id)):: ast_list);; (* This function construct an ast to enumerate the implicit positions for an -- cgit v1.2.3