summaryrefslogtreecommitdiff
path: root/rts/STM.h
diff options
context:
space:
mode:
authorSimon Marlow <marlowsd@gmail.com>2009-10-14 13:17:27 +0000
committerSimon Marlow <marlowsd@gmail.com>2009-10-14 13:17:27 +0000
commit0856ac59cfb455d32a3042317fdba0f5e85cab9c (patch)
treee744d0c909780dabeffa65babfb9c4535f9a4d0a /rts/STM.h
parentc5f93af1c663ab68f3b18f6a8c3264165a1c8883 (diff)
downloadhaskell-0856ac59cfb455d32a3042317fdba0f5e85cab9c.tar.gz
micro-opt: replace stmGetEnclosingTRec() with a field access
While fixing #3578 I noticed that this function was just a field access to StgTRecHeader, so I inlined it manually.
Diffstat (limited to 'rts/STM.h')
-rw-r--r--rts/STM.h7
1 files changed, 0 insertions, 7 deletions
diff --git a/rts/STM.h b/rts/STM.h
index 495b763139..eae93b28a1 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