X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=rts%2FCapability.c;h=0012c24cc862eecfee242b5c12e081bd3f4262c9;hp=95050baaa98af5e645869366540b768b705a2a99;hb=5270423a6afe69f1dc57e5e5a474812182718d40;hpb=063b822bb68f84dd9729327bb1765637c25aceb4

diff --git a/rts/Capability.c b/rts/Capability.c
index 95050ba..0012c24 100644
--- a/rts/Capability.c
+++ b/rts/Capability.c
@@ -253,6 +253,7 @@ initCapability( Capability *cap, nat i )
     cap->free_trec_headers = NO_TREC;
     cap->transaction_tokens = 0;
     cap->context_switch = 0;
+    cap->pinned_object_block = NULL;
 }
 
 /* ---------------------------------------------------------------------------