X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FCapability.h;h=c50fe7ffab41ef1bcad2412c33d92f3d3e183a5f;hp=dd17863c604c3b759ef961163dca4a6adf703e66;hb=b0ca990457eaf7991e72b13d0040d937b5759b36;hpb=9cef40bd4dd2536c7a370a1a9b78461c152805cc diff --git a/rts/Capability.h b/rts/Capability.h index dd17863..c50fe7f 100644 --- a/rts/Capability.h +++ b/rts/Capability.h @@ -217,7 +217,7 @@ void prodAllCapabilities (void); // Waits for a capability to drain of runnable threads and workers, // and then acquires it. Used at shutdown time. // -void shutdownCapability (Capability *cap, Task *task); +void shutdownCapability (Capability *cap, Task *task, rtsBool wait_foreign); // Attempt to gain control of a Capability if it is free. // @@ -232,6 +232,9 @@ extern void grabCapability (Capability **pCap); #endif /* !THREADED_RTS */ +// Free a capability on exit +void freeCapability (Capability *cap); + /* ----------------------------------------------------------------------------- * INLINE functions... private below here * -------------------------------------------------------------------------- */