diff --git a/src/Foreign/Storable/Record/Tuple.hs b/src/Foreign/Storable/Record/Tuple.hs
--- a/src/Foreign/Storable/Record/Tuple.hs
+++ b/src/Foreign/Storable/Record/Tuple.hs
@@ -16,9 +16,17 @@
 import qualified Control.Applicative.HT as App
 import Data.Tuple.HT (fst3, snd3, thd3)
 
+import qualified Test.QuickCheck as QC
 
+
 newtype Tuple a = Tuple {getTuple :: a}
    deriving (Eq, Show)
+
+
+instance (QC.Arbitrary a) => QC.Arbitrary (Tuple a) where
+   arbitrary = fmap Tuple QC.arbitrary
+   shrink (Tuple a) = map Tuple $ QC.shrink a
+
 
 instance Storable a => Store.Storable (Tuple a) where
    sizeOf = sizeOf . getTuple
diff --git a/storable-record.cabal b/storable-record.cabal
--- a/storable-record.cabal
+++ b/storable-record.cabal
@@ -1,5 +1,6 @@
+Cabal-Version: 2.2
 Name:         storable-record
-Version:      0.0.5
+Version:      0.0.6
 Category:     Data, Foreign
 Synopsis:     Elegant definition of Storable instances for records
 Description:
@@ -46,7 +47,7 @@
   but we have still to investigate the problem.
   .
   For examples see packages @storable-tuple@ and @sample-frame@.
-License:             BSD3
+License:             BSD-3-Clause
 License-file:        LICENSE
 Author:              Henning Thielemann <storable@henning-thielemann.de>
 Maintainer:          Henning Thielemann <storable@henning-thielemann.de>
@@ -54,7 +55,6 @@
 Stability:           Experimental
 Build-Type:          Simple
 Tested-With:         GHC==6.8.2, GHC==6.10.4, GHC==6.12.1, GHC==8.0.1
-Cabal-Version:       >=1.6
 
 Source-Repository head
   Type:     darcs
@@ -63,7 +63,7 @@
 Source-Repository this
   Type:     darcs
   Location: http://code.haskell.org/~thielema/storable-record/
-  Tag:      0.0.5
+  Tag:      0.0.6
 
 Flag splitBase
   description: Choose the new smaller, split-up base package.
@@ -74,6 +74,7 @@
 
 Library
   Build-Depends:
+    QuickCheck >=2 && <3,
     transformers >=0.2 && <0.6,
     semigroups >=0.1 && <1.0,
     utility-ht >=0.0.14 && <0.1
@@ -85,6 +86,7 @@
       special-functors >= 1.0 && <1.1,
       base >= 1.0 && < 2
 
+  Default-Language:    Haskell98
   GHC-Options:         -Wall
   Hs-Source-Dirs:      src
 
@@ -107,6 +109,7 @@
   Else
     Buildable: False
 
+  Default-Language:    Haskell98
   GHC-Options:         -Wall
   Hs-Source-Dirs:      src
   Main-Is:             SpeedTest.hs