Haskell - Non-exhaustive patterns in case
问题 I have got the following code: F (S core ps) = FAll core [] ps where FAll core acc ((name, (pc : pcs)) : ps) = case F' (pc : pcs) (readC pc core) core of Nothing -> if (length pcs) /= 0 then FAll core ((name, pcs) : acc) ps else FAll core acc ps Just (core', [pc']) -> let pc'' = pc' `mod` coresize pcs' = pcs ++ [pc''] in FAll core' ((name, pcs') : acc) ps stepAll core acc [] = S core (reverse acc) It compiles fine but when I run the program it gives the following error: Melon.hs:(172,10)-(182