X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FRetainerSet.c;h=bfa0bc8acfa947e3c5d8d4868856e872804b7255;hb=2322bc9a89a9d8a6132a6818ccff6f665d7ed7f1;hp=6f51cb014a574828e68fe1de4c64650b03a210d4;hpb=69babbcc9a478549842d4374c8c37823b3da7d4b;p=ghc-hetmet.git diff --git a/ghc/rts/RetainerSet.c b/ghc/rts/RetainerSet.c index 6f51cb0..bfa0bc8 100644 --- a/ghc/rts/RetainerSet.c +++ b/ghc/rts/RetainerSet.c @@ -88,7 +88,7 @@ refreshAllRetainerSet(void) for (i = 0; i < HASH_TABLE_SIZE; i++) hashTable[i] = NULL; nextId = 2; -#endif // FIRST_APPROACH +#endif /* FIRST_APPROACH */ } /* ----------------------------------------------------------------------------- @@ -493,6 +493,6 @@ outputAllRetainerSet(FILE *prof_file) stgFree(rsArray); } -#endif // SECOND_APPROACH +#endif /* SECOND_APPROACH */ #endif /* PROFILING */