/* -----------------------------------------------------------------------------
- * $Id: Stg.h,v 1.37 2001/08/14 13:40:08 sewardj Exp $
+ * $Id: Stg.h,v 1.49 2002/09/06 14:34:14 simonmar Exp $
*
* (c) The GHC Team, 1998-1999
*
*
* This file is included *automatically* by all .hc files.
*
+ * NOTE: always include Stg.h *before* any other headers, because we
+ * define some register variables which must be done before any inline
+ * functions are defined (some system headers have been known to
+ * define the odd inline function).
+ *
* ---------------------------------------------------------------------------*/
#ifndef STG_H
/* Configuration */
#include "config.h"
+#if __GNUC__ >= 3
+/* Assume that a flexible array member at the end of a struct
+ * can be defined thus: T arr[]; */
+#define FLEXIBLE_ARRAY
+#else
+/* Assume that it must be defined thus: T arr[0]; */
+#define FLEXIBLE_ARRAY 0
+#endif
+
+#if defined(SMP) || defined(THREADED_RTS)
+#define RTS_SUPPORTS_THREADS 1
+#endif
+
/* Some macros to handle DLLing (Win32 only at the moment). */
#include "StgDLL.h"
*
* UNDEFINING THIS WON'T WORK ON ITS OWN. You have been warned.
*/
-#ifndef USE_MINIINTERPRETER
+#if !defined(USE_MINIINTERPRETER) && !defined(ia64_TARGET_ARCH)
#define TABLES_NEXT_TO_CODE
#endif
_stgAssert(__FILE__, __LINE__)
#endif /* DEBUG */
+/*
+ * Use this on the RHS of macros which expand to nothing
+ * to make sure that the macro can be used in a context which
+ * demands a non-empty statement.
+ */
+
+#define doNothing() do { } while (0)
+
/* -----------------------------------------------------------------------------
Global type definitions
-------------------------------------------------------------------------- */
/* Profiling information */
#include "StgProf.h"
+#include "StgLdvProf.h"
/* Storage format definitions */
#include "Closures.h"
/* RTS public interface */
#include "RtsAPI.h"
-/* these are all ANSI C headers */
-#include <stdlib.h>
-#include <string.h>
-#include <math.h>
-#include <assert.h>
-#include <errno.h>
-#include <stdio.h>
-
-#ifdef HAVE_SIGNAL_H
-#include <signal.h>
-#endif
-
-#ifdef HAVE_UNISTD_H
-#include <unistd.h>
-#endif
-
#ifdef SMP
#include <pthread.h>
#endif
/* Runtime-system hooks */
#include "Hooks.h"
+#include "Signals.h"
+
#include "HsFFI.h"
/* Misc stuff without a home */
DLL_IMPORT_RTS extern char **prog_argv; /* so we can get at these from Haskell */
DLL_IMPORT_RTS extern int prog_argc;
-extern char **environ;
-
extern void stackOverflow(void);
/* Creating and destroying an adjustor thunk.