X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FCapability.h;h=f13afe21174b13c82301de7f2b473801687f3700;hb=4753cf734c79ad196ef4411393a1516465302f71;hp=959ab50b3ed33d10cdc0b9fe8916b8e72d8e70c7;hpb=dc6008a61acedd3d0785111cf8955c479cb226a4;p=ghc-hetmet.git diff --git a/rts/Capability.h b/rts/Capability.h index 959ab50..f13afe2 100644 --- a/rts/Capability.h +++ b/rts/Capability.h @@ -162,6 +162,9 @@ extern Capability *capabilities; // extern Capability *last_free_capability; +// GC indicator, in scope for the scheduler +extern volatile StgWord waiting_for_gc; + // Acquires a capability at a return point. If *cap is non-NULL, then // this is taken as a preference for the Capability we wish to // acquire.