mirror of
https://github.com/composewell/streamly.git
synced 2024-08-16 15:00:25 +03:00
Fix up
This commit is contained in:
parent
0fae6047e4
commit
40a68eee48
@ -782,10 +782,8 @@ toParser parser = ParserD.Parser step initial extract
|
||||
Partial _ cont1 -> extract cont1
|
||||
Continue n cont1 -> return $ ParserD.Continue n cont1
|
||||
|
||||
#ifndef DISABLE_FUSION
|
||||
{-# RULES "fromParser/toParser fusion" [2]
|
||||
forall s. toParser (fromParser s) = s #-}
|
||||
{-# RULES "toParser/fromParser fusion" [2]
|
||||
forall s. fromParser (toParser s) = s #-}
|
||||
#endif
|
||||
-}
|
||||
|
Loading…
Reference in New Issue
Block a user