Fix bootstrap
							parent
							
								
									61836bc69a
								
							
						
					
					
						commit
						c2c07f8b22
					
				| 
						 | 
					@ -95,10 +95,10 @@ PRIVATE>
 | 
				
			||||||
        "To define one, refer to \\ MAIN: help" print
 | 
					        "To define one, refer to \\ MAIN: help" print
 | 
				
			||||||
    ] ?if ;
 | 
					    ] ?if ;
 | 
				
			||||||
 | 
					
 | 
				
			||||||
<PRIVATE
 | 
					 | 
				
			||||||
 | 
					 | 
				
			||||||
SYMBOL: blacklist
 | 
					SYMBOL: blacklist
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					<PRIVATE
 | 
				
			||||||
 | 
					
 | 
				
			||||||
: add-to-blacklist ( error vocab -- )
 | 
					: add-to-blacklist ( error vocab -- )
 | 
				
			||||||
    vocab-name blacklist get dup [ set-at ] [ 3drop ] if ;
 | 
					    vocab-name blacklist get dup [ set-at ] [ 3drop ] if ;
 | 
				
			||||||
 | 
					
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Loading…
	
		Reference in New Issue