blob: 8f1f319e4a87827bc9948ff85fc14e0fda787b39 (
plain)
1
2
3
4
5
6
7
8
9
10
|
module Audio where
import Prelude
import Effect (Effect)
import Effect.Class (class MonadEffect, liftEffect)
foreign import _playVoice :: Boolean -> Int -> Effect Unit
playVoice :: forall m. MonadEffect m => Boolean -> Int -> m Unit
playVoice b i = liftEffect $ _playVoice b i
|