initSystemSound :: (MonadState ECS m) => m ()
initSystemSound = do
    registerSystem sysSound (SoundSystem 0)
    registerComponent "SoundSource" mySoundSource (newComponentInterface mySoundSource)
initSystemSound :: (MonadState ECS m) => m ()
initSystemSound = do
    registerSystem sysSound (SoundSystem 0)
    registerComponent "SoundSource" mySoundSource (newComponentInterface mySoundSource)
initSystemSound = do
    registerSystem sysSound (SoundSystem 0)
    registerComponent "SoundSource" mySoundSource (newComponentInterface mySoundSource)