Add music support

src/Preload.hs

@@ -3,7 +3,7 @@ module Preload
     , module Preload.Data
     , module Preload.Update
     )
-    where
+  where
 import Preload.Data
 import Preload.Update
 
@@ -13,11 +13,6 @@ import Control.Lens
 
 import GHC.Word (Word32)
 
---doPreload :: IO (PreloadData a)
---doPreload = do
---    sData <- preloadSound
---    rData <- preloadRender
---    return $ PreloadData rData sData 0
 
 cleanUpPreload :: PreloadData a -> IO ()
 cleanUpPreload pd = do