diff options
Diffstat (limited to 'Biz/Bild/Example.hs')
-rw-r--r-- | Biz/Bild/Example.hs | 45 |
1 files changed, 0 insertions, 45 deletions
diff --git a/Biz/Bild/Example.hs b/Biz/Bild/Example.hs deleted file mode 100644 index 66812ba..0000000 --- a/Biz/Bild/Example.hs +++ /dev/null @@ -1,45 +0,0 @@ -{-# LANGUAGE QuasiQuotes #-} -{-# LANGUAGE NoImplicitPrelude #-} - --- : out example -module Biz.Bild.Example where - --- Both internal and external language dependencies are detected automatically --- by bild, for example here we import 'Crypto.Saltine' and list 'saltine' in --- 'Deps/Haskell.nix' to indicate that this is the package we want made --- available to bild, which will index the external package and record its --- modules for lookup. -import Alpha -import qualified Biz.Cli as Cli -import qualified Biz.Test as Test -import qualified Crypto.Saltine as Saltine -import qualified Crypto.Saltine.Core.SecretBox as Saltine - -main :: IO () -main = Cli.main <| Cli.Plan help move test pure - -move :: Cli.Arguments -> IO () -move _ = putStrLn "Hello world" - -test :: Test.Tree -test = - Test.group - "Biz.Bild.Example" - [ Test.unit "can use saltine package" <| do - Saltine.sodiumInit - k <- Saltine.newKey - n <- Saltine.newNonce - let msg = "foobar" - let encryptedMsg = Saltine.secretbox k n <| str "foobar" - Just msg Test.@=? str </ Saltine.secretboxOpen k n encryptedMsg - ] - -help :: Cli.Docopt -help = - [Cli.docopt| -example that tests basic haskell build - -Usage: - example - example test -|] |