X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FnativeGen%2FAlpha%2FInstr.hs;h=990ea8bc1acc7acf407ea931e9b7dd922aac1180;hb=0bff9925654d75ef0fd8fb5d48b700337ebd8f47;hp=e2d66d3c0229ef2a4e0ede823875e8b1d57dcde0;hpb=a12e845684c10955bc594cdb20d1f13fae14873d;p=ghc-hetmet.git

diff --git a/compiler/nativeGen/Alpha/Instr.hs b/compiler/nativeGen/Alpha/Instr.hs
index e2d66d3..990ea8b 100644
--- a/compiler/nativeGen/Alpha/Instr.hs
+++ b/compiler/nativeGen/Alpha/Instr.hs
@@ -10,13 +10,14 @@
 #include "nativeGen/NCG.h"
 
 module Alpha.Instr (
-	Cond(..),
-	Instr(..),
-	RI(..)
+--	Cond(..),
+--	Instr(..),
+--	RI(..)
 )
 
 where
 
+{-
 import BlockId
 import Regs
 import Cmm
@@ -138,3 +139,4 @@ data Instr
 	| FUNEND CLabel
 
 
+-}