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

Logtalk 2.30.2 files.

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1908 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
pmoura
2007-06-24 13:27:35 +00:00
parent 628bcbeeb6
commit 9fc2c47d53
261 changed files with 675 additions and 1035 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Logtalk/examples/threads/blackboard/NOTES.txt
View File

@@ -1,6 +1,6 @@
================================================================
Logtalk - Open source object-oriented logic programming language
Release 2.30.1
Release 2.30.2
Copyright (c) 1998-2007 Paulo Moura. All Rights Reserved.
================================================================

2
Logtalk/examples/threads/blackboard/SCRIPT.txt
View File

@@ -1,6 +1,6 @@
================================================================
Logtalk - Open source object-oriented logic programming language
Release 2.30.1
Release 2.30.2
Copyright (c) 1998-2007 Paulo Moura. All Rights Reserved.
================================================================

6
Logtalk/examples/threads/blackboard/blackboard.lgt
View File

@@ -1,6 +1,6 @@
:- category(using). % we can call the threaded_wait/1 and threaded_notify/1 predicates from category
% predicates; the importing object threads are used for exchanging notifications
% predicates; the importing object message queues are used for exchanging notifications
:- public([pick_up/0, release/0]).
pick_up :-
@@ -15,7 +15,7 @@
:- object(chalk,
imports(using)).
:- threaded. % the chalk's thread is used for exchanging notifications
:- threaded. % the chalk's message queue is used for exchanging notifications
:- initialization(::release). % make the chalk initially available
:- end_object.
@@ -24,7 +24,7 @@
:- object(eraser,
imports(using)).
:- threaded. % the eraser's thread is used for exchanging notifications
:- threaded. % the eraser's message queue is used for exchanging notifications
:- initialization(::release). % make the eraser initially available
:- end_object.