X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Frts%2FSanity.c;h=a8f1f56c278ef14c3d8ce524ca00c4b02b1f9846;hb=03dc2dd3dd814ad85cc4c45e9cafc7b73163c8be;hp=6d80898176e0c5240c57f2c4af7c663550db0a48;hpb=c0cca2ea9d9b07c6af2da1a786e1a7bd4b757d0c;p=ghc-hetmet.git diff --git a/ghc/rts/Sanity.c b/ghc/rts/Sanity.c index 6d80898..a8f1f56 100644 --- a/ghc/rts/Sanity.c +++ b/ghc/rts/Sanity.c @@ -418,7 +418,7 @@ checkClosure( StgClosure* p ) #ifdef DIST case REMOTE_REF: return sizeofW(StgFetchMe); -#endif //DIST +#endif /*DIST */ case FETCH_ME: ASSERT(LOOKS_LIKE_GA(((StgFetchMe *)p)->ga));