cc4531cd1e
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@53 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
26 lines
475 B
Plaintext
26 lines
475 B
Plaintext
|
|
:- category(predicates).
|
|
|
|
|
|
:- public(public/0).
|
|
:- mode(public, one).
|
|
|
|
:- protected(protected/0).
|
|
:- mode(protected, one).
|
|
|
|
:- private(private/0).
|
|
:- mode(private, one).
|
|
|
|
|
|
public :-
|
|
write('Public predicate declared and defined in category predicates.'), nl.
|
|
|
|
protected :-
|
|
write('Protected predicate declared and defined in category predicates.'), nl.
|
|
|
|
private :-
|
|
write('Private predicate declared and defined in category predicates.'), nl.
|
|
|
|
|
|
:- end_category.
|