eb05d95935
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1162 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
16 lines
216 B
Plaintext
16 lines
216 B
Plaintext
|
|
bar :-
|
|
write('bar predicate called'), nl.
|
|
|
|
|
|
:- object(bypass).
|
|
|
|
:- public(foo//0).
|
|
:- mode(foo, one).
|
|
:- info(foo//0, [
|
|
comment is 'Just the almighty and famous old foo.']).
|
|
|
|
foo --> {{bar}}.
|
|
|
|
:- end_object.
|