1 
import Graphics.UI.WX

main :: IO ()
main = start $ do
   f <- frame []
   p <- panel f []

   set f [layout := minsize(Size 100 100) $ widget p]

   play (sound "alarm.wav")

这并没有像我希望的那样播放声音。我只能找到 2006 年左右的这个建议：“你是否使用配置 --enable-sound 构建选项构建了 wxWidgets？” 这仍然有效吗？如果是这样，我该怎么做？

使用 OSX 10.9.5、GHC 7.10.2、WX 0.92.2.0

4

0 回答 0