diff --git a/geval.cabal b/geval.cabal index 955f0a7..6d4a889 100644 --- a/geval.cabal +++ b/geval.cabal @@ -1,5 +1,5 @@ name: geval -version: 1.2.1.0 +version: 1.2.2.0 synopsis: Machine learning evaluation tools description: Please see README.md homepage: http://github.com/name/project diff --git a/src/GEval/LineByLine.hs b/src/GEval/LineByLine.hs index 1357b83..f8565a4 100644 --- a/src/GEval/LineByLine.hs +++ b/src/GEval/LineByLine.hs @@ -245,8 +245,8 @@ runDiffGeneralized ordering otherOut spec consum = do Left (NoFile fp) -> throwM $ NoOutFile fp Left (NoDirectory d) -> throwM $ NoOutFile otherOut Right otherOutSource -> do - let sourceA = gevalLineByLineSource metric inputSource expectedSource outSource - let sourceB = gevalLineByLineSource metric inputSource expectedSource otherOutSource + let sourceA = gevalLineByLineSource metric inputSource expectedSource otherOutSource + let sourceB = gevalLineByLineSource metric inputSource expectedSource outSource runResourceT $ runConduit $ ((getZipSource $ (,) <$> ZipSource sourceA