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/amd64/ra/amd64RegAlloc.sml
ViewVC logotype

Diff of /MLRISC/trunk/amd64/ra/amd64RegAlloc.sml

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

revision 2792, Tue Oct 9 12:38:22 2007 UTC revision 2793, Thu Oct 18 21:42:43 2007 UTC
# Line 423  Line 423 
423          val printCFG = if !amd64CfgDebugFlg          val printCFG = if !amd64CfgDebugFlg
424                then PrintFlowgraph.printCFG (!MLRiscControl.debug_stream)                then PrintFlowgraph.printCFG (!MLRiscControl.debug_stream)
425                else fn msg => fn _ => ()                else fn msg => fn _ => ()
426    val _ = printCFG "\t---Before register allocation---\n" cfg;
427          val s = beforeRA cfg          val s = beforeRA cfg
428          val _ = resetRA ()          val _ = resetRA ()
429          val cfg' = RA.ra [raInt s, raFloat s] cfg          val cfg' = RA.ra [raInt s, raFloat s] cfg

Legend:
Removed from v.2792  
changed lines
  Added in v.2793

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