Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
GHC
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Locked Files
Issues
0
Issues
0
List
Boards
Labels
Service Desk
Milestones
Iterations
Merge Requests
0
Merge Requests
0
Requirements
Requirements
List
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Security & Compliance
Security & Compliance
Dependency List
License Compliance
Operations
Operations
Incidents
Environments
Packages & Registries
Packages & Registries
Package Registry
Container Registry
Analytics
Analytics
CI / CD
Code Review
Insights
Issue
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
Tobias Decking
GHC
Commits
de45acb0
Commit
de45acb0
authored
Apr 22, 2019
by
Ben Gamari
🐢
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
XXX: Indirection counting
parent
41abcf4f
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
8 additions
and
0 deletions
+8
-0
rts/Stats.c
rts/Stats.c
+4
-0
rts/StgMiscClosures.cmm
rts/StgMiscClosures.cmm
+4
-0
No files found.
rts/Stats.c
View file @
de45acb0
...
...
@@ -601,6 +601,8 @@ stat_endGC (Capability *cap, gc_thread *initiating_gct, W_ live, W_ copied, W_ s
}
}
StgWord
ben_IND
=
0
;
/* -----------------------------------------------------------------------------
Called at the beginning of each Retainer Profiliing
-------------------------------------------------------------------------- */
...
...
@@ -766,6 +768,8 @@ static void free_RTSSummaryStats(RTSSummaryStats * sum)
static
void
report_summary
(
const
RTSSummaryStats
*
sum
)
{
statsPrintf
(
"ben_IND %lu
\n
"
,
ben_IND
);
// We should do no calculation, other than unit changes and formatting, and
// we should not not use any data from outside of globals, sum and stats
// here. See Note [RTS Stats Reporting]
...
...
rts/StgMiscClosures.cmm
View file @
de45acb0
...
...
@@ -244,6 +244,7 @@ INFO_TABLE(stg_IND,1,0,IND,"IND","IND")
TICK_ENT_DYN_IND
();
/* tick */
node
=
UNTAG
(
StgInd_indirectee
(
node
));
TICK_ENT_VIA_NODE
();
W_
[
ben_IND
]
=
W_
[
ben_IND
]
+
1
;
jump
%GET_ENTRY
(
node
)
(
node
);
}
#else
...
...
@@ -252,6 +253,7 @@ INFO_TABLE(stg_IND,1,0,IND,"IND","IND")
TICK_ENT_DYN_IND
();
/* tick */
R1
=
UNTAG
(
StgInd_indirectee
(
R1
));
TICK_ENT_VIA_NODE
();
W_
[
ben_IND
]
=
W_
[
ben_IND
]
+
1
;
jump
%GET_ENTRY
(
R1
)
[
R1
];
}
#endif
...
...
@@ -262,6 +264,7 @@ INFO_TABLE(stg_IND_direct,1,0,IND,"IND","IND")
TICK_ENT_DYN_IND
();
/* tick */
node
=
StgInd_indirectee
(
node
);
TICK_ENT_VIA_NODE
();
W_
[
ben_IND
]
=
W_
[
ben_IND
]
+
1
;
jump
%ENTRY_CODE
(
Sp
(
0
))
(
node
);
}
...
...
@@ -290,6 +293,7 @@ INFO_TABLE(stg_BLACKHOLE,1,0,BLACKHOLE,"BLACKHOLE","BLACKHOLE")
P_
p
,
bq
,
msg
;
TICK_ENT_DYN_IND
();
/* tick */
W_
[
ben_IND
]
=
W_
[
ben_IND
]
+
1
;
retry
:
prim_read_barrier
;
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment