diff options
| author | Ian Lynagh <igloo@earth.li> | 2011-10-19 16:36:40 +0100 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2011-10-19 16:36:40 +0100 |
| commit | a6f9ebc58b0dc632bb01d0f202a7581ed02466ce (patch) | |
| tree | 8171dd582c11f3ea058aa2bf35a028aa4228490b /compiler/utils/Platform.hs | |
| parent | 7ef5b2939076902ee54c9f1a2c50d55b274e4388 (diff) | |
| download | haskell-a6f9ebc58b0dc632bb01d0f202a7581ed02466ce.tar.gz | |
Add "have subsections via symbols" to the Platform type
Diffstat (limited to 'compiler/utils/Platform.hs')
| -rw-r--r-- | compiler/utils/Platform.hs | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/compiler/utils/Platform.hs b/compiler/utils/Platform.hs index 373c7bec33..89d98e6606 100644 --- a/compiler/utils/Platform.hs +++ b/compiler/utils/Platform.hs @@ -19,9 +19,11 @@ import Panic -- | Contains enough information for the native code generator to emit -- code for this platform. data Platform - = Platform - { platformArch :: Arch - , platformOS :: OS } + = Platform { + platformArch :: Arch, + platformOS :: OS, + platformHasSubsectionsViaSymbols :: Bool + } deriving (Read, Show, Eq) |