summaryrefslogtreecommitdiff
path: root/ghc/runtime/gum/LLComms.lc
diff options
context:
space:
mode:
Diffstat (limited to 'ghc/runtime/gum/LLComms.lc')
-rw-r--r--ghc/runtime/gum/LLComms.lc4
1 files changed, 2 insertions, 2 deletions
diff --git a/ghc/runtime/gum/LLComms.lc b/ghc/runtime/gum/LLComms.lc
index 200ca3450f..3c9214083a 100644
--- a/ghc/runtime/gum/LLComms.lc
+++ b/ghc/runtime/gum/LLComms.lc
@@ -371,12 +371,12 @@ unsigned nPEs;
}
addr = WaitForPEOp(PP_PETIDS, ANY_GLOBAL_TASK);
GetArgs(buffer, nPEs);
-#if 0
for (i = 0; i < nPEs; ++i) {
PEs[i] = (GLOBAL_TASK_ID) buffer[i];
+#if 0
fprintf(stderr,"PEs[%d] = %x \n", i, PEs[i]);
- }
#endif
+ }
free(buffer);
return PEs;
}