15 lines
		
	
	
		
			395 B
		
	
	
	
		
			Factor
		
	
	
			
		
		
	
	
			15 lines
		
	
	
		
			395 B
		
	
	
	
		
			Factor
		
	
	
! (c)2012 Joe Groff bsd license
 | 
						|
USING: io.directories io.files.temp io.pathnames kernel memoize
 | 
						|
system ;
 | 
						|
IN: io.files.temp.unix
 | 
						|
 | 
						|
MEMO: (temp-directory) ( -- path )
 | 
						|
    "/tmp/factor-temp" dup make-directories ;
 | 
						|
 | 
						|
M: unix temp-directory (temp-directory) ;
 | 
						|
 | 
						|
MEMO: (cache-directory) ( -- path )
 | 
						|
    home ".factor-cache" append-path dup make-directories ;
 | 
						|
 | 
						|
M: unix cache-directory (cache-directory) ;
 |