| 
									
										
										
										
											2008-11-22 23:46:57 -05:00
										 |  |  | USING: compiler.units definitions tools.test sequences ;
 | 
					
						
							|  |  |  | IN: compiler.tests.redefine14 | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2009-05-01 07:48:33 -04:00
										 |  |  | TUPLE: bad ;
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | M: bad length 1 2 3 ;
 | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2009-05-01 09:29:04 -04:00
										 |  |  | [ ] [ [ M\ bad length forget ] with-compilation-unit ] unit-test |