summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorThomas Schilling <nominolo@googlemail.com>2008-07-20 17:07:08 +0000
committerThomas Schilling <nominolo@googlemail.com>2008-07-20 17:07:08 +0000
commit67bfcb05c487f180f33c62651b28f4136f2b3910 (patch)
treef829df8559f764fb99a6611e0d152cf0ad51423e
parent4a6f2bc7c3da7e74192339502704877bfc12ccc1 (diff)
downloadhaskell-67bfcb05c487f180f33c62651b28f4136f2b3910.tar.gz
Fix Haddock errors.
-rw-r--r--compiler/codeGen/CgStackery.lhs2
-rw-r--r--compiler/codeGen/ClosureInfo.lhs3
2 files changed, 3 insertions, 2 deletions
diff --git a/compiler/codeGen/CgStackery.lhs b/compiler/codeGen/CgStackery.lhs
index 4196997f7a..b8db38d4ed 100644
--- a/compiler/codeGen/CgStackery.lhs
+++ b/compiler/codeGen/CgStackery.lhs
@@ -303,7 +303,7 @@ emitPushUpdateFrame frame_addr updatee = do
off_updatee :: ByteOff
off_updatee = fixedHdrSize*wORD_SIZE + oFFSET_StgUpdateFrame_updatee
-\end{code}
+\end{code}
%************************************************************************
diff --git a/compiler/codeGen/ClosureInfo.lhs b/compiler/codeGen/ClosureInfo.lhs
index 23113d2afb..25cde6fd88 100644
--- a/compiler/codeGen/ClosureInfo.lhs
+++ b/compiler/codeGen/ClosureInfo.lhs
@@ -598,7 +598,8 @@ getCallMethod name (LFCon con) n_args
ReturnCon con
getCallMethod name (LFThunk _ _ updatable std_form_info is_fun) n_args
- | is_fun -- *Might* be a function, so we must "call" it (which is always safe)
+ | is_fun -- it *might* be a function, so we must "call" it (which is
+ -- always safe)
= SlowCall -- We cannot just enter it [in eval/apply, the entry code
-- is the fast-entry code]