Various performance improvements

2021-09-23 15:27:37 +01:00
parent 7b6904b51f
commit 85edd98d62
17 changed files with 137 additions and 81 deletions
@@ -199,7 +199,8 @@ updateCloud w c
    oldPos2 = stripZ oldPos
    newPos@(V3 _ _ npz) = oldPos +.+.+ newVel
    newPos2 = stripZ newPos
-    hitWl = collideCircWalls oldPos2 newPos2 5 $ wallsNearPoint newPos2 w
+    -- the following only tests for the first collision with a wall
+    hitWl = collidePointAnyWalls oldPos2 newPos2 $ wallsNearPoint newPos2 w
    finalPos = addZ npz $ maybe newPos2 fst hitWl
    finalVel = addZ nvz $ maybe newVel2 snd hitWl