X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fincludes%2FRtsTypes.h;h=1a29ea8ff4e4f0a68139c31203afda6665f1f6b1;hb=03dc2dd3dd814ad85cc4c45e9cafc7b73163c8be;hp=4a30ef91d0b2fb7df630d90ee8cb1815011e8921;hpb=c0cca2ea9d9b07c6af2da1a786e1a7bd4b757d0c;p=ghc-hetmet.git

diff --git a/ghc/includes/RtsTypes.h b/ghc/includes/RtsTypes.h
index 4a30ef9..1a29ea8 100644
--- a/ghc/includes/RtsTypes.h
+++ b/ghc/includes/RtsTypes.h
@@ -48,9 +48,9 @@ typedef ullong        rtsTime;
 typedef struct hashtable ParHashTable;
 typedef struct hashlist ParHashList;
 
-// typedef double REAL_TIME;
-// typedef W_ TIME;
-// typedef GlobalTaskId Proc;
+/* typedef double REAL_TIME; */
+/* typedef W_ TIME; */
+/* typedef GlobalTaskId Proc; */
 typedef int           GlobalTaskId;
 typedef GlobalTaskId  PEs;
 typedef unsigned int  rtsWeight;
@@ -79,8 +79,10 @@ typedef struct gala {
 
 #elif defined(GRAN)
 
-// GlobalTaskId is dummy in GranSim; 
-// we define it to have cleaner code in the RTS
+/*
+ * GlobalTaskId is dummy in GranSim;
+ * we define it to have cleaner code in the RTS
+ */
 typedef int       GlobalTaskId;
 typedef lnat      rtsTime;
 typedef StgWord   PEs;