Skip to content

Commit e295037

Browse files
authored
Merge pull request #66 from vaibhavsagar/patch-1
Fix typo in IOArray
2 parents e89852b + df102f2 commit e295037

File tree

1 file changed

+2
-2
lines changed

1 file changed

+2
-2
lines changed

Data/Graph/Inductive/Monad/IOArray.hs

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -46,11 +46,11 @@ showGraph (_,a,m) = concatMap showAdj (indices a)
4646
Just (_,l,s) -> '\n':show v++":"++show l++"->"++show s'
4747
where s' = unsafePerformIO (removeDel m s)
4848

49-
-- | Please not that this instance is unsafe.
49+
-- | Please note that this instance is unsafe.
5050
instance (Show a,Show b) => Show (SGr a b) where
5151
show (SGr g) = showGraph g
5252

53-
-- | Please not that this instance is unsafe.
53+
-- | Please note that this instance is unsafe.
5454
instance (Show a,Show b) => Show (IO (SGr a b)) where
5555
show g = unsafePerformIO (do {(SGr g') <- g; return (showGraph g')})
5656

0 commit comments

Comments
 (0)