Commit 726bcf72 authored by simonpj's avatar simonpj
Browse files

[project @ 2003-09-23 15:09:56 by simonpj]

Remove redundant where
parent add773aa
......@@ -118,7 +118,6 @@ hasMoreBoxityInfo :: Kind -> Kind -> Bool
hasMoreBoxityInfo k1 k2
| k2 `eqKind` openTypeKind = isAnyTypeKind k1
| otherwise = k1 `eqKind` k2
where
isAnyTypeKind :: Kind -> Bool
-- True of kind * and *# and ?
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment