diff options
| author | Csaba Hruska <csaba.hruska@gmail.com> | 2017-05-20 19:20:51 -0700 |
|---|---|---|
| committer | Csaba Hruska <csaba.hruska@gmail.com> | 2017-05-20 19:20:51 -0700 |
| commit | f21e89090e2914339297f8942c7e6f027ad3ecf1 (patch) | |
| tree | caffbfcc0dd5bea6763f39989e1e221d7ac46423 | |
| parent | 4c4c8766bc079cb87be5aac8966d8c39daaa7523 (diff) | |
silent unused uniform warnings
| -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 |