/extra/gpu/shaders/shaders-tests.factor

 1! (c)2009 Joe Groff bsd license
 2USING: multiline gpu.shaders gpu.shaders.private tools.test ;
 3IN: gpu.shaders.tests
 4
 5[ """ERROR: foo.factor:20: Bad command or filename
 6INFO: foo.factor:30: The operation completed successfully
 7NOT:A:LOG:LINE"""  ]
 8[ T{ shader { filename "foo.factor" } { line 19 } }
 9"""ERROR: 0:1: Bad command or filename
10INFO: 0:11: The operation completed successfully
11NOT:A:LOG:LINE""" replace-log-line-numbers ] unit-test
12