audacity 0.0.2.2 → 0.0.2.3
raw patch · 3 files changed
+17/−8 lines, 3 filesdep ~deepseqdep ~semigroupsPVP: major bump suggested
API removals or changes: PVP suggests a major version bump
Dependency ranges changed: deepseq, semigroups
API changes (from Hackage documentation)
- Sound.Audacity.Project: [selectionStart_, selectionEnd_] :: T -> Double
- Sound.Audacity.Project.Track.Wave: [blockStart_, blockLength_] :: Block -> Int
- Sound.Audacity.Project.Track.Wave: [gain_, pan_] :: T -> Double
- Sound.Audacity.Project.Track.Wave: [linked_, mute_, solo_, minimized_] :: T -> Bool
- Sound.Audacity.Project.Track.Wave: [summaryFile_, aliasFile_] :: BlockFile -> FilePath
- Sound.Audacity.Project.Track.Wave.Summary: [min_, max_, rms_] :: Limits -> Float
+ Sound.Audacity.Project: [selectionEnd_] :: T -> Double
+ Sound.Audacity.Project: [selectionStart_] :: T -> Double
+ Sound.Audacity.Project.Track.Wave: [aliasFile_] :: BlockFile -> FilePath
+ Sound.Audacity.Project.Track.Wave: [blockLength_] :: Block -> Int
+ Sound.Audacity.Project.Track.Wave: [blockStart_] :: Block -> Int
+ Sound.Audacity.Project.Track.Wave: [gain_] :: T -> Double
+ Sound.Audacity.Project.Track.Wave: [linked_] :: T -> Bool
+ Sound.Audacity.Project.Track.Wave: [minimized_] :: T -> Bool
+ Sound.Audacity.Project.Track.Wave: [mute_] :: T -> Bool
+ Sound.Audacity.Project.Track.Wave: [pan_] :: T -> Double
+ Sound.Audacity.Project.Track.Wave: [solo_] :: T -> Bool
+ Sound.Audacity.Project.Track.Wave: [summaryFile_] :: BlockFile -> FilePath
+ Sound.Audacity.Project.Track.Wave.Summary: [max_] :: Limits -> Float
+ Sound.Audacity.Project.Track.Wave.Summary: [min_] :: Limits -> Float
+ Sound.Audacity.Project.Track.Wave.Summary: [rms_] :: Limits -> Float
- Sound.Audacity.Project: Cons :: String -> Double -> Int -> Double -> Double -> Double -> [Track] -> T
+ Sound.Audacity.Project: Cons :: String -> Double -> Double -> Int -> Double -> Double -> Double -> [Track] -> T
- Sound.Audacity.Project.Track.Wave: Block :: Int -> BlockFile -> Block
+ Sound.Audacity.Project.Track.Wave: Block :: Int -> Int -> BlockFile -> Block
- Sound.Audacity.Project.Track.Wave: Cons :: String -> Channel -> Bool -> Int -> Int -> Double -> [Clip] -> T
+ Sound.Audacity.Project.Track.Wave: Cons :: String -> Channel -> Bool -> Bool -> Bool -> Bool -> Int -> Int -> Double -> Double -> [Clip] -> T
- Sound.Audacity.Project.Track.Wave: PCMAliasBlockFile :: FilePath -> Int -> Int -> Limits -> BlockFile
+ Sound.Audacity.Project.Track.Wave: PCMAliasBlockFile :: FilePath -> FilePath -> Int -> Int -> Limits -> BlockFile
- Sound.Audacity.Project.Track.Wave: blocksFromChannelSummaries :: MonadIO m => BlockOrder -> FilePath -> [[T]] -> Monad m [[Block]]
+ Sound.Audacity.Project.Track.Wave: blocksFromChannelSummaries :: forall (m :: Type -> Type). MonadIO m => BlockOrder -> FilePath -> [[T]] -> Monad m [[Block]]
- Sound.Audacity.Project.Track.Wave: pcmAliasSequence :: Monad m => SampleFormat -> Int -> Int -> FilePath -> Int -> Monad m Sequence
+ Sound.Audacity.Project.Track.Wave: pcmAliasSequence :: forall (m :: Type -> Type). Monad m => SampleFormat -> Int -> Int -> FilePath -> Int -> Monad m Sequence
- Sound.Audacity.Project.Track.Wave: pcmAliasSequenceFromStorableVector :: MonadIO m => Int -> FilePath -> Int -> Vector Float -> Monad m Sequence
+ Sound.Audacity.Project.Track.Wave: pcmAliasSequenceFromStorableVector :: forall (m :: Type -> Type). MonadIO m => Int -> FilePath -> Int -> Vector Float -> Monad m Sequence
- Sound.Audacity.Project.Track.Wave: pcmAliasSequenceFromSummary :: MonadIO m => FilePath -> Int -> [T] -> Monad m Sequence
+ Sound.Audacity.Project.Track.Wave: pcmAliasSequenceFromSummary :: forall (m :: Type -> Type). MonadIO m => FilePath -> Int -> [T] -> Monad m Sequence
- Sound.Audacity.Project.Track.Wave: pcmAliasSequencesFromChannelSummaries :: MonadIO m => BlockOrder -> FilePath -> [[T]] -> Monad m [Sequence]
+ Sound.Audacity.Project.Track.Wave: pcmAliasSequencesFromChannelSummaries :: forall (m :: Type -> Type). MonadIO m => BlockOrder -> FilePath -> [[T]] -> Monad m [Sequence]
- Sound.Audacity.Project.Track.Wave: pcmAliasSequencesFromStorableVectorChannels :: MonadIO m => BlockOrder -> Int -> FilePath -> [Vector Float] -> Monad m [Sequence]
+ Sound.Audacity.Project.Track.Wave: pcmAliasSequencesFromStorableVectorChannels :: forall (m :: Type -> Type). MonadIO m => BlockOrder -> Int -> FilePath -> [Vector Float] -> Monad m [Sequence]
- Sound.Audacity.Project.Track.Wave: storeSummary :: MonadIO m => FilePath -> Int -> Int -> T -> Monad m Block
+ Sound.Audacity.Project.Track.Wave: storeSummary :: forall (m :: Type -> Type). MonadIO m => FilePath -> Int -> Int -> T -> Monad m Block
- Sound.Audacity.Project.Track.Wave.Summary: Limits :: Float -> Limits
+ Sound.Audacity.Project.Track.Wave.Summary: Limits :: Float -> Float -> Float -> Limits
- Sound.Audacity.Project.Track.Wave.Summary: reserve :: Monad m => Monad m State
+ Sound.Audacity.Project.Track.Wave.Summary: reserve :: forall (m :: Type -> Type). Monad m => Monad m State
- Sound.Audacity.Project.Track.Wave.Summary: type Monad m = ReaderT FilePath (StateT State m)
+ Sound.Audacity.Project.Track.Wave.Summary: type Monad (m :: Type -> Type) = ReaderT FilePath StateT State m
Files
- audacity.cabal +8/−8
- src/Sound/Audacity/LabelTrack.hs +8/−0
- src/Sound/Audacity/Project/Track/Label.hs +1/−0
audacity.cabal view
@@ -1,5 +1,5 @@ Name: audacity-Version: 0.0.2.2+Version: 0.0.2.3 Synopsis: Interchange with the Audacity sound signal editor Description: This package provides functions@@ -41,7 +41,7 @@ Cabal-Version: >=1.10 Source-Repository this- Tag: 0.0.2.2+ Tag: 0.0.2.3 Type: darcs Location: https://hub.darcs.net/thielema/audacity @@ -75,9 +75,9 @@ non-empty >=0.2.1 && <0.4, utility-ht >=0.0.10 && <0.1, explicit-exception >=0.1.7 && <0.3,- semigroups >=0.1 && <1.0,+ semigroups >=0.1 && <1, transformers >=0.3 && <0.7,- deepseq >=1.3 && <1.6,+ deepseq >=1.3 && <1.7, base >=4.5 && <5 Hs-Source-Dirs: src Default-Language: Haskell2010@@ -95,7 +95,7 @@ soxlib >=0.0 && <0.1, storablevector, directory,- optparse-applicative >=0.11 && <0.19,+ optparse-applicative >=0.11 && <0.20, filepath >=1.3 && <1.6, non-empty, utility-ht,@@ -115,7 +115,7 @@ soxlib >=0.0 && <0.1, storablevector, directory,- optparse-applicative >=0.11 && <0.19,+ optparse-applicative >=0.11 && <0.20, filepath >=1.3 && <1.6, non-empty, utility-ht,@@ -135,7 +135,7 @@ soxlib >=0.0 && <0.1, storablevector, directory,- optparse-applicative >=0.11 && <0.19,+ optparse-applicative >=0.11 && <0.20, filepath >=1.3 && <1.6, non-empty, utility-ht,@@ -155,7 +155,7 @@ soxlib >=0.0 && <0.1, storablevector, directory,- optparse-applicative >=0.11 && <0.19,+ optparse-applicative >=0.11 && <0.20, filepath >=1.3 && <1.6, non-empty, utility-ht,
src/Sound/Audacity/LabelTrack.hs view
@@ -114,6 +114,14 @@ lift $ filter (uncurry (<) . fst) . map (mapFst (mapPair (max from, min to)))+{-+mask :: (time, time) -> T time label+mask (from,to) =+ lift $ mapMaybe $ \((fromi,toi), label) ->+ let fromTrim = max from fromi+ toTrim = min to toi+ in toMaybe (fromTrim < toTrim) ((fromTrim, toTrim), label)+-} zipWithList ::
src/Sound/Audacity/Project/Track/Label.hs view
@@ -79,6 +79,7 @@ MM.MaybeT (ME.Exceptional Parser.Message) a -> Maybe (ME.Exceptional Parser.Message a) maybeExc (MM.MaybeT act) =+ -- Trav.sequence act case act of ME.Exception msg -> Just $ ME.Exception msg ME.Success ma -> fmap ME.Success ma