Reify CrGroupUpdate

2022-07-23 13:57:03 +01:00
parent d8b1a0c71e
commit f4808676e2
6 changed files with 35 additions and 9 deletions
@@ -0,0 +1,8 @@
+module Dodge.CrGroupUpdate
+    where
+import Dodge.Data
+
+doCrGroupUpdate :: CrGroupUpdate -> World -> CrGroupParams -> Maybe CrGroupParams
+doCrGroupUpdate cgu = case cgu of
+    DefaultCrGroupUpdate -> const Just
+