Added a lookahead to fix errors parsing hybrid / phryexian mana

This commit is contained in:
Correl Roush 2012-03-05 18:06:22 -05:00
parent 04b4c0e451
commit 2a02c96f2f

View file

@ -7,7 +7,7 @@ mana :: Parser Cost
mana = do mana = do
colorless' <- (many colorless) colorless' <- (many colorless)
colored' <- (many colored) colored' <- (many colored)
hybrid' <- (many hybrid) hybrid' <- (manyTill hybrid $ try $ lookAhead $ many phyrexian)
phyrexian' <- (many phyrexian) phyrexian' <- (many phyrexian)
return $ Cost (colorless' ++ colored') hybrid' phyrexian' return $ Cost (colorless' ++ colored') hybrid' phyrexian'