From 7ae7c4e0807f42172655315a42e5e64168b05bae Mon Sep 17 00:00:00 2001 From: nek0 Date: Sun, 13 Nov 2016 13:46:23 +0100 Subject: [PATCH] updated example --- examples/example00.hs | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/examples/example00.hs b/examples/example00.hs index 993b805..e8df2d8 100644 --- a/examples/example00.hs +++ b/examples/example00.hs @@ -29,6 +29,7 @@ main = do , drawLoop = draw , updateLoop = update , loadState = load + , cleanUp = clean } withAffection conf @@ -112,3 +113,6 @@ update sec = do put $ ad { quitEvent = True } + +clean :: UserData -> IO () +clean _ = return ()