Move main to allow for new executables

2021-08-11 17:54:48 +02:00
parent b74bb45a4c
commit 4bbe5d0cf1
64 changed files with 521 additions and 345 deletions
@@ -503,7 +503,7 @@ data ForceField = FF
    , _ffDeflect :: Maybe (StdGen -> Point2 -> ForceField -> (Point2,StdGen))
    , _ffState :: FFState
    }
-data FFState = FFDestroyable { _ffsHP :: Int }
+newtype FFState = FFDestroyable { _ffsHP :: Int }

 data ActionPlan
    = Inanimate