Merge pull request #83 from julien-deoux/AudioDestinationNode

Introduction of the AudioDestinationNode module

Author: nojaf

src/WebAudioAPI/AudioDestinationNode.js

@@ -0,0 +1,5 @@
+open WebAudioAPI
+
+include AudioNode.Impl({
+  type t = audioDestinationNode
+})

src/WebAudioAPI/AudioDestinationNode.res

@@ -0,0 +1,27 @@
+open WebAudioAPI
+
+let ctx = AudioContext.make()
+
+let destinationNode = ctx.destination->AudioDestinationNode.asAudioNode
+let context = AudioContext.asBaseAudioContext(ctx)
+
+let osc = OscillatorNode.make(
+  ~context,
+  ~options={
+    type_: Sine,
+    frequency: 440.0,
+  },
+)
+let gain = GainNode.make(
+  ~context,
+  ~options={
+    gain: 0.3,
+  },
+)
+let _ = gain->GainNode.connect(~destinationNode)
+let _ =
+  osc
+  ->OscillatorNode.asAudioScheduledSourceNode
+  ->AudioScheduledSourceNode.connect(~destinationNode=gain->GainNode.asAudioNode)
+
+osc->OscillatorNode.start