Make VectorFile a newtype

haskell-cryptography · Dec 20, 2016 · 62e8db4 · 62e8db4
1 parent 5af7bda
commit 62e8db4
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/changelog.md b/changelog.md
@@ -10,6 +10,8 @@
 
 * Now using IsString instance of ScrubbedBytes from memory package
 
+* Linting
+
 # 0.8.0
 
 * Exceptions are now provided by the safe-exceptions package

diff --git a/tests/vectors/VectorFile.hs b/tests/vectors/VectorFile.hs
@@ -108,9 +108,7 @@ instance FromJSON Vector where
 
   parseJSON _          = mzero
 
-data VectorFile =
-  VectorFile { vfVectors  :: [Vector]
-             }
+newtype VectorFile = VectorFile { vfVectors  :: [Vector] }
 
 instance ToJSON VectorFile where
   toJSON VectorFile{..} = object [ "vectors" .= vfVectors ]