From e70ccaa8e39155954759cc90eeae57d6bfdb5088 Mon Sep 17 00:00:00 2001 From: Simon Marlow Date: Thu, 1 Jul 2010 12:53:33 +0000 Subject: [PATCH 1/1] peekArray docs: remove mentions of "this version" and "previous version" --- Foreign/Marshal/Array.hs | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/Foreign/Marshal/Array.hs b/Foreign/Marshal/Array.hs index 8e013fe..8d8da7b 100644 --- a/Foreign/Marshal/Array.hs +++ b/Foreign/Marshal/Array.hs @@ -129,10 +129,8 @@ reallocArray0 ptr size = reallocArray ptr (size + 1) -- marshalling -- ----------- --- |Convert an array of given length into a Haskell list. This version --- traverses the array backwards using an accumulating parameter, --- which uses constant stack space. The previous version using mapM --- needed linear stack space. +-- |Convert an array of given length into a Haskell list. The implementation +-- is tail-recursive and so uses constant stack space. -- peekArray :: Storable a => Int -> Ptr a -> IO [a] peekArray size ptr | size <= 0 = return [] -- 1.7.10.4