File: drain.hs

package info (click to toggle)
haskell-shelly 1.9.0-1
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 408 kB
  • sloc: haskell: 2,660; sh: 51; makefile: 4
file content (19 lines) | stat: -rw-r--r-- 478 bytes parent folder | download | duplicates (2)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
{-# Language OverloadedStrings, ExtendedDefaultRules #-}
import Prelude hiding (FilePath)
import Shelly
import Control.Monad (void)
import Data.Text (Text)

default (Text)

main :: IO ()
main = do
  let exDir = "./examples"
  void $ shelly $ do
    let strs = ["a", "b"] :: [String]
    let texts = ["a", "b"] :: [Text]
    let inferred = ["a", "b"]
    res <- cmd (exDir </> "drain.sh") strs texts inferred
    echo "haskell done"
    echo res
    cmd $ exDir </> "printer.sh"