Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

Fixing build with ghc 7.0.4 and vector 7.1

  • Loading branch information...
commit ccc48937f5a2a47f3d3b9b4ff2cc1ad010f5ff35 1 parent 640334f
Dmitry Astapov authored
2  basic/src-main/Main-1000.hs
View
@@ -45,7 +45,7 @@ runManyParticles !n msh =
chunk :: Int -> [a] -> [[a]]
chunk n = L.unfoldr go
where
- go xs = case splitAt n xs of
+ go xs = case L.splitAt n xs of
([], []) -> Nothing
r -> Just r
2  basic/src-main/Main.hs
View
@@ -41,7 +41,7 @@ runManyParticles !n !chunkSz msh =
chunk :: Int -> [a] -> [[a]]
chunk n = L.unfoldr go
where
- go xs = case splitAt n xs of
+ go xs = case L.splitAt n xs of
([], []) -> Nothing
r -> Just r
1  basic/src/Source.hs
View
@@ -1,3 +1,4 @@
+{-# LANGUAGE DoAndIfThenElse #-}
module Source where
import Control.Monad.State
Please sign in to comment.
Something went wrong with that request. Please try again.