summaryrefslogtreecommitdiff
path: root/rts/Adjustor.c
diff options
context:
space:
mode:
authorSimon Marlow <simonmar@microsoft.com>2007-10-16 15:18:29 +0000
committerSimon Marlow <simonmar@microsoft.com>2007-10-16 15:18:29 +0000
commit4cdf5e86721fc672233c5268dc866492d5921ec6 (patch)
tree648ed64b5baa3eb039665ab519175609f15021d8 /rts/Adjustor.c
parenta0d2d5bb9a949bc683d1fe576260f8c09930948a (diff)
downloadhaskell-4cdf5e86721fc672233c5268dc866492d5921ec6.tar.gz
remove an incorrect assertion
Diffstat (limited to 'rts/Adjustor.c')
-rw-r--r--rts/Adjustor.c5
1 files changed, 0 insertions, 5 deletions
diff --git a/rts/Adjustor.c b/rts/Adjustor.c
index e2815d0d04..2cdbacbf41 100644
--- a/rts/Adjustor.c
+++ b/rts/Adjustor.c
@@ -417,11 +417,6 @@ createAdjustor(int cconv, StgStablePtr hptr,
38: .quad 0 # aligned on 8-byte boundary
*/
- /* we assume the small code model (gcc -mcmmodel=small) where
- * all symbols are <2^32, so hence wptr should fit into 32 bits.
- */
- ASSERT(((long)wptr >> 32) == 0);
-
{
int i = 0;
char *c;