X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=rts%2FSTM.h;h=eae93b28a10b37bdde4ffb4b703a1154274ead7f;hb=661c97c65e5fa47177502e592bb763f752b487ac;hp=495b7631399ee31e310a2946211075b64602ea19;hpb=9a9803e8dc80ba41bd3e2d31228e64fa6b61060e;p=ghc-hetmet.git

diff --git a/rts/STM.h b/rts/STM.h
index 495b763..eae93b2 100644
--- a/rts/STM.h
+++ b/rts/STM.h
@@ -83,13 +83,6 @@ void stmFreeAbortedTRec(Capability *cap, StgTRecHeader *trec);
 
 void stmCondemnTransaction(Capability *cap, StgTRecHeader *trec);
 
-/*
- * Return the trec within which the specified trec was created (not
- * valid if trec==NO_TREC).
- */
-
-StgTRecHeader *stmGetEnclosingTRec(StgTRecHeader *trec);
-
 /*----------------------------------------------------------------------
 
    Validation