rts: remove unused round_up_to_mblocks function
authorÖmer Sinan Ağacan <omeragacan@gmail.com>
Thu, 10 May 2018 15:05:51 +0000 (18:05 +0300)
committerÖmer Sinan Ağacan <omeragacan@gmail.com>
Thu, 10 May 2018 15:05:51 +0000 (18:05 +0300)
includes/rts/storage/Block.h

index 9ba0b15..ecd6bf5 100644 (file)
@@ -338,13 +338,4 @@ round_to_mblocks(StgWord words)
     return words;
 }
 
-INLINE_HEADER StgWord
-round_up_to_mblocks(StgWord words)
-{
-    words += FIRST_BLOCK_OFF/sizeof(W_);
-    words = ((words / MBLOCK_SIZE_W) + 1) * MBLOCK_SIZE_W;
-    words -= FIRST_BLOCK_OFF/sizeof(W_);
-    return words;
-}
-
 #endif /* !CMINUSMINUS */