fix github actions

Author: Dong Han

Z/Data/Array/Unaligned.hs

@@ -33,6 +33,7 @@ import           Foreign.C.Types
 --------------------------------------------------------------------------------
 
 newtype UnalignedSize a = UnalignedSize { getUnalignedSize :: Int } deriving (Show, Eq, Ord)
+                                                                    deriving newtype Num
 
 -- | Primitive types which can be unaligned accessed
 --

test/Z/Data/Parser/BaseSpec.hs

@@ -8,7 +8,8 @@ import           Data.Word
 import           Data.Int
 import           GHC.Float
 import           Text.Printf                 (printf)
-import           Data.Word8                  (toLower, toUpper)
+import           Data.Char                   (toLower)
+import           Z.Data.ASCII                (w2c, c2w)
 import qualified Z.Data.Parser.Base    as P
 import qualified Z.Data.Text as T
 import qualified Z.Data.Vector.Base as V
@@ -98,7 +99,7 @@ spec = describe "parsers" . modifyMaxSuccess (*10) . modifyMaxSize (*10)  $ do
             parse'' (P.bytesCI . V.pack $ t) (t ++ s) === Just (V.pack s, ())
 
         prop "bytesCI" $ \ s t ->
-            parse'' (P.bytesCI . V.pack $ t) (L.map toLower t ++ s) === Just (V.pack s, ())
+            parse'' (P.bytesCI . V.pack $ t) (L.map (c2w . toLower . w2c) t ++ s) === Just (V.pack s, ())
 
         prop "atEnd" $ \ s ->
             parse' P.atEnd s ===

test/Z/Data/Parser/NumericSpec.hs

@@ -8,7 +8,6 @@ import           Data.Word
 import           Data.Int
 import           GHC.Float
 import           Text.Printf                 (printf)
-import           Data.Word8                  (toLower, toUpper)
 import qualified Z.Data.Parser.Numeric    as P
 import qualified Z.Data.Parser.Base    as P
 import qualified Z.Data.Builder.Numeric    as B