Draw shape shadows using index buffer

2021-09-21 00:43:45 +01:00
parent 5cbcbec101
commit 7f1a365cac
9 changed files with 167 additions and 41 deletions
@@ -79,7 +79,7 @@ setupWorldBounds w = w

 setupForegroundEdgeVerxs :: World -> World
 setupForegroundEdgeVerxs w = w & foregroundEdgeVerx .~ polyhedrasToEdges (_foregroundDecorations w)
-    & foregroundShape .~ (vs,es)
+    & foregroundShape .~ ([ShapeObj ListV vs],es)
  where
    vs = shVfromList $ map pairToSV $ concatMap polyToTris $ concatMap _pyFaces $ _foregroundDecorations w
    es = shEfromList $ polyhedrasToEdges (_foregroundDecorations w)