diff --git a/Basement/Compat/Primitive.hs b/Basement/Compat/Primitive.hs
--- a/Basement/Compat/Primitive.hs
+++ b/Basement/Compat/Primitive.hs
@@ -220,7 +220,7 @@
 word16ToWord# a = a
 
 word32ToWord8# :: Word32# -> Word8#
-word32ToWord8# w = narrow32Word# w
+word32ToWord8# w = narrow8Word# w
 
 word32ToWord16# :: Word32# -> Word16#
 word32ToWord16# w = narrow16Word# w
diff --git a/basement.cabal b/basement.cabal
--- a/basement.cabal
+++ b/basement.cabal
@@ -1,5 +1,5 @@
 name:                basement
-version:             0.0.13
+version:             0.0.14
 synopsis:            Foundation scrap box of array & string
 description:         Foundation most basic primitives without any dependencies
 license:             BSD3
@@ -12,7 +12,7 @@
 homepage:            https://github.com/haskell-foundation/foundation#readme
 bug-reports:         https://github.com/haskell-foundation/foundation/issues
 cabal-version:       1.18
-extra-source-files:  cbits/*.h cbits/basement_rts.c
+extra-source-files:  cbits/*.h
 
 source-repository head
   type: git
@@ -137,7 +137,7 @@
                      Basement.Terminal.Size
 
   -- support and dependencies
-  if impl(ghc < 8.0)
+  if impl(ghc < 8.8)
     buildable: False
   else
     build-depends:     base
@@ -157,5 +157,3 @@
     cpp-options: -DARCH_IS_UNKNOWN_ENDIAN
   include-dirs:      cbits
   c-sources:         cbits/foundation_mem.c
-  if impl(ghc < 8.2)
-    c-sources:       cbits/basement_rts.c
diff --git a/cbits/basement_rts.c b/cbits/basement_rts.c
deleted file mode 100644
--- a/cbits/basement_rts.c
+++ /dev/null
@@ -1,8 +0,0 @@
-#include "Rts.h"
-
-#if __GLASGOW_HASKELL__ < 802
-int basement_is_bytearray_pinned(void *p)
-{
-    return Bdescr((StgPtr) p)->flags & BF_PINNED;
-}
-#endif