git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@589 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
		
			
				
	
	
		
			33 lines
		
	
	
		
			660 B
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			33 lines
		
	
	
		
			660 B
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
=================================================================
 | 
						|
Logtalk - Object oriented extension to Prolog
 | 
						|
Release 2.14.3
 | 
						|
 | 
						|
Copyright (c) 1998-2002 Paulo Moura.  All Rights Reserved.
 | 
						|
=================================================================
 | 
						|
 | 
						|
 | 
						|
% 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
 |