Cleanup
This commit is contained in:
+10
-1
@@ -138,6 +138,11 @@ preloadRender = do
|
||||
lightingLineShadowShad <-
|
||||
makeShaderUsingVAO "lighting/lineShadow" [vert, geom] ELinesAdjacency shEdgeVAO
|
||||
>>= addUniforms ["lightPos", "radiusUniform"]
|
||||
|
||||
shadowedgeshader <-
|
||||
makeShaderUsingVAO "lighting/lineShadow" [vert, geom] ELinesAdjacency shEdgeVAO
|
||||
>>= addUniforms ["lightPos", "radiusUniform"]
|
||||
|
||||
-- positional shader
|
||||
positionalBlankShad <- makeShader "positional/blank" [vert, frag] [3] ETriangles
|
||||
-- 2D draw shaders
|
||||
@@ -232,8 +237,12 @@ preloadRender = do
|
||||
, _silhouetteEBO = silEBO
|
||||
, _lightingCapShader = lightingCapShad
|
||||
, _lightingLineShadowShader = lightingLineShadowShad
|
||||
, _positionalBlankShader = positionalBlankShad
|
||||
, _lightingWallShadShader = lightingWallShadShad
|
||||
, _shadowEdgeShader = shadowedgeshader
|
||||
, _shadowCapShader = shadowedgeshader
|
||||
, _shadowWallShader = shadowedgeshader
|
||||
, _shadowLightShader = shadowedgeshader
|
||||
, _positionalBlankShader = positionalBlankShad
|
||||
, _wallBlankShader = wallBlankShad
|
||||
, _wallTextureShader = wallTextureShad
|
||||
, _windowShader = wallBlankShad{_shadVAO' = winColVAO}
|
||||
|
||||
Reference in New Issue
Block a user