@@ -142,7 +142,7 @@ parseTable = do
142 then return $ Right mempty
142 then return $ Right mempty
143 else lift $ readWithMTokens tcell st ts'
143 else lift $ readWithMTokens tcell st ts'
144 case res of
144 case res of
145− Left e -> throwError e
145+ Left _ -> fail "Could not parse table cell"
146 Right x -> return x
146 Right x -> return x
148 isHrule :: TableRow -> Bool
148 isHrule :: TableRow -> Bool