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

Logtalk 2.17.2 files.

Browse Source 
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1076 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
This commit is contained in:
pmoura
2004-06-13 18:04:28 +00:00
parent 9543ecf436
commit d029e6c3fc
170 changed files with 2022 additions and 772 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
Logtalk/examples/classvars/NOTES
View File

@@ -1,15 +1,22 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.17.1
Release 2.17.2
Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
=================================================================
To load all objects in this example consult the classvars.loader utility
file (note that the *.loader files are Prolog files).
To load all entities in this example compile and load the loader file:
| ?- logtalk_load(loader).
This folder contains an example that shows how to implement class variables
as defined in Smalltalk. The name shared instance variables is however much
more accurate. In systems like Logtalk that enable the use of explicit
metaclasses, true class variables are just the class (as an object) own
instance variables!
This example defines a root class (root) and three instances (instance1,
instance2, and instance3). The root class defines a shared instance variable
(using a dynamic predicate) and the setter and getter methods which implement
the variable sharing behavior.

8
Logtalk/examples/classvars/SCRIPT
View File

@@ -1,11 +1,17 @@
=================================================================
Logtalk - Object oriented extension to Prolog
Release 2.17.1
Release 2.17.2
Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
=================================================================
% start by loading the example:
| ?- logtalk_load(loader).
...
% get the value of the class variable for each instance:
| ?- instance1::cv(Value1), instance2::cv(Value2), instance3::cv(Value3).

7
Logtalk/examples/classvars/loader.lgt Normal file
View File

@@ -0,0 +1,7 @@
:- initialization(
logtalk_load([
root,
instance1,
instance2,
instance3])).