client/src/GHC/Debug/Client/Query.hs

@@ -167,7 +167,7 @@ dereferenceClosure cp
   | not (heapAlloced cp) = dereferenceClosureDirect cp
   | otherwise = do
       rc <-  requestBlock (LookupClosure cp)
-      if rawClosureSize rc < 8
+      if True -- rawClosureSize rc < 8
         then do
           res <- dereferenceClosureDirect cp
           traceShowM ("Warning!!: block decoding failed, report this as a bug:" ++ show (cp, res))