Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in / Register
Toggle navigation
Menu
Open sidebar
Alex D
GHC
Commits
dc8ffcb9
Commit
dc8ffcb9
authored
Apr 17, 2007
by
Simon Marlow
Browse files
remove the ITBL_SIZE constants which were wrong, but fortunately unused
parent
6e9450db
Changes
2
Hide whitespace changes
Inline
Side-by-side
compiler/main/Constants.lhs
View file @
dc8ffcb9
...
...
@@ -79,16 +79,6 @@ pROF_HDR_SIZE = (PROF_HDR_SIZE :: Int)
gRAN_HDR_SIZE = (GRAN_HDR_SIZE :: Int)
\end{code}
Info Table sizes.
\begin{code}
sTD_ITBL_SIZE = (STD_ITBL_SIZE :: Int)
rET_ITBL_SIZE = (RET_ITBL_SIZE :: Int)
pROF_ITBL_SIZE = (PROF_ITBL_SIZE :: Int)
gRAN_ITBL_SIZE = (GRAN_ITBL_SIZE :: Int)
tICKY_ITBL_SIZE = (TICKY_ITBL_SIZE :: Int)
\end{code}
Size of a double in StgWords.
\begin{code}
...
...
includes/mkDerivedConstants.c
View file @
dc8ffcb9
...
...
@@ -179,13 +179,6 @@ main(int argc, char *argv[])
printf
(
"#define PROF_HDR_SIZE %d
\n
"
,
sizeofW
(
StgProfHeader
));
printf
(
"#define GRAN_HDR_SIZE %d
\n
"
,
sizeofW
(
StgGranHeader
));
printf
(
"#define STD_ITBL_SIZE %d
\n
"
,
sizeofW
(
StgInfoTable
));
printf
(
"#define RET_ITBL_SIZE %d
\n
"
,
sizeofW
(
StgRetInfoTable
)
-
sizeofW
(
StgInfoTable
));
printf
(
"#define PROF_ITBL_SIZE %d
\n
"
,
sizeofW
(
StgProfInfo
));
printf
(
"#define GRAN_ITBL_SIZE %d
\n
"
,
0
);
printf
(
"#define TICKY_ITBL_SIZE %d
\n
"
,
0
);
printf
(
"#define BLOCK_SIZE %d
\n
"
,
BLOCK_SIZE
);
printf
(
"#define MBLOCK_SIZE %d
\n
"
,
MBLOCK_SIZE
);
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new 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