projects
/
ghc-base.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
b49fd56
)
[project @ 2004-11-19 12:54:12 by ross]
author
ross
<unknown>
Fri, 19 Nov 2004 12:54:12 +0000
(12:54 +0000)
committer
ross
<unknown>
Fri, 19 Nov 2004 12:54:12 +0000
(12:54 +0000)
make instance Enum () conform to the Report (though I doubt anyone
will notice)
GHC/Enum.lhs
patch
|
blob
|
history
diff --git
a/GHC/Enum.lhs
b/GHC/Enum.lhs
index
a0be9e1
..
4591bc8
100644
(file)
--- a/
GHC/Enum.lhs
+++ b/
GHC/Enum.lhs
@@
-140,9
+140,9
@@
instance Enum () where
fromEnum () = zeroInt
enumFrom () = [()]
- enumFromThen () () = [()]
+ enumFromThen () () = let many = ():many in many
enumFromTo () () = [()]
- enumFromThenTo () () () = [()]
+ enumFromThenTo () () () = let many = ():many in many
\end{code}
\begin{code}