From db7a72a21caa4dada1d93e89d867ee805ff46997 Mon Sep 17 00:00:00 2001 From: Dmitry Zuikov Date: Tue, 17 Jan 2023 08:38:24 +0300 Subject: [PATCH] wip --- hbs2-tests/hbs2-tests.cabal | 97 +++++++++++++++++++++++++++++++++++++ hbs2-tests/test/Main.hs | 17 +++++++ 2 files changed, 114 insertions(+) create mode 100644 hbs2-tests/hbs2-tests.cabal create mode 100644 hbs2-tests/test/Main.hs diff --git a/hbs2-tests/hbs2-tests.cabal b/hbs2-tests/hbs2-tests.cabal new file mode 100644 index 00000000..127d01ca --- /dev/null +++ b/hbs2-tests/hbs2-tests.cabal @@ -0,0 +1,97 @@ +cabal-version: 3.0 +name: hbs2-tests +version: 0.1.0.0 +-- synopsis: +-- description: +license: BSD-3-Clause +license-file: LICENSE +-- author: +-- maintainer: +-- copyright: +category: Network +build-type: Simple +extra-doc-files: CHANGELOG.md +-- extra-source-files: + +common warnings + ghc-options: -Wall + +common shared-properties + ghc-options: + -Wall + -fno-warn-type-defaults + -- -fno-warn-unused-matches + -- -fno-warn-unused-do-bind + -- -Werror=missing-methods + -- -Werror=incomplete-patterns + -- -fno-warn-unused-binds + -- -threaded + -- -rtsopts + -- "-with-rtsopts=-N4 -A64m -AL256m -I0" + + + default-language: Haskell2010 + + default-extensions: + ApplicativeDo + , BangPatterns + , BlockArguments + , ConstraintKinds + , DataKinds + , DeriveDataTypeable + , DeriveGeneric + , DerivingStrategies + , DerivingVia + , ExtendedDefaultRules + , FlexibleContexts + , FlexibleInstances + , GADTs + , GeneralizedNewtypeDeriving + , ImportQualifiedPost + , LambdaCase + , MultiParamTypeClasses + , OverloadedStrings + , QuasiQuotes + , ScopedTypeVariables + , StandaloneDeriving + , TupleSections + , TypeApplications + , TypeFamilies + + +test-suite test + import: shared-properties + default-language: Haskell2010 + + other-modules: + + -- other-extensions: + + type: exitcode-stdio-1.0 + hs-source-dirs: test + main-is: Main.hs + build-depends: + base ^>=4.15.1.0, hbs2-core, hbs2-storage-simple + , async + , bytestring + , cache + , containers + , hashable + , microlens-platform + , mtl + , prettyprinter + , QuickCheck + , random + , safe + , serialise + , stm + , streaming + , tasty + , tasty-hunit + , transformers + , uniplate + , vector + + + + diff --git a/hbs2-tests/test/Main.hs b/hbs2-tests/test/Main.hs new file mode 100644 index 00000000..f09f36d1 --- /dev/null +++ b/hbs2-tests/test/Main.hs @@ -0,0 +1,17 @@ +module Main where + +import Test.Tasty +import Test.Tasty.HUnit + +main :: IO () +main = + defaultMain $ + testGroup "root" + [ + testCase "test1" test1 + ] + + +test1 :: IO () +test1 = do + pure ()