Compatibility with old bytestring < 0.11.1

haskell · Jan 25, 2024 · 3a1e3a6 · 3a1e3a6
1 parent eda4943
commit 3a1e3a6
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/tests/Tests/Properties/Validate.hs b/tests/Tests/Properties/Validate.hs
@@ -15,7 +15,11 @@ import Tests.QuickCheckUtils ()
 #if MIN_VERSION_bytestring(0,12,0)
 import Data.ByteString.Short (unShortByteString)
 #else
+#if MIN_VERSION_bytestring(0,11,1)
 import Data.ByteString.Short (ShortByteString(SBS))
+#else
+import Data.ByteString.Short.Internal (ShortByteString(SBS))
+#endif
 import Data.Array.Byte (ByteArray(ByteArray))
 
 unShortByteString :: ShortByteString -> ByteArray