factor/extra/gpu/shaders/shaders-tests.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