collision corner case

movable_objects2
nek0 1 year ago
parent 6633fffb30
commit 865e931a43
  1. 2
      src/Physics/Classes/Collidible.hs

@ -145,6 +145,8 @@ class (Show c, Mass c) => Collidible c where
NoCollision
(_, _, _, False, False) ->
NoCollision
(_, _, True, _, _) ->
A.log A.Debug ("CORNER CASE!") NoCollision
x -> error $
"Unhandled combination of collision check results: "
<> (fromString $ show x)

Loading…
Cancel
Save