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/hppa/ra/hppaSpillInstr.sml
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/hppa/ra/hppaSpillInstr.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 47  Line 47 
47    
48    fun spillF (instr, reg, ea) = let    fun spillF (instr, reg, ea) = let
49          val newR = C.newFreg()          val newR = C.newFreg()
50          val instr' = Rewrite.rewriteDef(instr, reg, newR)          val instr' = Rewrite.frewriteDef(instr, reg, newR)
51        in        in
52            {code=instr' :: storeToEA CB.FP (newR, ea),            {code=instr' :: storeToEA CB.FP (newR, ea),
53             proh=[newR],             proh=[newR],
# Line 66  Line 66 
66    
67    fun reloadF(instr, reg, ea) = let    fun reloadF(instr, reg, ea) = let
68      val newR = C.newFreg()      val newR = C.newFreg()
69      val instr' = Rewrite.rewriteUse(instr, reg, newR)      val instr' = Rewrite.frewriteUse(instr, reg, newR)
70    in    in
71        {code=loadFromEA CB.FP (newR, ea) @ [instr'],        {code=loadFromEA CB.FP (newR, ea) @ [instr'],
72         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