summaryrefslogtreecommitdiff
path: root/compiler/utils/Util.hs
diff options
context:
space:
mode:
authorErik de Castro Lopo <erikd@mega-nerd.com>2016-10-23 08:30:19 +1100
committerErik de Castro Lopo <erikd@mega-nerd.com>2017-03-04 17:16:12 +1100
commit8bc809b7d3bc416d63eba96013553498c95ecc6f (patch)
tree685963d18a1e9eed2d8ee98484646b192435a8f8 /compiler/utils/Util.hs
parent96f5656d2ae885fa4b0227c4650b1c375e16dd00 (diff)
downloadhaskell-wip/erikd/rts.tar.gz
Enable new warning for bad CPP #if usagewip/erikd/rts
The C code in the RTS now gets built with `-Wundef` and the Haskell code (stages 1 and 2 only) with `-Wcpp-undef`. We now get warnings whereever `#if` is used on undefined identifiers.
Diffstat (limited to 'compiler/utils/Util.hs')
-rw-r--r--compiler/utils/Util.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/utils/Util.hs b/compiler/utils/Util.hs
index 5c09959f6d..b4e95f4a17 100644
--- a/compiler/utils/Util.hs
+++ b/compiler/utils/Util.hs
@@ -1337,7 +1337,7 @@ type HasCallStack = (() :: Constraint)
#endif
-- | A call stack constraint, but only when 'isDebugOn'.
-#if DEBUG
+#ifdef DEBUG
type HasDebugCallStack = HasCallStack
#else
type HasDebugCallStack = (() :: Constraint)