diogo/yap-6.3
Archived
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

fix singleton warning.

Browse Source
This commit is contained in:
Vitor Santos Costa 2009-10-23 23:54:00 +01:00
parent 78d2960d16
commit 9303efd6d6
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
library/lists.yap
View File

@ -135,7 +135,7 @@ find_nth(N, [_|Tail], Elem) :-
generate_nth(I, I, [Head|_], Head). generate_nth(I, I, [Head|_], Head).
generate_nth(I, IN, [E|List], El) :- generate_nth(I, IN, [_|List], El) :-
I1 is I+1, I1 is I+1,
generate_nth(I1, IN, List, El). generate_nth(I1, IN, List, El).