machine: remove horizonStack and experiment with alwaysRaise

[haskell/symantic-parser.git] / parsers / Parsers / Brainfuck / SymanticParser.hs

diff --git a/parsers/Parsers/Brainfuck/SymanticParser.hs b/parsers/Parsers/Brainfuck/SymanticParser.hs
index 930993b96916fc5ee96b801307fc858febbc2bcc..c73aa142889270f8cceea6740279e0e3c17d2208 100644 (file)
--- a/parsers/Parsers/Brainfuck/SymanticParser.hs
+++ b/parsers/Parsers/Brainfuck/SymanticParser.hs
@@ -27,7 +27,6 @@ import qualified Symantic.Parser as SP
 import Parsers.Brainfuck.SymanticParser.Grammar (grammar)
 import Parsers.Brainfuck.Types (Instruction)
 
-{-
 parserByteString :: BS.ByteString -> Either (SP.ParsingError BS.ByteString) [Instruction]
 parserByteString = $$(SP.runParser @BS.ByteString grammar)
 
@@ -39,7 +38,6 @@ parserString = $$(SP.runParser @String grammar)
 
 parserText :: T.Text -> Either (SP.ParsingError T.Text) [Instruction]
 parserText = $$(SP.runParser @T.Text grammar)
--}
 
 --parserTextLazy :: TL.Text -> Either (SP.ParsingError TL.Text) [Instruction]
 --parserTextLazy = $$(SP.runParser @TL.Text grammar)