Separate sound and render io parameters

2021-02-23 15:05:48 +01:00
parent 62a1a57913
commit c188512abb
4 changed files with 23 additions and 14 deletions
@@ -4,4 +4,10 @@ import qualified SDL.Mixer as Mix

 import qualified Data.IntMap as IM

-type LoadedSounds = IM.IntMap Mix.Chunk
+type SoundData = IM.IntMap Mix.Chunk
+
+preloadSound :: IO SoundData
+preloadSound = return IM.empty
+
+cleanUpSoundPreload :: SoundData -> IO ()
+cleanUpSoundPreload sd = return ()