diff --git a/hsqml-datamodel-vinyl.cabal b/hsqml-datamodel-vinyl.cabal
--- a/hsqml-datamodel-vinyl.cabal
+++ b/hsqml-datamodel-vinyl.cabal
@@ -1,5 +1,5 @@
 name:                hsqml-datamodel-vinyl
-version:             0.3.0.0
+version:             0.3.0.1
 synopsis:            HsQML DataModel instances for Vinyl Rec.
 description:         HsQML DataModel instances for Vinyl Rec. Requires the field labels to be Typeable.
 license:             BSD3
@@ -24,7 +24,7 @@
 library
   exposed-modules:     Graphics.QML.DataModel.Vinyl
   build-depends:       base >=4.8 && <4.9
-                     , hsqml-datamodel >= 0.1.0.0 && < 0.2
+                     , hsqml-datamodel >= 0.2.0.1 && < 0.3
                      , exceptions >= 0.8 && < 0.9
                      , type-list >= 0.2.0.0 && < 0.3
                      , vinyl >= 0.5 && < 0.6
diff --git a/src/Graphics/QML/DataModel/Vinyl.hs b/src/Graphics/QML/DataModel/Vinyl.hs
--- a/src/Graphics/QML/DataModel/Vinyl.hs
+++ b/src/Graphics/QML/DataModel/Vinyl.hs
@@ -40,12 +40,6 @@
 instance CountFields (Rec f xs) => CountFields (Rec f (x ': xs)) where
   countFields _ = 1 + countFields (undefined :: sing (Rec f xs))
 
-instance Mock (Rec f '[]) where
-  mock = RNil
-
-instance (Mock (f x), Mock (Rec f xs)) => Mock (Rec f (x ': xs)) where
-  mock = mock :& mock
-
 instance QtTable (Rec f '[]) where
   getColumn i _ = throwIO $ ColumnIndexOutOfBounds i 0