Skip to content
Snippets Groups Projects
Commit 6c47942e authored by Simon Marlow's avatar Simon Marlow
Browse files

[project @ 1998-12-22 17:00:11 by simonm]

Remove overlapped case correctly spotted by GHC.
parent 8295d9ca
No related merge requests found
......@@ -694,8 +694,6 @@ cmpString (x:xs) (y:ys) = if x == y then cmpString xs ys
else GT
cmpString [] ys = LT
cmpString xs [] = GT
cmpString _ _ = panic "cmpString"
\end{code}
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment