X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FStgProf.h;fp=ghc%2Fincludes%2FStgProf.h;h=9b3ce69a9f7d365b8b4e5f7d1e347b33695bf57a;hb=03dc2dd3dd814ad85cc4c45e9cafc7b73163c8be;hp=b94066e20a38046c8d86489f8f53bf0035d58b59;hpb=c0cca2ea9d9b07c6af2da1a786e1a7bd4b757d0c;p=ghc-hetmet.git

diff --git a/ghc/includes/StgProf.h b/ghc/includes/StgProf.h
index b94066e..9b3ce69 100644
--- a/ghc/includes/StgProf.h
+++ b/ghc/includes/StgProf.h
@@ -12,11 +12,13 @@
 /* -----------------------------------------------------------------------------
  * Data Structures 
  * ---------------------------------------------------------------------------*/  
-// NB. be careful to avoid unwanted padding between fields, by
-// putting the 8-byte fields on an 8-byte boundary.  Padding can
-// vary between C compilers, and we don't take into account any
-// possible padding when generating CCS and CC decls in the code
-// generator (compiler/codeGen/CgProf.hs).
+/*
+ * NB. be careful to avoid unwanted padding between fields, by
+ * putting the 8-byte fields on an 8-byte boundary.  Padding can
+ * vary between C compilers, and we don't take into account any
+ * possible padding when generating CCS and CC decls in the code
+ * generator (compiler/codeGen/CgProf.hs).
+ */
 
 typedef struct _CostCentre {
   StgInt ccID;
@@ -26,7 +28,7 @@ typedef struct _CostCentre {
  
   /* used for accumulating costs at the end of the run... */
   StgWord   time_ticks;
-  StgWord64 mem_alloc;      // align 8 (see above)
+  StgWord64 mem_alloc;      /* align 8 (see above) */
 
   StgInt    is_caf;
 
@@ -40,11 +42,11 @@ typedef struct _CostCentreStack {
   struct _CostCentreStack *prevStack;
   struct _IndexTable *indexTable;
 
-  StgWord64  scc_count;       // align 8 (see above)
+  StgWord64  scc_count;       /* align 8 (see above) */
   StgWord    selected;
   StgWord    time_ticks;
-  StgWord64  mem_alloc;       // align 8 (see above)
-  StgWord64  inherited_alloc; // align 8 (see above)
+  StgWord64  mem_alloc;       /* align 8 (see above) */
+  StgWord64  inherited_alloc; /* align 8 (see above) */
   StgWord    inherited_ticks;
 
   CostCentre *root;
@@ -128,7 +130,7 @@ extern CostCentreStack CCS_OVERHEAD[];   /* Profiling overhead */
 extern CostCentre      CC_DONT_CARE[];
 extern CostCentreStack CCS_DONT_CARE[];  /* shouldn't ever get set */
 
-#endif // IN_STG_CODE
+#endif /* IN_STG_CODE */
 
 extern unsigned int RTS_VAR(CC_ID);	/* global ids */
 extern unsigned int RTS_VAR(CCS_ID);