diff options
| author | Csaba Hruska <csaba.hruska@gmail.com> | 2016-11-11 12:27:07 +0100 |
|---|---|---|
| committer | Csaba Hruska <csaba.hruska@gmail.com> | 2016-11-11 12:27:07 +0100 |
| commit | e4ccbbeb680b18a76ea7cbc2dc461f332b44554f (patch) | |
| tree | 311cb22cf569ab8b7515a26f4e57434acf707362 | |
| parent | 2e3e1c4e04e6baaf2dbed83a9606227275d9fcd2 (diff) | |
disable DirectX11 HLSL codegen
| -rw-r--r-- | src/LambdaCube/Compiler/CoreToIR.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/LambdaCube/Compiler/CoreToIR.hs b/src/LambdaCube/Compiler/CoreToIR.hs index 892eda2e..6eef4cc3 100644 --- a/src/LambdaCube/Compiler/CoreToIR.hs +++ b/src/LambdaCube/Compiler/CoreToIR.hs | |||
| @@ -92,7 +92,8 @@ getCommands backend e = case e of | |||
| 92 | 92 | ||
| 93 | let | 93 | let |
| 94 | (vertexInput, pUniforms, vertSrc, fragSrc) = case backend of | 94 | (vertexInput, pUniforms, vertSrc, fragSrc) = case backend of |
| 95 | IR.DirectX11 -> genHLSLs backend (compRC' rctx) ints vert frag ffilter | 95 | -- disabled DX11 codegen, due to it's incomplete |
| 96 | --IR.DirectX11 -> genHLSLs backend (compRC' rctx) ints vert frag ffilter | ||
| 96 | _ -> genGLSLs backend (compRC' rctx) ints vert frag ffilter | 97 | _ -> genGLSLs backend (compRC' rctx) ints vert frag ffilter |
| 97 | 98 | ||
| 98 | pUniforms' = snd <$> Map.filter ((\case UTexture2D{} -> False; _ -> True) . fst) pUniforms | 99 | pUniforms' = snd <$> Map.filter ((\case UTexture2D{} -> False; _ -> True) . fst) pUniforms |