projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
add missing files (part of #3171 fix)
[ghc-hetmet.git]
/
includes
/
Closures.h
diff --git
a/includes/Closures.h
b/includes/Closures.h
index
df53cee
..
15955fd
100644
(file)
--- a/
includes/Closures.h
+++ b/
includes/Closures.h
@@
-174,11
+174,6
@@
typedef struct {
} StgStopFrame;
typedef struct {
} StgStopFrame;
typedef struct {
- StgHeader header;
- StgClosure *evacuee;
-} StgEvacuated;
-
-typedef struct {
StgHeader header;
StgWord data;
} StgIntCharlikeClosure;
StgHeader header;
StgWord data;
} StgIntCharlikeClosure;
@@
-195,6
+190,7
@@
typedef struct _StgStableName {
typedef struct _StgWeak { /* Weak v */
StgHeader header;
typedef struct _StgWeak { /* Weak v */
StgHeader header;
+ StgClosure *cfinalizer;
StgClosure *key;
StgClosure *value; /* v */
StgClosure *finalizer;
StgClosure *key;
StgClosure *value; /* v */
StgClosure *finalizer;
@@
-306,8
+302,7
@@
typedef struct {
*/
typedef struct {
const struct _StgInfoTable* info;
*/
typedef struct {
const struct _StgInfoTable* info;
- StgHalfWord size;
- StgHalfWord tag;
+ StgWord size;
StgClosure * fun;
StgClosure * payload[FLEXIBLE_ARRAY];
} StgRetFun;
StgClosure * fun;
StgClosure * payload[FLEXIBLE_ARRAY];
} StgRetFun;