diff options
| author | Simon Marlow <simonmar@microsoft.com> | 2006-03-13 15:41:02 +0000 |
|---|---|---|
| committer | Simon Marlow <simonmar@microsoft.com> | 2006-03-13 15:41:02 +0000 |
| commit | 0dbbf1932d550293986af6244202cb735b2cd966 (patch) | |
| tree | f84392d3d0b01d0dc76c20bc14551a638db6f355 | |
| parent | 1120322bb5c72ac0f7e6b126240da8ebf14362c4 (diff) | |
| download | haskell-0dbbf1932d550293986af6244202cb735b2cd966.tar.gz | |
add another SMP assertion
| -rw-r--r-- | ghc/rts/Schedule.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/ghc/rts/Schedule.c b/ghc/rts/Schedule.c index 6d8fe63ff4..b0a8dc64c3 100644 --- a/ghc/rts/Schedule.c +++ b/ghc/rts/Schedule.c @@ -563,6 +563,8 @@ run_thread: // ---------------------------------------------------------------------- // Run the current thread + ASSERT_FULL_CAPABILITY_INVARIANTS(cap,task); + prev_what_next = t->what_next; errno = t->saved_errno; |