git-svn-id: https://yap.svn.sf.net/svnroot/yap/trunk@561 b08c6af1-5177-4d33-ba66-4b1c6b8b522a
		
			
				
	
	
		
			33 lines
		
	
	
		
			660 B
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
			
		
		
	
	
			33 lines
		
	
	
		
			660 B
		
	
	
	
		
			Plaintext
		
	
	
	
	
	
| =================================================================
 | |
| Logtalk - Object oriented extension to Prolog
 | |
| Release 2.14.1
 | |
| 
 | |
| 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
 |