Add music support

2021-04-06 17:52:51 +02:00
parent 7801920fd2
commit 48ef0c0088
7 changed files with 100 additions and 69 deletions
@@ -6,11 +6,13 @@ import GHC.Word (Word32)

 import Picture.Preload
 import Sound.Preload
+import Music

 data PreloadData a = PreloadData
-    { _renderData :: RenderData
-    , _soundData :: SoundData a
-    , _frameTimer :: Word32
+    { _renderData   :: RenderData
+    , _soundData    :: SoundData a
+    , _musicData    :: MusicData
+    , _frameTimer   :: Word32
    }

 makeLenses ''PreloadData