diff options
author | Vincent Ambo <tazjin@google.com> | 2019-07-04T10·18+0100 |
---|---|---|
committer | Vincent Ambo <tazjin@google.com> | 2019-07-04T10·18+0100 |
commit | f723b8b878a3c4a4687b9e337a875500bebb39b1 (patch) | |
tree | e85204cf042c355e90cff61c111e7d8cd15df311 /third_party/bazel/rules_haskell/tests/binary-with-compiler-flags | |
parent | 2eb1dc26e42ffbdc168f05ef744bd4b4f3e4c36f (diff) |
feat(third_party/bazel): Check in rules_haskell from Tweag r/17
Diffstat (limited to 'third_party/bazel/rules_haskell/tests/binary-with-compiler-flags')
-rw-r--r-- | third_party/bazel/rules_haskell/tests/binary-with-compiler-flags/BUILD.bazel | 18 | ||||
-rw-r--r-- | third_party/bazel/rules_haskell/tests/binary-with-compiler-flags/Main.hs | 13 |
2 files changed, 31 insertions, 0 deletions
diff --git a/third_party/bazel/rules_haskell/tests/binary-with-compiler-flags/BUILD.bazel b/third_party/bazel/rules_haskell/tests/binary-with-compiler-flags/BUILD.bazel new file mode 100644 index 000000000000..727d8447ab4b --- /dev/null +++ b/third_party/bazel/rules_haskell/tests/binary-with-compiler-flags/BUILD.bazel @@ -0,0 +1,18 @@ +load( + "@io_tweag_rules_haskell//haskell:haskell.bzl", + "haskell_test", +) + +package(default_testonly = 1) + +haskell_test( + name = "binary-with-compiler-flags", + srcs = ["Main.hs"], + # Flags that require -threaded, which we should get from the toolchain's + # compiler_flags. Include spaces to validate proper quoting: + compiler_flags = [ + "-with-rtsopts=-N2 -qg -I0 -n2m -A128m", + "-XLambdaCase", + ], + deps = ["//tests/hackage:base"], +) diff --git a/third_party/bazel/rules_haskell/tests/binary-with-compiler-flags/Main.hs b/third_party/bazel/rules_haskell/tests/binary-with-compiler-flags/Main.hs new file mode 100644 index 000000000000..b95db17f76da --- /dev/null +++ b/third_party/bazel/rules_haskell/tests/binary-with-compiler-flags/Main.hs @@ -0,0 +1,13 @@ +-- Expects to pull -XStandaloneDeriving from the default compiler flags. +module Main (main) where + +data Foo = Foo +deriving instance Show Foo + +-- Expects -XLambdaCase to be passed via the 'compiler_flags' rule attribute. +dummyId :: Foo -> Foo +dummyId = \case + Foo -> Foo + +main :: IO () +main = print $ dummyId Foo |