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/compiler/CodeGen/ppc/ppcCG.sml
ViewVC logotype

Diff of /sml/trunk/src/compiler/CodeGen/ppc/ppcCG.sml

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

revision 795, Fri Mar 2 19:10:50 2001 UTC revision 796, Tue Mar 6 00:04:33 2001 UTC
# Line 77  Line 77 
77                                      disp=I.ImmedOp(SpillTable.getRegLoc loc)})}                                      disp=I.ImmedOp(SpillTable.getRegLoc loc)})}
78    
79                (* spill register *)                (* spill register *)
80               fun spillInstr(_, rs,loc) =               fun spillInstr{src,spilledCell,spillLoc,an} =
81                   [I.ST{st=I.STW, ra=sp, d=I.ImmedOp(SpillTable.getRegLoc loc),                   [I.ST{st=I.STW, ra=sp,
82                         rs=rs, mem=spill}]                         d=I.ImmedOp(SpillTable.getRegLoc spillLoc),
83                           rs=src, mem=spill}]
84               (* reload register *)               (* reload register *)
85               fun reloadInstr(_, rt,loc) =               fun reloadInstr{dst,spilledCell,spillLoc,an} =
86                   [I.L{ld=I.LWZ, ra=sp, d=I.ImmedOp(SpillTable.getRegLoc loc),                   [I.L{ld=I.LWZ, ra=sp,
87                       rt=rt, mem=spill}]                        d=I.ImmedOp(SpillTable.getRegLoc spillLoc),
88                          rt=dst, mem=spill}]
89    
90                 val mode = RACore.NO_OPTIMIZATION
91           end           end
92           structure Float =           structure Float =
93           struct           struct
# Line 111  Line 114 
114               fun reloadInstr(_, ft,loc) =               fun reloadInstr(_, ft,loc) =
115                   [I.LF{ld=I.LFD, ra=sp, d=I.ImmedOp(SpillTable.getFregLoc loc),                   [I.LF{ld=I.LFD, ra=sp, d=I.ImmedOp(SpillTable.getFregLoc loc),
116                         ft=ft, mem=spill}]                         ft=ft, mem=spill}]
117    
118                 val mode = RACore.NO_OPTIMIZATION
119           end           end
120          )          )
121    )    )

Legend:
Removed from v.795  
changed lines
  Added in v.796

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