diff options
Diffstat (limited to 'libraries/ghc-boot/GHC/Settings.hs')
| -rw-r--r-- | libraries/ghc-boot/GHC/Settings.hs | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/libraries/ghc-boot/GHC/Settings.hs b/libraries/ghc-boot/GHC/Settings.hs index 96680dc58e..fd0a0ef3ad 100644 --- a/libraries/ghc-boot/GHC/Settings.hs +++ b/libraries/ghc-boot/GHC/Settings.hs @@ -36,6 +36,7 @@ getTargetPlatform settingsFile mySettings = do targetArch <- readSetting "target arch" targetOS <- readSetting "target os" targetWordSize <- readSetting "target word size" + targetWordBigEndian <- getBooleanSetting "target word big endian" targetUnregisterised <- getBooleanSetting "Unregisterised" targetHasGnuNonexecStack <- getBooleanSetting "target has GNU nonexec stack" targetHasIdentDirective <- getBooleanSetting "target has .ident directive" @@ -48,6 +49,7 @@ getTargetPlatform settingsFile mySettings = do , platformMini_os = targetOS } , platformWordSize = targetWordSize + , platformByteOrder = if targetWordBigEndian then BigEndian else LittleEndian , platformUnregisterised = targetUnregisterised , platformHasGnuNonexecStack = targetHasGnuNonexecStack , platformHasIdentDirective = targetHasIdentDirective |