diff options
author | Csaba Hruska <csaba.hruska@gmail.com> | 2016-02-22 17:37:51 +0100 |
---|---|---|
committer | Csaba Hruska <csaba.hruska@gmail.com> | 2016-02-22 17:37:51 +0100 |
commit | 18e9cfe21bb9e69d008e1bdf16224975c4dc48fb (patch) | |
tree | 9a9d92152fe4be43807af8d334217614c53dafd6 /backendtest | |
parent | 82d6710513791ba2fee3404e7a678bdad30e083a (diff) |
fix backend test server
Diffstat (limited to 'backendtest')
-rw-r--r-- | backendtest/EditorExamplesTest.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/backendtest/EditorExamplesTest.hs b/backendtest/EditorExamplesTest.hs index 4e405745..0bbdb572 100644 --- a/backendtest/EditorExamplesTest.hs +++ b/backendtest/EditorExamplesTest.hs | |||
@@ -79,7 +79,7 @@ getRenderJob = do | |||
79 | print tests | 79 | print tests |
80 | ppls <- forM tests $ \name -> do | 80 | ppls <- forM tests $ \name -> do |
81 | putStrLn $ "compile: " ++ name | 81 | putStrLn $ "compile: " ++ name |
82 | LambdaCube.compileMain [path] OpenGL33 (dropExtension name) >>= \case | 82 | LambdaCube.compileMain [path] OpenGL33 name >>= \case |
83 | Left err -> fail $ "compile error:\n" ++ err | 83 | Left err -> fail $ "compile error:\n" ++ err |
84 | Right ppl -> return $ PipelineInfo | 84 | Right ppl -> return $ PipelineInfo |
85 | { pipelineName = path </> name | 85 | { pipelineName = path </> name |