diff options
| author | Simon Marlow <marlowsd@gmail.com> | 2009-01-14 12:15:26 +0000 |
|---|---|---|
| committer | Simon Marlow <marlowsd@gmail.com> | 2009-01-14 12:15:26 +0000 |
| commit | 348e8f801ab659d84acfb49a5c7bbac63646e73a (patch) | |
| tree | 02f0e8301a7b9c19b72d89166177e5aca0648e59 /rts/Weak.h | |
| parent | 97583b57b68d646a5735c995cf7be217a8e83ffe (diff) | |
| download | haskell-348e8f801ab659d84acfb49a5c7bbac63646e73a.tar.gz | |
Detect when a C finalizer calls back to Haskell
This is illegal now, after the fix for #1364, but it turns out that
the existing check for dodgy callbacks doesn't catch finalizers
calling back, so we need another test. This will be particularly
important for 6.10.2, because the behaviour has changed.
Diffstat (limited to 'rts/Weak.h')
| -rw-r--r-- | rts/Weak.h | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/rts/Weak.h b/rts/Weak.h index cf93b4df9e..8fccae2a63 100644 --- a/rts/Weak.h +++ b/rts/Weak.h @@ -11,6 +11,8 @@ #include "Capability.h" +extern rtsBool running_finalizers; + void runCFinalizer(StgVoid *fn, StgVoid *ptr, StgVoid *env, StgWord flag); void runAllCFinalizers(StgWeak *w); void scheduleFinalizers(Capability *cap, StgWeak *w); |