packages feed

language-python-test 0.5.4 → 0.5.8

raw patch · 2 files changed

+10/−7 lines, 2 filesdep ~language-python

Dependency ranges changed: language-python

Files

language-python-test.cabal view
@@ -1,12 +1,12 @@ name:                language-python-test-version:             0.5.4-cabal-version:       >= 1.6+version:             0.5.8+cabal-version:       >= 1.10  synopsis:            testing code for the language-python library description:         testing code for the language-python library category:            Language license:             BSD3 license-file:        LICENSE-copyright:           (c) 2014-2016 Bernard James Pope+copyright:           (c) 2014-2019 Bernard James Pope author:              Bernard James Pope (Bernie Pope) maintainer:          florbitous@gmail.com homepage:            http://github.com/bjpop/language-python-test@@ -18,22 +18,25 @@    location: https://github.com/bjpop/language-python-test  Executable language-python-roundtrip+   default-language: Haskell2010    hs-source-dirs:       ./src    main-is: RoundTrip.hs    other-modules:-   build-depends:    base == 4.*, language-python == 0.5.4+   build-depends:    base == 4.*, language-python == 0.5.8  Executable language-python-tokens+   default-language: Haskell2010    hs-source-dirs:       ./src    main-is: Tokens.hs    other-modules:-   build-depends:    base == 4.*, language-python == 0.5.4+   build-depends:    base == 4.*, language-python == 0.5.8  Executable language-python-parse-pretty+   default-language: Haskell2010    hs-source-dirs:       ./src    main-is: ParsePretty.hs    other-modules:-   build-depends:    base == 4.*, language-python == 0.5.4+   build-depends:    base == 4.*, language-python == 0.5.8
src/RoundTrip.hs view
@@ -27,7 +27,7 @@                if test then exitWith ExitSuccess else exitSuccess       _other -> putStrLn "Incorrect command line. Expected: <2|3|n> inputFileName" -check :: [Comparison] -> IO Bool +check :: [Comparison] -> IO Bool check [] = return True -- must have all been equal check (Equal:rest) = check rest check (NotEqual s1 s2:_rest) = do