extra/gpu/shaders/shaders-tests.factor

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