From: sewardj <unknown>
Date: Wed, 19 Jan 2000 16:44:51 +0000 (+0000)
Subject: [project @ 2000-01-19 16:44:51 by sewardj]
X-Git-Tag: Approximately_9120_patches~5251
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=623a7c05bf95296dc70159a432a154d043c27eee;p=ghc-hetmet.git

[project @ 2000-01-19 16:44:51 by sewardj]
Add comment about code generation for debug tracing.
---

diff --git a/ghc/compiler/nativeGen/MachCode.lhs b/ghc/compiler/nativeGen/MachCode.lhs
index a7ed64e..0af2745 100644
--- a/ghc/compiler/nativeGen/MachCode.lhs
+++ b/ghc/compiler/nativeGen/MachCode.lhs
@@ -49,6 +49,8 @@ stmt2Instrs stmt = case stmt of
     StFunBegin lab -> returnInstr (IF_ARCH_alpha(FUNBEGIN lab,LABEL lab))
 #else
     -- StFunBegin, special tracing code for x86-Linux only
+    -- requires you to supply
+    -- void native_trace ( char* str )
     StFunBegin lab -> getUniqLabelNCG `thenUs` \ str_lbl ->
                       returnUs (mkSeqInstrs [
                          LABEL lab,