Correct shadows

This commit is contained in:
jgk
2021-03-19 22:09:46 +01:00
parent 260bdbf675
commit 1ba43f3bdc
+3 -3
View File
@@ -97,9 +97,9 @@ renderPicture' pdata rot zoom (tranx,trany) (winx,winy) wallPoints lightPoints
-- blendFunc $= (Zero,One)
drawShader (_wallShadowShader pdata) nWalls
-- cullFace $= Just Front
-- stencilOp $= (OpKeep,OpKeep,OpDecr)
-- drawShader (_wallShadowShader pdata) nWalls
cullFace $= Just Front
stencilOp $= (OpKeep,OpKeep,OpDecr)
drawShader (_wallShadowShader pdata) nWalls
cullFace $= Nothing