From dec476ab9b8602225964cfa534bb004676ff6419 Mon Sep 17 00:00:00 2001 From: LLLL Colonq Date: Fri, 29 Mar 2024 00:06:11 -0400 Subject: Update frontend --- fig-frontend-client/src/Audio.purs | 10 ++++++++++ 1 file changed, 10 insertions(+) create mode 100644 fig-frontend-client/src/Audio.purs (limited to 'fig-frontend-client/src/Audio.purs') diff --git a/fig-frontend-client/src/Audio.purs b/fig-frontend-client/src/Audio.purs new file mode 100644 index 0000000..8f1f319 --- /dev/null +++ b/fig-frontend-client/src/Audio.purs @@ -0,0 +1,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 -- cgit v1.2.3