From: Ian Lynagh Date: Wed, 17 Dec 2008 18:00:44 +0000 (+0000) Subject: Remove dead function srtLabelAndLength from CgInfoTbls X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=02fe6d8bcaec1783c4b3dcc70f06de6244e96d12 Remove dead function srtLabelAndLength from CgInfoTbls --- diff --git a/compiler/codeGen/CgInfoTbls.hs b/compiler/codeGen/CgInfoTbls.hs index 9719d71..c9439ce 100644 --- a/compiler/codeGen/CgInfoTbls.hs +++ b/compiler/codeGen/CgInfoTbls.hs @@ -432,18 +432,6 @@ emitInfoTableAndCode entry_ret_lbl info args blocks ------------------------------------------------------------------------- -- --- Static reference tables --- -------------------------------------------------------------------------- - -srtLabelAndLength :: C_SRT -> CLabel -> (CmmLit, StgHalfWord) -srtLabelAndLength NoC_SRT _ - = (zeroCLit, 0) -srtLabelAndLength (C_SRT lbl off bitmap) info_lbl - = (makeRelativeRefTo info_lbl $ cmmLabelOffW lbl off, bitmap) - -------------------------------------------------------------------------- --- -- Position independent code -- -------------------------------------------------------------------------