X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=compiler%2FnativeGen%2FAlpha%2FInstr.hs;h=990ea8bc1acc7acf407ea931e9b7dd922aac1180;hb=b04a210e26ca57242fd052f2aa91011a80b76299;hp=e2d66d3c0229ef2a4e0ede823875e8b1d57dcde0;hpb=77ed23d51b968505b3ad8541c075657ae94f0ea3;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
 
 
+-}