9f1b358c04
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1486 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
13 lines
281 B
Plaintext
13 lines
281 B
Plaintext
|
|
% conflict between uses/2 directive and a predicate definition
|
|
|
|
:-object(usesconflict).
|
|
|
|
:- uses(list, [member/2]).
|
|
|
|
member(H, [H| _]). % an object (or category) cannot define a
|
|
member(H, [_| T]) :- % predicate referenced on a uses/2 directive
|
|
member(H, T).
|
|
|
|
:- end_object.
|