diff options
| author | Simon Marlow <simonmar@microsoft.com> | 2007-02-28 13:07:14 +0000 |
|---|---|---|
| committer | Simon Marlow <simonmar@microsoft.com> | 2007-02-28 13:07:14 +0000 |
| commit | 9ff76535edb25ab7434284adddb5c64708ecb547 (patch) | |
| tree | 3f2fb3ec0b66cd1c85d73a56e92e36b57de1b362 /rts/Sanity.c | |
| parent | 6a7778b95a726f460288123d0539310bb66302f4 (diff) | |
| download | haskell-9ff76535edb25ab7434284adddb5c64708ecb547.tar.gz | |
Remove vectored returns.
We recently discovered that they aren't a win any more, and just cost
code size.
Diffstat (limited to 'rts/Sanity.c')
| -rw-r--r-- | rts/Sanity.c | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/rts/Sanity.c b/rts/Sanity.c index 6fdca3624a..7de8ec7d0a 100644 --- a/rts/Sanity.c +++ b/rts/Sanity.c @@ -137,7 +137,6 @@ checkStackFrame( StgPtr c ) // small bitmap cases (<= 32 entries) case STOP_FRAME: case RET_SMALL: - case RET_VEC_SMALL: size = BITMAP_SIZE(info->i.layout.bitmap); checkSmallBitmap((StgPtr)c + 1, BITMAP_BITS(info->i.layout.bitmap), size); @@ -153,7 +152,6 @@ checkStackFrame( StgPtr c ) } case RET_BIG: // large bitmap (> 32 entries) - case RET_VEC_BIG: size = GET_LARGE_BITMAP(&info->i)->size; checkLargeBitmap((StgPtr)c + 1, GET_LARGE_BITMAP(&info->i), size); return 1 + size; @@ -361,9 +359,7 @@ checkClosure( StgClosure* p ) case RET_BCO: case RET_SMALL: - case RET_VEC_SMALL: case RET_BIG: - case RET_VEC_BIG: case RET_DYN: case UPDATE_FRAME: case STOP_FRAME: |