| 
									
										
										
										
											2016-03-30 21:43:14 -04:00
										 |  |  | USING: accessors kernel memory sequences tools.test words ;
 | 
					
						
							| 
									
										
										
										
											2009-08-13 20:21:44 -04:00
										 |  |  | IN: classes.builtin.tests | 
					
						
							| 
									
										
										
										
											2008-06-29 03:12:44 -04:00
										 |  |  | 
 | 
					
						
							| 
									
										
										
										
											2015-07-02 20:28:17 -04:00
										 |  |  | { f } [ | 
					
						
							| 
									
										
										
										
											2008-06-29 03:12:44 -04:00
										 |  |  |     [ word? ] instances | 
					
						
							|  |  |  |     [ | 
					
						
							|  |  |  |         [ name>> "f?" = ] | 
					
						
							|  |  |  |         [ vocabulary>> "syntax" = ] bi and
 | 
					
						
							| 
									
										
										
										
											2009-01-29 23:19:07 -05:00
										 |  |  |     ] any?
 | 
					
						
							| 
									
										
										
										
											2008-06-29 03:12:44 -04:00
										 |  |  | ] unit-test |