suppress name shadow warns

tidalcycles · Apr 11, 2024 · b0ed36f · b0ed36f
1 parent 75176c3
commit b0ed36f
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/BootTidal.hs b/BootTidal.hs
@@ -8,6 +8,8 @@ hSetEncoding stdout utf8
 
 tidal <- startTidal (superdirtTarget {oLatency = 0.05, oAddress = "127.0.0.1", oPort = 57120}) (defaultConfig {cVerbose = True})
 
+:set -Wno-name-shadowing
+
 :{
 let only = (hush >>)
     p = streamReplace tidal
@@ -67,6 +69,8 @@ let only = (hush >>)
     d16 = p 16
 :}
 
+:set -Wname-shadowing
+
 :{
 let getState = streamGet tidal
     setI = streamSetI tidal