[project @ 2001-03-01 17:08:31 by simonpj]

Formatting only

diff --git a/ghc/compiler/basicTypes/Var.lhs b/ghc/compiler/basicTypes/Var.lhs
index 2d9f068..a7c4e3c 100644 (file)
--- a/ghc/compiler/basicTypes/Var.lhs
+++ b/ghc/compiler/basicTypes/Var.lhs
@@ -250,8 +250,8 @@ modifyIdInfo fn var@(Var {varInfo = info})
 -- maybeModifyIdInfo tries to avoid unnecesary thrashing
 maybeModifyIdInfo :: (IdInfo -> Maybe IdInfo) -> Id -> Id
 maybeModifyIdInfo fn var@(Var {varInfo = info}) = case fn info of
-                                               Nothing       -> var
-                                               Just new_info -> var {varInfo = new_info}
+                                                       Nothing       -> var
+                                                       Just new_info -> var {varInfo = new_info}
 \end{code}
 
 \begin{code}