From 57c02891f82bcfd366945b8583399da963ad5478 Mon Sep 17 00:00:00 2001
From: "simonpj@microsoft.com" <unknown>
Date: Mon, 4 Feb 2008 16:05:14 +0000
Subject: [PATCH] Fix DEBUG build

---
 compiler/basicTypes/Unique.lhs |    3 +++
 1 file changed, 3 insertions(+)

diff --git a/compiler/basicTypes/Unique.lhs b/compiler/basicTypes/Unique.lhs
index 36a5352..4028786 100644
--- a/compiler/basicTypes/Unique.lhs
+++ b/compiler/basicTypes/Unique.lhs
@@ -54,6 +54,9 @@ import BasicTypes
 import FastTypes
 import FastString
 import Outputable
+#ifdef DEBUG
+import StaticFlags	( opt_SuppressUniques )
+#endif
 
 #if defined(__GLASGOW_HASKELL__)
 --just for implementing a fast [0,61) -> Char function
-- 
1.7.10.4