[project @ 2005-04-12 09:04:23 by simonmar]
[ghc-hetmet.git] / ghc / includes / RtsConfig.h
1 /* -----------------------------------------------------------------------------
2  *
3  * (c) The GHC Team, 1998-2004
4  *
5  * Rts settings.
6  *
7  * NOTE: assumes #include "ghcconfig.h"
8  * 
9  * NB: THIS FILE IS INCLUDED IN NON-C CODE AND DATA!  #defines only please.
10  * ---------------------------------------------------------------------------*/
11
12 #ifndef RTSCONFIG_H
13 #define RTSCONFIG_H
14
15 /*
16  * SUPPORT_LONG_LONGS controls whether we need to support long longs on a
17  * particular platform.   On 64-bit platforms, we don't need to support
18  * long longs since regular machine words will do just fine.
19  */
20 #if HAVE_LONG_LONG && SIZEOF_VOID_P < 8
21 #define SUPPORT_LONG_LONGS 1
22 #endif
23
24 /*
25  * Whether the runtime system will use libbfd for debugging purposes.
26  */
27 #if defined(DEBUG) && defined(HAVE_BFD_H) && !defined(_WIN32) && !defined(PAR) && !defined(GRAN)
28 #define USING_LIBBFD 1
29 #endif
30
31 /* Turn lazy blackholing and eager blackholing on/off.
32  *
33  * Using eager blackholing makes things easier to debug because
34  * the blackholes are more predictable - but it's slower and less sexy.
35  *
36  * For now, do lazy and not eager.
37  */
38
39 /* TICKY_TICKY needs EAGER_BLACKHOLING to verify no double-entries of
40  * single-entry thunks.
41  */
42 #if defined(TICKY_TICKY)
43 #  define EAGER_BLACKHOLING
44 #else
45 #  define LAZY_BLACKHOLING
46 #endif
47
48 /* TABLES_NEXT_TO_CODE says whether to assume that info tables are
49  * assumed to reside just before the code for a function.
50  *
51  * UNDEFINING THIS WON'T WORK ON ITS OWN.  You have been warned.
52  */
53 #if !defined(USE_MINIINTERPRETER) && !defined(ia64_HOST_ARCH) && !defined (powerpc64_HOST_ARCH)
54 #define TABLES_NEXT_TO_CODE
55 #endif
56
57 /* -----------------------------------------------------------------------------
58    Labels - entry labels & info labels point to the same place in
59    TABLES_NEXT_TO_CODE, so we only generate the _info label.  Jumps
60    must therefore be directed to foo_info rather than foo_entry when
61    TABLES_NEXT_TO_CODE is on.
62
63    This isn't a good place for these macros, but they need to be
64    available to .cmm sources as well as C and we don't have a better
65    place.
66    -------------------------------------------------------------------------- */
67
68 #ifdef TABLES_NEXT_TO_CODE
69 #define ENTRY_LBL(f) f##_info
70 #else
71 #define ENTRY_LBL(f) f##_entry
72 #endif
73
74 #ifdef TABLES_NEXT_TO_CODE
75 #define RET_LBL(f) f##_info
76 #else
77 #define RET_LBL(f) f##_ret
78 #endif
79
80 #endif /* RTSCONFIG_H */