diff options
| author | David Terei <davidterei@gmail.com> | 2012-01-05 18:14:20 -0800 |
|---|---|---|
| committer | David Terei <davidterei@gmail.com> | 2012-01-05 18:14:49 -0800 |
| commit | 155ce292c6a057b6338e9baa2affb93d1eebb465 (patch) | |
| tree | be788d54f7a9dc25770e57c9d50c455d4ce1ec71 /compiler/stgSyn | |
| parent | b540be06522f8822377c1d3b9c337372c157d663 (diff) | |
| download | haskell-155ce292c6a057b6338e9baa2affb93d1eebb465.tar.gz | |
Fix haddock validate problem.
Diffstat (limited to 'compiler/stgSyn')
| -rw-r--r-- | compiler/stgSyn/StgSyn.lhs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/compiler/stgSyn/StgSyn.lhs b/compiler/stgSyn/StgSyn.lhs index bfaee50050..defec7516b 100644 --- a/compiler/stgSyn/StgSyn.lhs +++ b/compiler/stgSyn/StgSyn.lhs @@ -354,12 +354,12 @@ And so the code for let(rec)-things: | StgLetNoEscape -- remember: ``advanced stuff'' (GenStgLiveVars occ) -- Live in the whole let-expression -- Mustn't overwrite these stack slots - -- *Doesn't* include binders of the let(rec). + -- _Doesn't_ include binders of the let(rec). (GenStgLiveVars occ) -- Live in the right hand sides (only) -- These are the ones which must be saved on -- the stack if they aren't there already - -- *Does* include binders of the let(rec) if recursive. + -- _Does_ include binders of the let(rec) if recursive. (GenStgBinding bndr occ) -- right hand sides (see below) (GenStgExpr bndr occ) -- body |