From 42184f4c08e768b391c3d32f65e668fca0eb05a3 Mon Sep 17 00:00:00 2001
From: simonpj <unknown>
Date: Fri, 6 Jan 2006 15:46:09 +0000
Subject: [PATCH] [project @ 2006-01-06 15:46:09 by simonpj] Fix one-char typo
 in scanl1P

---
 GHC/PArr.hs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/GHC/PArr.hs b/GHC/PArr.hs
index 7a5bd43..bb031c0 100644
--- a/GHC/PArr.hs
+++ b/GHC/PArr.hs
@@ -216,7 +216,7 @@ scanlP     :: (a -> b -> a) -> a -> [:b:] -> [:a:]
 scanlP f z  = fst . loop (scanEFL (flip f)) z
 
 scanl1P        :: (a -> a -> a) -> [:a:] -> [:a:]
-acanl1P f [::]  = error "Prelude.scanl1P: empty array"
+scanl1P f [::]  = error "Prelude.scanl1P: empty array"
 scanl1P f a     = fst $ loopFromTo 1 (lengthP a - 1) (scanEFL f) (a!:0) a
 
 foldrP :: (a -> b -> b) -> b -> [:a:] -> b
-- 
1.7.10.4