projects
/
ghc-hetmet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Add -fwarn-lazy-unlifted-bindings to the list of flags
[ghc-hetmet.git]
/
rts
/
Apply.h
diff --git
a/rts/Apply.h
b/rts/Apply.h
index
76e36cb
..
1c0b162
100644
(file)
--- a/
rts/Apply.h
+++ b/
rts/Apply.h
@@
-11,19
+11,16
@@
// canned slow entry points, indexed by arg type (ARG_P, ARG_PP, etc.)
#ifdef IN_STG_CODE
// canned slow entry points, indexed by arg type (ARG_P, ARG_PP, etc.)
#ifdef IN_STG_CODE
-extern StgWord stg_ap_stack_entries[];
+extern RTS_PRIVATE StgWord stg_ap_stack_entries[];
#else
#else
-extern StgFun *stg_ap_stack_entries[];
+extern RTS_PRIVATE StgFun *stg_ap_stack_entries[];
#endif
// canned register save code for heap check failure in a function
#ifdef IN_STG_CODE
#endif
// canned register save code for heap check failure in a function
#ifdef IN_STG_CODE
-extern StgWord stg_stack_save_entries[];
+extern RTS_PRIVATE StgWord stg_stack_save_entries[];
#else
#else
-extern StgFun *stg_stack_save_entries[];
+extern RTS_PRIVATE StgFun *stg_stack_save_entries[];
#endif
#endif
-// canned bitmap for each arg type
-extern StgWord stg_arg_bitmaps[];
-
#endif /* APPLY_H */
#endif /* APPLY_H */