Observer logs stats for each run.

[cellular-automata.git] / 001 / src / life_god.erl

diff --git a/001/src/life_god.erl b/001/src/life_god.erl
index 8000eaa..ea3b236 100644 (file)
--- a/001/src/life_god.erl
+++ b/001/src/life_god.erl
@@ -28,9 +28,13 @@ start_link(X, Y, CellData) ->
 init([X, Y, CellData]) ->
     CellNames = [Name || {_, Name, _} <- CellData],
     RestartStrategy = {one_for_one, 1000000, 1},
+
+    Observer = ?CHILD(worker, life_observer, [X, Y]),
     Cells = [spec_cell(Datum) || Datum <- CellData],
     Time = ?CHILD(worker, life_time, [X, Y, CellNames]),
-    Children = Cells ++ [Time],
+
+    Children = [Observer | Cells ++ [Time]],
+
     {ok, {RestartStrategy, Children}}.