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:
bb471c1
)
Add GHC.Exts.maxTupleSize :: Int, the size of the largest tuple supported
author
Ian Lynagh
<igloo@earth.li>
Sun, 22 Jun 2008 14:15:59 +0000
(14:15 +0000)
committer
Ian Lynagh
<igloo@earth.li>
Sun, 22 Jun 2008 14:15:59 +0000
(14:15 +0000)
GHC/Exts.hs
patch
|
blob
|
history
diff --git
a/GHC/Exts.hs
b/GHC/Exts.hs
index
5c3c495
..
7dc604f
100644
(file)
--- a/
GHC/Exts.hs
+++ b/
GHC/Exts.hs
@@
-19,6
+19,9
@@
module GHC.Exts
Char(..),
Ptr(..), FunPtr(..),
Char(..),
Ptr(..), FunPtr(..),
+ -- * The maximum tuple size
+ maxTupleSize,
+
-- * Primitive operations
module GHC.Prim,
shiftL#, shiftRL#, iShiftL#, iShiftRA#, iShiftRL#,
-- * Primitive operations
module GHC.Prim,
shiftL#, shiftRL#, iShiftL#, iShiftRA#, iShiftRL#,
@@
-54,6
+57,10
@@
import GHC.Ptr
import Data.String
import Data.List
import Data.String
import Data.List
+-- XXX This should really be in Data.Tuple, where the definitions are
+maxTupleSize :: Int
+maxTupleSize = 62
+
-- | The 'Down' type allows you to reverse sort order conveniently. A value of type
-- @'Down' a@ contains a value of type @a@ (represented as @'Down' a@).
-- If @a@ has an @'Ord'@ instance associated with it then comparing two
-- | The 'Down' type allows you to reverse sort order conveniently. A value of type
-- @'Down' a@ contains a value of type @a@ (represented as @'Down' a@).
-- If @a@ has an @'Ord'@ instance associated with it then comparing two