From 36d394f32e5617a9fca6061bdd1683032812b829 Mon Sep 17 00:00:00 2001
From: rrt <unknown>
Date: Thu, 12 Jul 2001 12:59:48 +0000
Subject: [PATCH] [project @ 2001-07-12 12:59:48 by rrt] Fix spacing

---
 ghc/compiler/typecheck/TcForeign.lhs |    2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/ghc/compiler/typecheck/TcForeign.lhs b/ghc/compiler/typecheck/TcForeign.lhs
index 761fd10..5812a76 100644
--- a/ghc/compiler/typecheck/TcForeign.lhs
+++ b/ghc/compiler/typecheck/TcForeign.lhs
@@ -124,7 +124,7 @@ tcCheckFIType sig_ty arg_tys res_ty (CImport (CCallSpec target _ safety))
 
   | otherwise 		-- Normal foreign import
   = checkCg (if isCasmTarget target
-	     then checkC else checkCOrAsmOrDotNet)			`thenNF_Tc_`
+	     then checkC else checkCOrAsmOrDotNet)		`thenNF_Tc_`
     checkCTarget target						`thenNF_Tc_`
     getDOptsTc							`thenNF_Tc` \ dflags ->
     checkForeignArgs (isFFIArgumentTy dflags safety) arg_tys	`thenNF_Tc_`
-- 
1.7.10.4