summaryrefslogtreecommitdiff
path: root/rts/RtsMessages.c
diff options
context:
space:
mode:
authorBartosz Nitka <niteria@gmail.com>2018-05-12 07:31:20 -0700
committerBartosz Nitka <niteria@gmail.com>2018-05-12 07:31:20 -0700
commitbec2e71e9869815c058dda9ebb6eb483352aa480 (patch)
tree54a09f6462d0fe2355256af60191a874e3f9d16e /rts/RtsMessages.c
parent2323ffdd552327a8954de8ac37908029ec7cad38 (diff)
downloadhaskell-bec2e71e9869815c058dda9ebb6eb483352aa480.tar.gz
Revert "Fix unwinding of C -> Haskell FFI calls with -threaded"
This reverts commit cb5c2fe875965b7aedbc189012803fc62e48fb3f. It appears to have broken OSX and Windows builds.
Diffstat (limited to 'rts/RtsMessages.c')
-rw-r--r--rts/RtsMessages.c4
1 files changed, 3 insertions, 1 deletions
diff --git a/rts/RtsMessages.c b/rts/RtsMessages.c
index 053805e763..d976760242 100644
--- a/rts/RtsMessages.c
+++ b/rts/RtsMessages.c
@@ -8,7 +8,6 @@
#include "PosixSource.h"
#include "Rts.h"
-#include "RtsUtils.h"
#include "eventlog/EventLog.h"
@@ -133,6 +132,9 @@ isGUIApp(void)
}
#endif
+#define xstr(s) str(s)
+#define str(s) #s
+
void GNU_ATTRIBUTE(__noreturn__)
rtsFatalInternalErrorFn(const char *s, va_list ap)
{