Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /sml/trunk/src/MLRISC/block-placement/weighted-block-placement-fn.sml
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/block-placement/weighted-block-placement-fn.sml

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1181, Wed Mar 27 21:27:27 2002 UTC revision 1182, Thu Mar 28 16:41:29 2002 UTC
# Line 141  Line 141 
141                  end                  end
142            val lookupChain = ITbl.lookup blkTbl            val lookupChain = ITbl.lookup blkTbl
143          (* the unique exit node *)          (* the unique exit node *)
144            val exitId = hd(#exits graph ())            val exitId = CFG.exitId cfg
145          (* given an edge that connects two blocks, attempt to merge their chains.          (* given an edge that connects two blocks, attempt to merge their chains.
146           * We return true if a merge occurred.  We do not join exit edges so that           * We return true if a merge occurred.  We do not join exit edges so that
147           * the exit and entry nodes end up in distinct chains.           * the exit and entry nodes end up in distinct chains.

Legend:
Removed from v.1181  
changed lines
  Added in v.1182

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0