From 8910b7b043a11c689005238843d6439b13a4240c Mon Sep 17 00:00:00 2001 From: Clemens Fruhwirth Date: Sat, 30 Jun 2007 08:22:43 +0000 Subject: [PATCH] Restrict .type directives to Linux targets only --- compiler/nativeGen/PprMach.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/compiler/nativeGen/PprMach.hs b/compiler/nativeGen/PprMach.hs index ba8a5d9..02ab265 100644 --- a/compiler/nativeGen/PprMach.hs +++ b/compiler/nativeGen/PprMach.hs @@ -694,12 +694,12 @@ pprGloblDecl lbl pprTypeAndSizeDecl :: CLabel -> Doc pprTypeAndSizeDecl lbl -#if mingw32_TARGET_OS - = empty -#else +#if linux_TARGET_OS | not (externallyVisibleCLabel lbl) = empty | otherwise = ptext SLIT(".type ") <> pprCLabel_asm lbl <> ptext SLIT(", @object") +#else + = empty #endif pprLabel :: CLabel -> Doc -- 1.7.10.4