split-record 0.1.1.1 → 0.1.1.2

raw patch · 2 files changed

+5/−7 lines, 2 filesdep ~transformers

Dependency ranges changed: transformers

Files

• split-record.cabal +3/−3
• src/Main.hs +2/−4

@@ -1,5 +1,5 @@ Name:           split-record-Version:        0.1.1.1+Version:        0.1.1.2 License:        BSD3 License-File:   LICENSE Author:         Henning Thielemann <haskell@henning-thielemann.de>@@ -24,7 +24,7 @@ Build-Type:     Simple  Source-Repository this-  Tag:         0.1.1.1+  Tag:         0.1.1.2   Type:        darcs   Location:    http://code.haskell.org/~thielema/split-record/ @@ -40,7 +40,7 @@     synthesizer-core >=0.5.1 && <0.8,     soxlib >=0.0 && <0.1,     storablevector >=0.2.8 && <0.3,-    transformers >=0.2 && <0.5,+    transformers >=0.2 && <0.6,     utility-ht >=0.0.1 && <0.1,     numeric-prelude >=0.3 && <0.5,     base >=4 && <5

@@ -298,9 +298,6 @@                SVL.ChunkSize size -> SVL.ChunkSize $ numChan * size)  -shorten :: (Storable a) => SVL.Vector a -> SVL.Vector a-shorten = SVL.take (25*10^6)- monoInfoFromFormat ::    SoxLib.Format mode -> Params -> SoxLib.WriterInfo monoInfoFromFormat fmtIn params =@@ -373,6 +370,7 @@    ListHT.mapAdjacent (,) $    map (\t ->       case divMod (Real.roundSimple (fromIntegral t * 10^6 / sampleRate params)) (10^6) of+         -- FIXME: the comma is certainly only correct in German locale          (seconds,micros) ->             printf "%d,%06d" seconds (micros::Integer) :: String) $    scanl (+) 0 $@@ -393,7 +391,7 @@   main :: IO ()-main = do+main = SoxLib.formatWith $ do    argv <- getArgs    let (opts, files, errors) =           getOpt Opt.RequireOrder description argv