blob: 70faed4cb957dd465dfa1be04fab55f3f60a1bc1 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
|
/* -----------------------------------------------------------------------------
*
* (c) The University of Glasgow 2002-2004
*
* Declarations for things defined in AutoApply.cmm
*
* -------------------------------------------------------------------------- */
#ifndef APPLY_H
#define APPLY_H
// canned slow entry points, indexed by arg type (ARG_P, ARG_PP, etc.)
#ifdef IN_STG_CODE
extern RTS_PRIVATE StgWord stg_ap_stack_entries[];
#else
extern RTS_PRIVATE StgFun *stg_ap_stack_entries[];
#endif
// canned register save code for heap check failure in a function
#ifdef IN_STG_CODE
extern RTS_PRIVATE StgWord stg_stack_save_entries[];
#else
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 */
|
