Commit abe2139e authored by Simon Marlow's avatar Simon Marlow

make stg_arg_bitmaps public, and available via the GHCi linker (#3672)

parent 3ffd4023
......@@ -290,6 +290,9 @@ typedef struct {
#endif
} StgFunInfoTable;
// canned bitmap for each arg type, indexed by constants in FunTypes.h
extern StgWord stg_arg_bitmaps[];
/* -----------------------------------------------------------------------------
Return info tables
-------------------------------------------------------------------------- */
......
......@@ -23,7 +23,4 @@ extern RTS_PRIVATE StgWord stg_stack_save_entries[];
extern RTS_PRIVATE StgFun *stg_stack_save_entries[];
#endif
// canned bitmap for each arg type
extern RTS_PRIVATE StgWord stg_arg_bitmaps[];
#endif /* APPLY_H */
......@@ -966,6 +966,7 @@ typedef struct _RtsSymbolVal {
SymI_HasProto(stg_writeTVarzh) \
SymI_HasProto(stg_yieldzh) \
SymI_NeedsProto(stg_interp_constr_entry) \
SymI_HasProto(stg_arg_bitmaps) \
SymI_HasProto(alloc_blocks_lim) \
SymI_HasProto(g0) \
SymI_HasProto(allocate) \
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment