summaryrefslogtreecommitdiff
path: root/libraries/ghci
diff options
context:
space:
mode:
authorBen Gamari <bgamari.foss@gmail.com>2017-10-16 17:36:14 -0400
committerBen Gamari <ben@smart-cactus.org>2017-10-16 17:36:15 -0400
commit366182af1860fd1312007ffe8bedfd0d12d1c171 (patch)
tree43b40caf66f71159a57f5d9fc44e5817b7e3d554 /libraries/ghci
parentd6c33da89b97d0d2a3b3b8f8077de8a09432d086 (diff)
downloadhaskell-366182af1860fd1312007ffe8bedfd0d12d1c171.tar.gz
ghci: Include "Rts.h" before using TABLES_NEXT_TO_CODE
Reviewers: austin Subscribers: rwbarton, thomie Differential Revision: https://phabricator.haskell.org/D4088
Diffstat (limited to 'libraries/ghci')
-rw-r--r--libraries/ghci/GHCi/InfoTable.hsc6
1 files changed, 3 insertions, 3 deletions
diff --git a/libraries/ghci/GHCi/InfoTable.hsc b/libraries/ghci/GHCi/InfoTable.hsc
index c553897b68..d650e246ba 100644
--- a/libraries/ghci/GHCi/InfoTable.hsc
+++ b/libraries/ghci/GHCi/InfoTable.hsc
@@ -1,5 +1,8 @@
{-# LANGUAGE CPP, MagicHash, ScopedTypeVariables #-}
+-- Get definitions for the structs, constants & config etc.
+#include "Rts.h"
+
-- |
-- Run-time info table support. This module provides support for
-- creating and reading info tables /in the running program/.
@@ -24,9 +27,6 @@ import System.IO.Unsafe -- needed for 2nd stage
type ItblCodes = Either [Word8] [Word32]
--- Get definitions for the structs, constants & config etc.
-#include "Rts.h"
-
-- Ultra-minimalist version specially for constructors
#if SIZEOF_VOID_P == 8
type HalfWord = Word32