Add line shadow shader

src/Shader/Compile.hs

@@ -119,7 +119,7 @@ compileAndCheckShader str (theShaderType,sourceCode) = do
     success <- compileStatus theShader
     unless success $ do
         infoLog <- get (shaderInfoLog theShader)
-        putStrLn $ str ++ ": Shader compile: " ++ show theShaderType ++ " : " ++ show infoLog
+        putStrLn $ str ++ ": Shader compile: " ++ show theShaderType ++ " :\n" ++ infoLog
     return theShader
 
 bufferOffset :: Integral a => a -> Ptr b