Partial fix to near plane clipping shadows

2021-08-28 21:25:59 +01:00
parent 55f1d89a5e
commit d23f36ea95
5 changed files with 10 additions and 4 deletions
@@ -53,7 +53,9 @@ doDrawing pdata w = do
    -- poke wall points and colors
    nWalls <- poke224s (shadVBOptr $ _wallTextureShader pdata) wallPointsCol
    nSils <- pokePoint3s (shadVBOptr $ _lightingLineShadowShader pdata) 
-                $ youSil w ++ _foregroundEdgeVerx w
+                $ 
+                --youSil w ++ 
+                _foregroundEdgeVerx w
    -- poke foreground geometry and floor
    let addC (V2 xx yy) = V3 xx yy 0
    nsurfVs <- pokePoint3s (shadVBOptr $ _lightingSurfaceShader pdata)