[commit: nofib] wip/typos: Typofix (479be5a)
git at git.haskell.org
git at git.haskell.org
Sun Dec 30 17:49:34 UTC 2018
Repository : ssh://git@git.haskell.org/nofib
On branch : wip/typos
Link : http://ghc.haskell.org/trac/ghc/changeset/479be5a191a87573cda72bb1c080936aa4d08b28/nofib
>---------------------------------------------------------------
commit 479be5a191a87573cda72bb1c080936aa4d08b28
Author: Greif <gabor.greif at nokia.com>
Date: Thu Dec 27 16:02:52 2018 +0100
Typofix
>---------------------------------------------------------------
479be5a191a87573cda72bb1c080936aa4d08b28
parallel/transclos/Main.hs | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/parallel/transclos/Main.hs b/parallel/transclos/Main.hs
index c3cda15..6134c7b 100644
--- a/parallel/transclos/Main.hs
+++ b/parallel/transclos/Main.hs
@@ -76,7 +76,7 @@ main = do
let zs = Data.Set.toList $ {- take n $ -} transcl_set rel_set (Data.Set.fromList seeds) -- set-based with 1-to-n rel
#else
let zs = {- take n $ -} transcl rel_list seeds -- default: seq, circular, with a 1-to-n list-based relation
- -- unused verions
+ -- unused versions
-- let zs = {- take n $ -} transcl_dup rel_one seeds -- no elim of duplicates; good parallelism but stupid
-- let zs = {- take n $ -} transcl_simp rel_one seeds -- list-based with 1-to-1 rel
#endif
@@ -120,4 +120,3 @@ nfib :: Int -> Int
nfib 0 = 1
nfib 1 = 1
nfib n = nfib (n-1) + nfib (n-2) + 1
-
More information about the ghc-commits
mailing list