dusting off

src/Init.hs

@@ -32,7 +32,6 @@ init = do
     <*> (Mouse <$> newTVarIO [])
     <*> (Keyboard <$> newTVarIO [])
   _ <- glewInit
-  -- (ws, _) <- yieldSystemT (0, defStorage) (return ())
   nvg <- createGL3 (S.fromList [NanoVG.Debug, Antialias, StencilStrokes])
   return UserData
     { state           = Load
@@ -42,7 +41,6 @@ init = do
     , assetFonts      = M.empty
     , nano            = nvg
     , uuid            = []
-    -- , worldState      = ws
     , stateData       = None
     , threadContext   = Nothing
     }