19 lines
		
	
	
		
			589 B
		
	
	
	
		
			Factor
		
	
	
			
		
		
	
	
			19 lines
		
	
	
		
			589 B
		
	
	
	
		
			Factor
		
	
	
! Copyright (C) 2009 Joe Groff.
 | 
						|
! See http://factorcode.org/license.txt for BSD license.
 | 
						|
USING: gpu.shaders gpu.shaders.private io.pathnames tools.test ;
 | 
						|
IN: gpu.shaders.tests
 | 
						|
 | 
						|
{ "ERROR: foo.factor:20: Bad command or filename
 | 
						|
INFO: foo.factor:30: The operation completed successfully
 | 
						|
NOT:A:LOG:LINE"  }
 | 
						|
[ T{ shader { filename "foo.factor" } { line 19 } }
 | 
						|
"ERROR: 0:1: Bad command or filename
 | 
						|
INFO: 0:11: The operation completed successfully
 | 
						|
NOT:A:LOG:LINE" replace-log-line-numbers ] unit-test
 | 
						|
 | 
						|
SYMBOL: a-test-symbol
 | 
						|
 | 
						|
{ "shaders" } [
 | 
						|
    a-test-symbol word-directory file-name
 | 
						|
] unit-test
 |