From 366182af1860fd1312007ffe8bedfd0d12d1c171 Mon Sep 17 00:00:00 2001
From: Ben Gamari <bgamari.foss@gmail.com>
Date: Mon, 16 Oct 2017 17:36:14 -0400
Subject: ghci: Include "Rts.h" before using TABLES_NEXT_TO_CODE

Reviewers: austin

Subscribers: rwbarton, thomie

Differential Revision: https://phabricator.haskell.org/D4088
---
 libraries/ghci/GHCi/InfoTable.hsc | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'libraries/ghci')

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
-- 
cgit v1.2.1