diff options
| author | Ian Lynagh <igloo@earth.li> | 2007-09-01 11:21:30 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2007-09-01 11:21:30 +0000 |
| commit | 17b297d97d327620ed6bfab942f8992b2446f1bf (patch) | |
| tree | c84753f3bbbc9a1f0a262abfad5ddcf9d5b6271b /compiler/simplCore/LiberateCase.lhs | |
| parent | e11fa7a5e0025460df3b8562ccbf3ffd1db68d5d (diff) | |
| download | haskell-17b297d97d327620ed6bfab942f8992b2446f1bf.tar.gz | |
Add {-# OPTIONS_GHC -w #-} and some blurb to all compiler modules
Diffstat (limited to 'compiler/simplCore/LiberateCase.lhs')
| -rw-r--r-- | compiler/simplCore/LiberateCase.lhs | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/compiler/simplCore/LiberateCase.lhs b/compiler/simplCore/LiberateCase.lhs index 8f63e9dc94..8eab111956 100644 --- a/compiler/simplCore/LiberateCase.lhs +++ b/compiler/simplCore/LiberateCase.lhs @@ -4,6 +4,13 @@ \section[LiberateCase]{Unroll recursion to allow evals to be lifted from a loop} \begin{code} +{-# OPTIONS_GHC -w #-} +-- The above warning supression flag is a temporary kludge. +-- While working on this module you are encouraged to remove it and fix +-- any warnings in the module. See +-- http://hackage.haskell.org/trac/ghc/wiki/WorkingConventions#Warnings +-- for details + module LiberateCase ( liberateCase ) where #include "HsVersions.h" |