| 
									
										
										
										
											2011-10-21 13:35:30 +08:00
										 |  |  | function CHECK(name,assertion)
 | 
					
						
							| 
									
										
										
										
											2012-01-22 14:28:11 +08:00
										 |  |  | % CHECK throw an error if an assertion fails | 
					
						
							|  |  |  | % | 
					
						
							|  |  |  | % CHECK(name,assertion) | 
					
						
							|  |  |  | %  - name of test | 
					
						
							|  |  |  | %  - assertion | 
					
						
							| 
									
										
										
										
											2011-10-21 13:35:30 +08:00
										 |  |  | 
 | 
					
						
							|  |  |  | if (assertion~=1) | 
					
						
							|  |  |  |   error(['CHECK ' name ' fails']); | 
					
						
							|  |  |  | end |