diff options
-rw-r--r-- | src/LambdaCube/GL/Input.hs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/LambdaCube/GL/Input.hs b/src/LambdaCube/GL/Input.hs index c979e28..011671f 100644 --- a/src/LambdaCube/GL/Input.hs +++ b/src/LambdaCube/GL/Input.hs | |||
@@ -253,8 +253,8 @@ createObjectCommands texUnitMap topUnis obj prg = objUniCmds ++ objStreamCmds ++ | |||
253 | constAttr -> GLSetVertexAttrib i constAttr | 253 | constAttr -> GLSetVertexAttrib i constAttr |
254 | 254 | ||
255 | nullSetter :: GLUniformName -> String -> a -> IO () | 255 | nullSetter :: GLUniformName -> String -> a -> IO () |
256 | --nullSetter n t _ = return () -- Prelude.putStrLn $ "WARNING: unknown uniform: " ++ SB.unpack n ++ " :: " ++ t | 256 | nullSetter n t _ = return () |
257 | nullSetter n t _ = Prelude.putStrLn $ "WARNING: unknown uniform: " ++ show n ++ " :: " ++ t | 257 | --nullSetter n t _ = Prelude.putStrLn $ "WARNING: unknown uniform: " ++ show n ++ " :: " ++ t |
258 | 258 | ||
259 | uniformBool :: GLUniformName -> Map GLUniformName InputSetter -> SetterFun Bool | 259 | uniformBool :: GLUniformName -> Map GLUniformName InputSetter -> SetterFun Bool |
260 | uniformV2B :: GLUniformName -> Map GLUniformName InputSetter -> SetterFun V2B | 260 | uniformV2B :: GLUniformName -> Map GLUniformName InputSetter -> SetterFun V2B |