From d3c66cccbc597bad50fea6cea968e809440899a6 Mon Sep 17 00:00:00 2001 From: simonmar Date: Fri, 13 Aug 2004 13:26:37 +0000 Subject: [PATCH] [project @ 2004-08-13 13:26:37 by simonmar] sIZEOF_StgFunInfoExtra ==> sIZEOF_StgFunInfoExtraRev --- ghc/compiler/codeGen/CgInfoTbls.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ghc/compiler/codeGen/CgInfoTbls.hs b/ghc/compiler/codeGen/CgInfoTbls.hs index 2f10073..488c513 100644 --- a/ghc/compiler/codeGen/CgInfoTbls.hs +++ b/ghc/compiler/codeGen/CgInfoTbls.hs @@ -58,7 +58,7 @@ import Unique ( Uniquable(..) ) import CmdLineOpts ( opt_SccProfilingOn ) import ListSetOps ( assocDefault ) import Maybes ( isJust ) -import Constants ( wORD_SIZE, sIZEOF_StgFunInfoExtra ) +import Constants ( wORD_SIZE, sIZEOF_StgFunInfoExtraRev ) import Outputable @@ -461,7 +461,7 @@ funInfoTable :: CmmExpr -> CmmExpr -- in the info table. funInfoTable info_ptr | tablesNextToCode - = cmmOffsetB info_ptr (- stdInfoTableSizeB - sIZEOF_StgFunInfoExtra) + = cmmOffsetB info_ptr (- stdInfoTableSizeB - sIZEOF_StgFunInfoExtraRev) | otherwise = cmmOffsetW info_ptr (1 + stdInfoTableSizeW) -- Past the entry code pointer -- 1.7.10.4