1 files changed, 0 insertions, 48 deletions
diff --git a/dev-lang/yap/files/yap-6.0.4-chr-sublist.patch b/dev-lang/yap/files/yap-6.0.4-chr-sublist.patch
deleted file mode 100644
index 84795b4d18ba..000000000000
--- a/dev-lang/yap/files/yap-6.0.4-chr-sublist.patch
+++ /dev/null
@@ -1,48 +0,0 @@
---- yap-6.0.4.orig/library/dialect/hprolog.yap	2010-05-01 04:53:07.000000000 +1200
-+++ yap-6.0.4/library/dialect/hprolog.yap	2010-05-16 09:10:46.000000000 +1200
-@@ -38,7 +38,7 @@
- 	    split_at/4,			% +N, +List, -FirstElements, -LastElements
- 	    max_go_list/2,		% +List, -Max
- 	    or_list/2,			% +ListOfInts, -BitwiseOr
--	    sublist/2,			% ?Sublist, +List
-+	    chr_sublist/2,			% ?Sublist, +List
- 	    bounded_sublist/3,		% ?Sublist, +List, +Bound
- 	    chr_delete/3,
- 	    init_store/2,
-@@ -55,9 +55,9 @@
- %	    lookup_ht1/4
- 	  ]).
- 
--:- reexport('../lists',[sublist/2]).
-+%:- reexport('../lists',[sublist/2]).
- 
--%:- use_module(library(lists)).
-+:- use_module(library(lists)).
- :- use_module(library(assoc)).
- 
- /** <module> hProlog compatibility library
-@@ -213,15 +213,15 @@
- %
- %	True if all elements of Sub appear in List in the same order.
- 
--%sublist(L, L).
--%sublist(Sub, [H|T]) :-
--%	'$sublist1'(T, H, Sub).
--
--%'$sublist1'(Sub, _, Sub).
--%'$sublist1'([H|T], _, Sub) :-
--%	'$sublist1'(T, H, Sub).
--%'$sublist1'([H|T], X, [X|Sub]) :-
--%	'$sublist1'(T, H, Sub).
-+chr_sublist(L, L).
-+chr_sublist(Sub, [H|T]) :-
-+	'$sublist1'(T, H, Sub).
-+
-+'$sublist1'(Sub, _, Sub).
-+'$sublist1'([H|T], _, Sub) :-
-+	'$sublist1'(T, H, Sub).
-+'$sublist1'([H|T], X, [X|Sub]) :-
-+	'$sublist1'(T, H, Sub).
- 
- %%	bounded_sublist(?Sub, +List, +Bound:integer)
- %