Cleanup (remove) _soundData, _musicData

src/Preload.hs

@@ -2,15 +2,15 @@ module Preload (
     cleanUpPreload,
 ) where
 
+import qualified Data.IntMap.Strict as IM
 import Data.Preload
 import Preload.Render
 import qualified SDL.Mixer as Mix
-import Sound.Data
 
 cleanUpPreload :: PreloadData -> IO ()
 cleanUpPreload pd = do
     cleanUpRenderPreload $ _renderData pd
     cleanUpSoundPreload $ _soundData pd
 
-cleanUpSoundPreload :: SoundData -> IO ()
+cleanUpSoundPreload :: IM.IntMap Mix.Chunk -> IO ()
 cleanUpSoundPreload _ = Mix.closeAudio >> putStrLn "Audio closed"