patches/patch-compiler_main_SysTools.lhs

   1 $NetBSD$
   2
   3 For systems having as(1) that doesn't recognise .ident
   4 directives. (Already merged to the upstream)
   5
   6
   7 --- compiler/main/SysTools.lhs.orig     2012-02-01 18:10:32.000000000 +0000
   8 +++ compiler/main/SysTools.lhs
   9 @@ -194,6 +194,7 @@ initSysTools mbMinusB
  10          ; targetOS <- readSetting "target os"
  11          ; targetWordSize <- readSetting "target word size"
  12          ; targetHasGnuNonexecStack <- readSetting "target has GNU nonexec stack"
  13 +        ; targetHasIdentDirective <- readSetting "target has .ident directive"
  14          ; targetHasSubsectionsViaSymbols <- readSetting "target has subsections via symbols"
  15          ; myExtraGccViaCFlags <- getSetting "GCC extra via C opts"
  16          -- On Windows, mingw is distributed with GHC,
  17 @@ -259,6 +260,7 @@ initSysTools mbMinusB
  18                                                platformOS   = targetOS,
  19                                                platformWordSize = targetWordSize,
  20                                                platformHasGnuNonexecStack = targetHasGnuNonexecStack,
  21 +                                              platformHasIdentDirective = targetHasIdentDirective,
  22                                                platformHasSubsectionsViaSymbols = targetHasSubsectionsViaSymbols
  23                                            },
  24                          sTmpDir = normalise tmpdir,