|
Revision 3986, 0.8 KB
(checked in by pmoura, 13 months ago)
|
|
Updated the release number to 2.31.1.
|
-
Property svn:eol-style set to
native
-
Property svn:keywords set to
Author Date Id Revision
|
| Line | |
|---|
| 1 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
|---|
| 2 | % |
|---|
| 3 | % Logtalk - Open source object-oriented logic programming language |
|---|
| 4 | % Release 2.31.1 |
|---|
| 5 | % |
|---|
| 6 | % integration code for XPCE 6.6.21 and later versions supporting Logtalk |
|---|
| 7 | % message sending goals as call-backs goals by using the syntax: |
|---|
| 8 | % |
|---|
| 9 | % logtalk(Object, MessageFunctor, MessageArg1, MessageArg2, ...) |
|---|
| 10 | % |
|---|
| 11 | % as an alternative to XPCE's message(...) call-backs |
|---|
| 12 | % |
|---|
| 13 | % last updated: October 20, 2006 |
|---|
| 14 | % |
|---|
| 15 | %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
|---|
| 16 | |
|---|
| 17 | |
|---|
| 18 | |
|---|
| 19 | :- use_module(library(pce)). |
|---|
| 20 | |
|---|
| 21 | |
|---|
| 22 | :- pce_begin_class(logtalk, message). |
|---|
| 23 | |
|---|
| 24 | initialise(Msg, Obj:prolog, Functor:prolog, Args:unchecked ...) :-> |
|---|
| 25 | Pred =.. [Functor| Args], |
|---|
| 26 | SuperMsg =.. [initialise, @prolog, call, prolog(Obj::Pred)], |
|---|
| 27 | send_super(Msg, SuperMsg). |
|---|
| 28 | |
|---|
| 29 | :- pce_end_class. |
|---|
