From 9a640d084f3d950e37e054672c9bbbefe4af06d7 Mon Sep 17 00:00:00 2001
From: Alberto Ruiz <aruiz@um.es>
Date: Tue, 26 May 2015 20:14:56 +0200
Subject: tr' , documentation

---
 packages/base/src/Data/Packed/Foreign.hs         | 1 -
 packages/base/src/Data/Packed/Internal/Vector.hs | 5 ++---
 2 files changed, 2 insertions(+), 4 deletions(-)

(limited to 'packages/base/src/Data/Packed')

diff --git a/packages/base/src/Data/Packed/Foreign.hs b/packages/base/src/Data/Packed/Foreign.hs
index 1ec3694..85b8bc7 100644
--- a/packages/base/src/Data/Packed/Foreign.hs
+++ b/packages/base/src/Data/Packed/Foreign.hs
@@ -16,7 +16,6 @@ module Data.Packed.Foreign
 import Data.Packed.Internal
 import qualified Data.Vector.Storable as S
 import Foreign (Ptr, ForeignPtr, Storable)
-import Foreign.C.Types (CInt)
 import GHC.Base (IO(..), realWorld#)
 
 {-# INLINE unsafeInlinePerformIO #-}
diff --git a/packages/base/src/Data/Packed/Internal/Vector.hs b/packages/base/src/Data/Packed/Internal/Vector.hs
index ac35596..ac019a8 100644
--- a/packages/base/src/Data/Packed/Internal/Vector.hs
+++ b/packages/base/src/Data/Packed/Internal/Vector.hs
@@ -25,7 +25,7 @@ module Data.Packed.Internal.Vector (
     unsafeToForeignPtr,
     unsafeFromForeignPtr,
     unsafeWith,
-    CInt,Idxs
+    CInt, I
 ) where
 
 import Data.Packed.Internal.Common
@@ -56,8 +56,7 @@ import Data.Vector.Storable(Vector,
                             unsafeFromForeignPtr,
                             unsafeWith)
 
-
-type Idxs = Vector CInt
+type I = CInt
 
 -- | Number of elements
 dim :: (Storable t) => Vector t -> Int
-- 
cgit v1.2.3