@@ -9,6 +9,7 @@ module Data.YamlSpec (main, spec) where
99
1010import qualified Text.Libyaml as Y
1111import qualified Data.ByteString.Char8 as B8
12+import Data.Int (Int64)
1213
1314import Test.HUnit hiding (Test, path)
1415
@@ -198,8 +199,8 @@ spec = do
198199 go "0o123" (83 :: Int)
199200 go "0xC" (12 :: Int)
200201 go "0xc" (12 :: Int)
201− go "0xdeadBEEF" (3735928559 :: Int)
202− go "0xDEADBEEF" (3735928559 :: Int)
202+ go "0xdeadBEEF" (3735928559 :: Int64)
203+ go "0xDEADBEEF" (3735928559 :: Int64)
203204 go "1.23015e+3" (1230.15 :: Scientific)
204205 go "12.3015e+02" (1230.15 :: Scientific)
205206 go "1230.15" (1230.15 :: Scientific)