diff --git a/ghc-heap-view.cabal b/ghc-heap-view.cabal
--- a/ghc-heap-view.cabal
+++ b/ghc-heap-view.cabal
@@ -1,5 +1,5 @@
 Name:                ghc-heap-view
-Version:             0.5.2
+Version:             0.5.3
 Synopsis:            Extract the heap representation of Haskell values and thunks
 Description:
   This library provides functions to introspect the Haskell heap, for example
diff --git a/src/GHC/Disassembler.hs b/src/GHC/Disassembler.hs
--- a/src/GHC/Disassembler.hs
+++ b/src/GHC/Disassembler.hs
@@ -33,6 +33,7 @@
 -- byte code instructions, disassembles them into a list of byte code instructions.
 disassemble :: forall box. [box] -> [Word] -> ByteString -> [BCI box]
 disassemble ptrs lits = runGet $ do
+#ifndef GHC_7_7
     -- Ignore length tag. Needs to be skipped with GHC versions with
     -- http://hackage.haskell.org/trac/ghc/ticket/7518 included
     _ <- getWord16host
@@ -41,6 +42,7 @@
     _ <- getWord16host
 #endif
     _n <- getWord16host
+#endif
     nextInst
   where
     getLiteral :: Get Word