module Sound.ALSA.PCM.Debug where put :: String -> IO () put _ = return ()