This commit is contained in:
Ingy döt Net 2013-10-27 22:24:23 +00:00
parent 6f050a029e
commit 776bba907c
3887 changed files with 59894 additions and 7280 deletions

View file

@ -0,0 +1,6 @@
:- object(foo).
:- public(bar/1).
bar(42).
:- end_object.

View file

@ -0,0 +1,11 @@
:- object(query_foo).
:- public(query/0).
query :-
write('Message: '),
read(Message),
foo::Message.
write('Reply: '),
write(Message), nl.
:- end_object.

View file

@ -0,0 +1,3 @@
| ?- query_foo::query.
Message: bar(X).
Reply: bar(42)