From c6c1a5a7afe7436f8ce7b005c0293067d6d8d8f3 Mon Sep 17 00:00:00 2001 From: simonmar Date: Tue, 2 Aug 2005 12:02:16 +0000 Subject: [PATCH] [project @ 2005-08-02 12:02:16 by simonmar] Add a ToDo --- ghc/compiler/codeGen/CgProf.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/ghc/compiler/codeGen/CgProf.hs b/ghc/compiler/codeGen/CgProf.hs index aa654fd..aaab2fc 100644 --- a/ghc/compiler/codeGen/CgProf.hs +++ b/ghc/compiler/codeGen/CgProf.hs @@ -259,6 +259,7 @@ enterCostCentreThunk closure = stmtC $ CmmStore curCCSAddr (costCentreFrom closure) enter_ccs_fun stack = emitRtsCall SLIT("EnterFunCCS") [(stack,PtrHint)] + -- ToDo: vols enter_ccs_fsub = enteringPAP 0 -- 1.7.10.4