Commit beaf0404 authored by simonmar's avatar simonmar
Browse files

[project @ 2002-01-03 11:44:17 by simonmar]

Add comment.
parent 8ec6cc30
%
% (c) The GRASP/AQUA Project, Glasgow University, 1992-1998
%
% $Id: CgMonad.lhs,v 1.32 2001/11/23 11:46:31 simonmar Exp $
% $Id: CgMonad.lhs,v 1.33 2002/01/03 11:44:17 simonmar Exp $
%
\section[CgMonad]{The code generation monad}
......@@ -608,6 +608,10 @@ getEndOfBlockInfo = do
return eob_info
\end{code}
There is just one SRT for each top level binding; all the nested
bindings use sub-sections of this SRT. The label is passed down to
the nested bindings via the monad.
\begin{code}
getSRTInfo :: SRT -> FCode C_SRT
getSRTInfo NoSRT = return NoC_SRT
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment