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