summaryrefslogtreecommitdiff
path: root/lib/Data/Packed/ST.hs
diff options
context:
space:
mode:
Diffstat (limited to 'lib/Data/Packed/ST.hs')
-rw-r--r--lib/Data/Packed/ST.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Data/Packed/ST.hs b/lib/Data/Packed/ST.hs
index c96a209..c1e7aef 100644
--- a/lib/Data/Packed/ST.hs
+++ b/lib/Data/Packed/ST.hs
@@ -171,7 +171,7 @@ writeMatrix :: Storable t => STMatrix s t -> Int -> Int -> t -> ST s ()
171writeMatrix = safeIndexM unsafeWriteMatrix 171writeMatrix = safeIndexM unsafeWriteMatrix
172 172
173newUndefinedMatrix :: Storable t => MatrixOrder -> Int -> Int -> ST s (STMatrix s t) 173newUndefinedMatrix :: Storable t => MatrixOrder -> Int -> Int -> ST s (STMatrix s t)
174newUndefinedMatrix order r c = unsafeIOToST $ fmap STMatrix $ createMatrix order r c 174newUndefinedMatrix ord r c = unsafeIOToST $ fmap STMatrix $ createMatrix ord r c
175 175
176{-# NOINLINE newMatrix #-} 176{-# NOINLINE newMatrix #-}
177newMatrix :: Storable t => t -> Int -> Int -> ST s (STMatrix s t) 177newMatrix :: Storable t => t -> Int -> Int -> ST s (STMatrix s t)