work in progress on aout

dktr0 · Nov 18, 2024 · 87ddf62 · 87ddf62
1 parent 252269c
commit 87ddf62
Show file tree

Hide file tree

Showing 4 changed files with 117 additions and 115 deletions.
diff --git a/punctual.js b/punctual.js
diff --git a/src/Output.purs b/src/Output.purs
@@ -6,6 +6,7 @@ import Data.Show.Generic (genericShow)
 
 data Output =
   Audio |
+  AOut Int Int | -- first argument is number of channels, second argument is channel offset
   Blend |
   RGBA |
   Add |

diff --git a/src/Parser.purs b/src/Parser.purs
@@ -317,6 +317,7 @@ parseReserved p "bpf" = lift $ signalSignalSignalSignal p $ BPF Combinatorial
 parseReserved p "bpfp" = lift $ signalSignalSignalSignal p $ BPF Pairwise
 parseReserved p "delay" = lift $ numberSignalSignalSignal p Delay
 parseReserved p "audio" = pure $ ValueOutput p Output.Audio
+parseReserved p "aout" = pure $ abc p Output.AOut
 parseReserved p "blend" = pure $ ValuePolymorphic p (ValueOutput p Output.Blend : signalSignal p Blend : Nil)
 parseReserved p "rgba" = pure $ ValueOutput p Output.RGBA -- TODO: rework FragmentShader.purs with support for RGBA as a Signal that accesses previous output
 parseReserved p "add" = pure $ ValuePolymorphic p (ValueOutput p Output.Add : signalSignal p Add : Nil)

diff --git a/src/TokenParser.purs b/src/TokenParser.purs
@@ -69,7 +69,7 @@ functionsWithArgumentsDef = [
 otherReservedNamesDef :: Array String
 otherReservedNamesDef = [
   "if","then","else",
-  "audio","blend","rgba","add","mul","rgb"
+  "audio","aout","blend","rgba","add","mul","rgb"
   ]
 
 reservedNamesDef :: Array String
-Original file line number
+Diff line change
@@ Expand Up / @@ -6,6 +6,7 @@ import Data.Show.Generic (genericShow) @@
     data Output =
       Audio |
+      AOut Int Int | -- first argument is number of channels, second argument is channel offset
       Blend |
       RGBA |
       Add |
@@ Expand Down @@