X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FnativeGen%2FAlpha%2FInstr.hs;h=990ea8bc1acc7acf407ea931e9b7dd922aac1180;hb=703ca1542c8e0983cc9d8eebce6e9f3dd3fd71e2;hp=16ec53f299b9b522a98d07a102bcb7d29301669a;hpb=92ee78e03c3670f56ebbbbfb0f67a00f9ea1305f;p=ghc-hetmet.git

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