diff options
| author | rrt <unknown> | 2001-06-25 09:49:59 +0000 |
|---|---|---|
| committer | rrt <unknown> | 2001-06-25 09:49:59 +0000 |
| commit | 14e414ecf358fa62c5cdc99a33f4597e8b3124d6 (patch) | |
| tree | 749fbb0ae217716bb36ef60c1df905f42e2585e8 | |
| parent | 265be40ffb10e9c1713479bb2b89a4bfa699c3a6 (diff) | |
| download | haskell-14e414ecf358fa62c5cdc99a33f4597e8b3124d6.tar.gz | |
[project @ 2001-06-25 09:49:59 by rrt]
Comment out an uncomfortable ASSERT for now.
| -rw-r--r-- | ghc/rts/Hash.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ghc/rts/Hash.c b/ghc/rts/Hash.c index 876ba50dee..9acecbdb53 100644 --- a/ghc/rts/Hash.c +++ b/ghc/rts/Hash.c @@ -1,5 +1,5 @@ /*----------------------------------------------------------------------------- - * $Id: Hash.c,v 1.3 2000/12/04 12:31:21 simonmar Exp $ + * $Id: Hash.c,v 1.4 2001/06/25 09:49:59 rrt Exp $ * * (c) The AQUA Project, Glasgow University, 1995-1998 * (c) The GHC Team, 1999 @@ -243,7 +243,7 @@ insertHashTable(HashTable *table, StgWord key, void *data) HashList *hl; /* We want no duplicates */ - ASSERT(lookupHashTable(table, key) == NULL); + // ASSERT(lookupHashTable(table, key) == NULL); /* When the average load gets too high, we expand the table */ if (++table->kcount >= HLOAD * table->bcount) |