Actually run the test-suites.

Close #7.
This commit is contained in:
Matvey Aksenov 2016-12-27 17:02:07 +00:00
parent e9e9f35276
commit b411ecedc0
3 changed files with 8 additions and 8 deletions

View File

@ -4,15 +4,15 @@ sudo: false
matrix: matrix:
include: include:
- env: CABALVER=1.16 GHCVER=7.6.3 - env: CABALVER=1.16 GHCVER=7.6.3 RUN_TESTS=
addons: {apt: {packages: [cabal-install-1.16,ghc-7.6.3], sources: [hvr-ghc]}} addons: {apt: {packages: [cabal-install-1.16,ghc-7.6.3], sources: [hvr-ghc]}}
- env: CABALVER=1.18 GHCVER=7.8.4 - env: CABALVER=1.18 GHCVER=7.8.4 RUN_TESTS=
addons: {apt: {packages: [cabal-install-1.18,ghc-7.8.4], sources: [hvr-ghc]}} addons: {apt: {packages: [cabal-install-1.18,ghc-7.8.4], sources: [hvr-ghc]}}
- env: CABALVER=1.22 GHCVER=7.10.3 - env: CABALVER=1.22 GHCVER=7.10.3 RUN_TESTS=--run-tests
addons: {apt: {packages: [cabal-install-1.22,ghc-7.10.3],sources: [hvr-ghc]}} addons: {apt: {packages: [cabal-install-1.22,ghc-7.10.3],sources: [hvr-ghc]}}
- env: CABALVER=1.24 GHCVER=8.0.1 - env: CABALVER=1.24 GHCVER=8.0.1 RUN_TESTS=--run-tests
addons: {apt: {packages: [cabal-install-1.24,ghc-8.0.1],sources: [hvr-ghc]}} addons: {apt: {packages: [cabal-install-1.24,ghc-8.0.1],sources: [hvr-ghc]}}
- env: CABALVER=head GHCVER=head - env: CABALVER=head GHCVER=head RUN_TESTS=--run-tests
addons: {apt: {packages: [cabal-install-head,ghc-head], sources: [hvr-ghc]}} addons: {apt: {packages: [cabal-install-head,ghc-head], sources: [hvr-ghc]}}
allow_failures: allow_failures:
@ -29,5 +29,5 @@ install:
- npm install ldapjs - npm install ldapjs
script: script:
- cabal install --enable-tests ldap-client.cabal - cabal install --enable-tests $RUN_TESTS ldap-client.cabal
- cabal sdist && cabal install --enable-tests dist/ldap-client-*.tar.gz - cabal sdist && cabal install --enable-tests dist/ldap-client-*.tar.gz

View File

@ -30,7 +30,7 @@ spec = do
(Ldap.Type.Simple "public")) (Ldap.Type.Simple "public"))
Ldap.InvalidCredentials Ldap.InvalidCredentials
(Dn "cn=admin") (Dn "cn=admin")
"Invalid Credentials")) "InvalidCredentialsError"))
it "binds as pikachu" $ do it "binds as pikachu" $ do
res <- locally $ \l -> do res <- locally $ \l -> do

View File

@ -47,7 +47,7 @@ spec = do
(Ldap.ResponseErrorCode req (Ldap.ResponseErrorCode req
Ldap.InsufficientAccessRights Ldap.InsufficientAccessRights
(Dn "o=localhost") (Dn "o=localhost")
"Insufficient Access Rights")) "InsufficientAccessRightsError"))
it "present filter" $ do it "present filter" $ do
res <- locally $ \l -> do res <- locally $ \l -> do