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 /MLRISC/trunk/scheduling/bbDDGViewer.sml
ViewVC logotype

Diff of /MLRISC/trunk/scheduling/bbDDGViewer.sml

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

revision 695, Mon Aug 7 23:57:38 2000 UTC revision 775, Fri Jan 12 01:17:51 2001 UTC
# Line 19  Line 19 
19    
20     val toString = FormatInsn.toString []     val toString = FormatInsn.toString []
21    
22     fun view regmap ddg =     fun view ddg =
23         GraphViewer.view         GraphViewer.view
24           (GraphLayout.makeLayout           (GraphLayout.makeLayout
25             {graph = fn _ => [],             {graph = fn _ => [],
26              node  = fn (_,i) => [L.LABEL(toString regmap i)],              node  = fn (_,i) => [L.LABEL(toString i)],
27              edge  = fn (_,_,lat) => [L.LABEL(Int.toString lat),edgeColor]              edge  = fn (_,_,lat) => [L.LABEL(Int.toString lat),edgeColor]
28             }             }
29             ddg             ddg

Legend:
Removed from v.695  
changed lines
  Added in v.775

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