diff options
author | panne <unknown> | 1999-08-26 08:24:16 +0000 |
---|---|---|
committer | panne <unknown> | 1999-08-26 08:24:16 +0000 |
commit | e4ee96833917856570a3d85b2399b6ac18c9889c (patch) | |
tree | 9d109e5e333f891902ead238d3c693974e3e7553 /ghc | |
parent | 2f8df09edf999a8fd911a717c53e3ef44e91df6f (diff) | |
download | haskell-e4ee96833917856570a3d85b2399b6ac18c9889c.tar.gz |
[project @ 1999-08-26 08:23:44 by panne]
Fixed typo UNUSED => STG_UNUSED
Diffstat (limited to 'ghc')
-rw-r--r-- | ghc/rts/gum/LLComms.c | 6 | ||||
-rw-r--r-- | ghc/rts/hooks/Trace.c | 6 |
2 files changed, 6 insertions, 6 deletions
diff --git a/ghc/rts/gum/LLComms.c b/ghc/rts/gum/LLComms.c index ccf1a219eb..e816f48899 100644 --- a/ghc/rts/gum/LLComms.c +++ b/ghc/rts/gum/LLComms.c @@ -1,6 +1,6 @@ /* ----------------------------------------------------------------------------- * - * $Id: LLComms.c,v 1.2 1998/12/02 13:29:06 simonm Exp $ + * $Id: LLComms.c,v 1.3 1999/08/26 08:23:44 panne Exp $ * * GUM Low-Level Inter-Task Communication * @@ -65,8 +65,8 @@ GetOpName(nat op) */ static void -trace_SendOp(OPCODE op, GLOBAL_TASK_ID dest UNUSED, - unsigned int data1 UNUSED, unsigned int data2 UNUSED) +trace_SendOp(OPCODE op, GLOBAL_TASK_ID dest STG_UNUSED, + unsigned int data1 STG_UNUSED, unsigned int data2 STG_UNUSED) { char *OpName; diff --git a/ghc/rts/hooks/Trace.c b/ghc/rts/hooks/Trace.c index 55f6c21679..fb3fb68282 100644 --- a/ghc/rts/hooks/Trace.c +++ b/ghc/rts/hooks/Trace.c @@ -1,5 +1,5 @@ /* ----------------------------------------------------------------------------- - * $Id: Trace.c,v 1.3 1999/01/25 12:01:21 simonm Exp $ + * $Id: Trace.c,v 1.4 1999/08/26 08:24:16 panne Exp $ * * User-overridable RTS hooks. * @@ -8,7 +8,7 @@ #include "Rts.h" void -PreTraceHook (long fd UNUSED) +PreTraceHook (long fd STG_UNUSED) { /* Default is not to print anything, however this might be useful: * @@ -18,7 +18,7 @@ PreTraceHook (long fd UNUSED) } void -PostTraceHook (long fd UNUSED) +PostTraceHook (long fd STG_UNUSED) { /* Default is not to print anything, however this might be useful: * |