merge

Makefile

@@ -1,3 +1,4 @@
+PHONY: test
 test:
 	@cabal test
 

audiocate.cabal

@@ -1,6 +1,6 @@
 cabal-version:      3.0
 name:               audiocate
-version:            0.1.0.0
+version:            0.2.0.0
 synopsis:
     Audio encoding authentication library for verifying audio as being from a trusted source
 
@@ -73,36 +73,36 @@ executable audiocate
     hs-source-dirs:   app
     default-language: GHC2021
 
-executable audiocate-gui
-  hs-source-dirs: gui
-  c-sources: csrc/resources.c
-  main-is: Main.hs
-  ghc-options: -Wall -fno-warn-unused-do-bind -threaded -with-rtsopts=-N
-  build-depends: 
-    base >=4.7 && <5 
-    , audiocate
-    , time
-    , gi-glib 
-    , gi-gtk
-    , gi-adwaita
-    , gi-gobject
-    , gi-gio
-    , haskell-gi-base
-    , directory
-    , text
-    , mtl
-    , stm
-  other-modules:
-    MainWindow
-    , View.EncodeView
-    , View.DecodeView
-    , View.LoadView
-    , AppState
-  default-language: GHC2021
-  default-extensions:
-    OverloadedLabels
-    , OverloadedStrings
-    , OverloadedRecordDot
+-- executable audiocate-gui
+--   hs-source-dirs: gui
+--   c-sources: csrc/resources.c
+--   main-is: Main.hs
+--   ghc-options: -Wall -fno-warn-unused-do-bind -threaded -with-rtsopts=-N
+--   build-depends: 
+--     base >=4.7 && <5 
+--     , audiocate
+--     , time
+--     , gi-glib 
+--     , gi-gtk
+--     , gi-adwaita
+--     , gi-gobject
+--     , gi-gio
+--     , haskell-gi-base
+--     , directory
+--     , text
+--     , mtl
+--     , stm
+--   other-modules:
+--     MainWindow
+--     , View.EncodeView
+--     , View.DecodeView
+--     , View.LoadView
+--     , AppState
+--   default-language: GHC2021
+--   default-extensions:
+--     OverloadedLabels
+--     , OverloadedStrings
+--     , OverloadedRecordDot
 
 test-suite audiocate-test
     default-language: GHC2021

lib/Audiocate.hs

@@ -15,4 +15,4 @@ run cmd isRealTime = interpretCmd cmd isRealTime
 
 -- | Prints the version string
 version :: String
-version = "0.1.0.0-alpha"
+version = "0.2.0.0-alpha"

test/EncodeCmdSpec.hs

@@ -7,7 +7,7 @@ import Data.Int (Int16)
 import qualified Data.Text as T
 import Data.Text.Encoding (encodeUtf8)
 import Data.Word (Word64)
-import Test.Hspec (Spec, context, describe, it, shouldBe, shouldSatisfy)
+import Test.Hspec (Spec, context, describe, it, shouldBe, shouldSatisfy, shouldNotBe)
 
 import Audiocate
   ( Command(Encode)