@@ -76,26 +76,26 @@ evalHaloF hs@(HaloState s) = case _ of
7676 pure a
7777
7878type EvalSpec props action state m
79- = { initialize :: props -> Maybe action
79+ = { onInitialize :: props -> Maybe action
8080 , onUpdate :: props -> props -> Maybe action
8181 , onAction :: action -> HaloM props state action m Unit
82- , finalize :: Maybe action
82+ , onFinalize :: Maybe action
8383 }
8484
8585defaultEval :: forall props action state m . EvalSpec props action state m
8686defaultEval =
87- { initialize : \_ -> Nothing
87+ { onInitialize : \_ -> Nothing
8888 , onUpdate: \_ _ -> Nothing
8989 , onAction: \_ -> pure unit
90- , finalize : Nothing
90+ , onFinalize : Nothing
9191 }
9292
9393makeEval :: forall props action state m . EvalSpec props action state m -> Lifecycle props action -> HaloM props state action m Unit
9494makeEval eval = case _ of
95- Initialize props -> traverse_ eval.onAction $ eval.initialize props
95+ Initialize props -> traverse_ eval.onAction $ eval.onInitialize props
9696 Update old new -> traverse_ eval.onAction $ eval.onUpdate old new
9797 Action action -> eval.onAction action
98- Finalize -> traverse_ eval.onAction eval.finalize
98+ Finalize -> traverse_ eval.onAction eval.onFinalize
9999
100100runAff :: Aff Unit -> Effect Unit
101101runAff = Aff .runAff_ (either throwError pure)
0 commit comments