Merge pull request tidalcycles#1087 from tidalcycles/minus-for-rest

Support `-` for rests/gaps in mininotation
cdnclass · Jun 7, 2024 · 638e86a · 638e86a
2 parents 7ba484b ab683f8
commit 638e86a
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Sound/Tidal/ParseBP.hs b/src/Sound/Tidal/ParseBP.hs
@@ -223,7  223,7 @@ parseBP_E s = toE parsed
 parseTPat :: Parseable a => String -> Either ParseError (TPat a)
 parseTPat = runParser (pSequence f' Prelude.<* eof) (0 :: Int) ""
   where f' = do tPatParser
-             <|> do symbol "~" <?> "rest"
              <|> do oneOf "~-" <?> "rest"
                     return TPat_Silence
 
 cP :: (Enumerable a, Parseable a) => String -> Pattern a