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/ppc/ra/ppcSpillInstr.sml
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/ppc/ra/ppcSpillInstr.sml

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

revision 1293, Wed Dec 11 21:56:57 2002 UTC revision 1294, Thu Dec 12 21:22:48 2002 UTC
# Line 44  Line 44 
44    
45    fun spillF (instr, reg, ea) = let    fun spillF (instr, reg, ea) = let
46          val newR = C.newFreg()          val newR = C.newFreg()
47          val instr' = Rewrite.rewriteDef(instr, reg, newR)          val instr' = Rewrite.frewriteDef(instr, reg, newR)
48        in        in
49            {code=[instr', storeToEA CB.FP (newR, ea)],            {code=[instr', storeToEA CB.FP (newR, ea)],
50             proh=[newR],             proh=[newR],
# Line 63  Line 63 
63    
64    fun reloadF(instr, reg, ea) = let    fun reloadF(instr, reg, ea) = let
65      val newR = C.newFreg()      val newR = C.newFreg()
66      val instr' = Rewrite.rewriteUse(instr, reg, newR)      val instr' = Rewrite.frewriteUse(instr, reg, newR)
67    in    in
68        {code=[loadFromEA CB.FP (newR, ea), instr'],        {code=[loadFromEA CB.FP (newR, ea), instr'],
69         proh=[newR],         proh=[newR],

Legend:
Removed from v.1293  
changed lines
  Added in v.1294

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