[project @ 2000-12-19 12:17:53 by sewardj]

isFollowableRep BCORep = True

diff --git a/ghc/compiler/prelude/PrimRep.lhs b/ghc/compiler/prelude/PrimRep.lhs
index db19040..9e66cbe 100644 (file)
--- a/ghc/compiler/prelude/PrimRep.lhs
+++ b/ghc/compiler/prelude/PrimRep.lhs
@@ -124,6 +124,7 @@ isFollowableRep ForeignObjRep = True        --      ''
 isFollowableRep StableNameRep = True    --      ''
 isFollowableRep PrimPtrRep    = True    --      ''
 isFollowableRep ThreadIdRep   = True   -- pointer to a TSO
+isFollowableRep BCORep        = True
 
 isFollowableRep other        = False