[project @ 2006-01-06 15:46:09 by simonpj]
authorsimonpj <unknown>
Fri, 6 Jan 2006 15:46:09 +0000 (15:46 +0000)
committersimonpj <unknown>
Fri, 6 Jan 2006 15:46:09 +0000 (15:46 +0000)
Fix one-char typo in scanl1P

libraries/base/GHC/PArr.hs

index 7a5bd43..bb031c0 100644 (file)
@@ -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