6f6f67b07f
git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@1220 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
39 lines
737 B
Plaintext
39 lines
737 B
Plaintext
=================================================================
|
|
Logtalk - Object oriented extension to Prolog
|
|
Release 2.22.3
|
|
|
|
Copyright (c) 1998-2004 Paulo Moura. All Rights Reserved.
|
|
=================================================================
|
|
|
|
|
|
% start by loading the example:
|
|
|
|
| ?- logtalk_load(classvars(loader)).
|
|
...
|
|
|
|
|
|
% get the value of the class variable for each instance:
|
|
|
|
| ?- instance1::cv(Value1), instance2::cv(Value2), instance3::cv(Value3).
|
|
|
|
Value1 = 0
|
|
Value2 = 0
|
|
Value3 = 0
|
|
yes
|
|
|
|
|
|
% change the value of the class variable via instance1:
|
|
|
|
| ?- instance1::set_cv(1).
|
|
|
|
yes
|
|
|
|
|
|
% get the value of the class variable for the other instances:
|
|
|
|
| ?- instance2::cv(Value2), instance3::cv(Value3).
|
|
|
|
Value2 = 1
|
|
Value3 = 1
|
|
yes
|