From 531b0f92ac7f73d39890db366b857e810e5d17f4 Mon Sep 17 00:00:00 2001 From: luchenhan Date: Mon, 29 Apr 2024 17:13:30 +0800 Subject: [PATCH] chore: fix some typos in comments Signed-off-by: luchenhan --- vector/src/Data/Vector/Generic/Base.hs | 2 +- vector/src/Data/Vector/Storable/Mutable.hs | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) diff --git a/vector/src/Data/Vector/Generic/Base.hs b/vector/src/Data/Vector/Generic/Base.hs index e1055f81..8625284b 100644 --- a/vector/src/Data/Vector/Generic/Base.hs +++ b/vector/src/Data/Vector/Generic/Base.hs @@ -145,7 +145,7 @@ class MVector (Mutable v) a => Vector v a where -- -- > elemseq v x y = (singleton x `asTypeOf` v) `seq` y -- - -- Default defintion: @a@ is not evaluated at all. + -- Default definition: @a@ is not evaluated at all. elemseq :: v a -> a -> b -> b {-# INLINE elemseq #-} diff --git a/vector/src/Data/Vector/Storable/Mutable.hs b/vector/src/Data/Vector/Storable/Mutable.hs index 88ceffff..5df202ac 100644 --- a/vector/src/Data/Vector/Storable/Mutable.hs +++ b/vector/src/Data/Vector/Storable/Mutable.hs @@ -248,7 +248,7 @@ storableSetAsPrim n fp x _y = unsafeWithForeignPtr fp $ \ ptr -> do {- AFTER primitive 0.7 is pretty old, move to using setPtr. which is really -a confusing misnomer for whats often called memset (intialize) +a confusing misnomer for what's often called memset (initialize) -} -- Fill a memory block with the given value. The length is in -- elements of type @a@ rather than in bytes.