From f723b8b878a3c4a4687b9e337a875500bebb39b1 Mon Sep 17 00:00:00 2001 From: Vincent Ambo Date: Thu, 4 Jul 2019 11:18:12 +0100 Subject: feat(third_party/bazel): Check in rules_haskell from Tweag --- third_party/bazel/rules_haskell/tools/runfiles/test/Test.hs | 13 +++++++++++++ 1 file changed, 13 insertions(+) create mode 100644 third_party/bazel/rules_haskell/tools/runfiles/test/Test.hs (limited to 'third_party/bazel/rules_haskell/tools/runfiles/test/Test.hs') diff --git a/third_party/bazel/rules_haskell/tools/runfiles/test/Test.hs b/third_party/bazel/rules_haskell/tools/runfiles/test/Test.hs new file mode 100644 index 0000000000..3ef3b28df5 --- /dev/null +++ b/third_party/bazel/rules_haskell/tools/runfiles/test/Test.hs @@ -0,0 +1,13 @@ +module Main (main) where + +import qualified Bazel.Runfiles as Runfiles +import Control.Monad (when) +import System.Process (callProcess) + +main :: IO () +main = do + r <- Runfiles.create + foo <- readFile (Runfiles.rlocation r "io_tweag_rules_haskell/tools/runfiles/test-data.txt") + when (lines foo /= ["foo"]) -- ignore trailing newline + $ error $ "Incorrect contents: got: " ++ show foo + callProcess (Runfiles.rlocation r "io_tweag_rules_haskell/tools/runfiles/bin") [] -- cgit 1.4.1