diff options
Diffstat (limited to 'pkgs/applications/science/logic/matita/130312.patch')
-rw-r--r-- | pkgs/applications/science/logic/matita/130312.patch | 42 |
1 files changed, 0 insertions, 42 deletions
diff --git a/pkgs/applications/science/logic/matita/130312.patch b/pkgs/applications/science/logic/matita/130312.patch deleted file mode 100644 index 4596f7fde2e0..000000000000 --- a/pkgs/applications/science/logic/matita/130312.patch +++ /dev/null @@ -1,42 +0,0 @@ ---- matita/components/content_pres/cicNotationParser.ml 2012-03-25 15:47:03.144583445 -0400 -+++ matita/components/content_pres/cicNotationParser.ml 2012-03-25 15:48:30.776209560 -0400 -@@ -209,8 +209,8 @@ - match magic with - | Ast.List0 (_, None) -> Gramext.Slist0 s - | Ast.List1 (_, None) -> Gramext.Slist1 s -- | Ast.List0 (_, Some l) -> Gramext.Slist0sep (s, gram_of_literal l, false) -- | Ast.List1 (_, Some l) -> Gramext.Slist1sep (s, gram_of_literal l, false) -+ | Ast.List0 (_, Some l) -> Gramext.Slist0sep (s, gram_of_literal l) -+ | Ast.List1 (_, Some l) -> Gramext.Slist1sep (s, gram_of_literal l) - | _ -> assert false - in - [ Env (List.map Env.list_declaration p_names), ---- matita/components/grafite_parser/print_grammar.ml 2012-03-25 15:47:03.123583779 -0400 -+++ matita/components/grafite_parser/print_grammar.ml 2012-03-25 15:49:43.900079528 -0400 -@@ -87,7 +87,7 @@ - | Smeta (_, lt, _) -> List.for_all is_symbol_dummy lt - | Snterm e | Snterml (e, _) -> is_entry_dummy e - | Slist1 x | Slist0 x -> is_symbol_dummy x -- | Slist1sep (x,y,false) | Slist0sep (x,y,false) -> is_symbol_dummy x && is_symbol_dummy y -+ | Slist1sep (x,y) | Slist0sep (x,y) -> is_symbol_dummy x && is_symbol_dummy y - | Sopt x -> is_symbol_dummy x - | Sself | Snext -> false - | Stree t -> is_tree_dummy t -@@ -186,7 +186,7 @@ - let todo = visit_symbol symbol todo is_son in - Format.fprintf fmt "@]} @ "; - todo -- | Slist0sep (symbol,sep,false) -> -+ | Slist0sep (symbol,sep) -> - Format.fprintf fmt "[@[<hov2> "; - let todo = visit_symbol symbol todo is_son in - Format.fprintf fmt "{@[<hov2> "; -@@ -200,7 +200,7 @@ - let todo = visit_symbol symbol todo is_son in - Format.fprintf fmt "@]}+ @ "; - todo -- | Slist1sep (symbol,sep,false) -> -+ | Slist1sep (symbol,sep) -> - let todo = visit_symbol symbol todo is_son in - Format.fprintf fmt "{@[<hov2> "; - let todo = visit_symbol sep todo is_son in |