From 9c2904cafa657cdefd4177e8f16bd30e6b3a37ac Mon Sep 17 00:00:00 2001
From: Nicolas Frisby <nicolas.frisby@gmail.com>
Date: Tue, 19 Aug 2014 20:58:29 -0500
Subject: [PATCH] more recent validate requires LANGUAGE pragma
---
compiler/simplCore/SetLevels.lhs | 2 +-
1 file changed, 1 insertion(+), 1 deletion(-)
diff --git a/compiler/simplCore/SetLevels.lhs b/compiler/simplCore/SetLevels.lhs
index ad5b119137c2..0ed408a02267 100644
--- a/compiler/simplCore/SetLevels.lhs
+++ b/compiler/simplCore/SetLevels.lhs
@@ -1,4 +1,3 @@
-
% (c) The GRASP/AQUA Project, Glasgow University, 1992-1998
%
\section{SetLevels}
@@ -42,6 +41,7 @@
the scrutinee of the case, and we can inline it.
\begin{code}
+{-# LANGUAGE BangPatterns #-}
{-# LANGUAGE CPP #-}
{-# OPTIONS_GHC -fno-warn-tabs #-}
-- The above warning supression flag is a temporary kludge.
--
GitLab