13 lines
		
	
	
		
			356 B
		
	
	
	
		
			Factor
		
	
	
		
		
			
		
	
	
			13 lines
		
	
	
		
			356 B
		
	
	
	
		
			Factor
		
	
	
| 
								 | 
							
								USING: system vocabs vocabs.loader kernel combinators
							 | 
						||
| 
								 | 
							
								namespaces sequences io.backend ;
							 | 
						||
| 
								 | 
							
								IN: bootstrap.io
							 | 
						||
| 
								 | 
							
								
							 | 
						||
| 
								 | 
							
								"bootstrap.compiler" vocab [
							 | 
						||
| 
								 | 
							
								    "io." {
							 | 
						||
| 
								 | 
							
								        { [ "io-backend" get ] [ "io-backend" get ] }
							 | 
						||
| 
								 | 
							
								        { [ os unix? ] [ "unix" ] }
							 | 
						||
| 
								 | 
							
								        { [ os winnt? ] [ "windows.nt" ] }
							 | 
						||
| 
								 | 
							
								        { [ os wince? ] [ "windows.ce" ] }
							 | 
						||
| 
								 | 
							
								    } cond append require
							 | 
						||
| 
								 | 
							
								] when
							 |