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/alpha32/alpha32CG.sml
ViewVC logotype

Diff of /sml/trunk/src/compiler/CodeGen/alpha32/alpha32CG.sml

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

revision 773, Mon Jan 8 16:18:37 2001 UTC revision 796, Tue Mar 6 00:04:33 2001 UTC
# Line 78  Line 78 
78                           dst=dst,src=src,impl=impl}                           dst=dst,src=src,impl=impl}
79    
80                (* spill register *)                (* spill register *)
81                fun spillInstr(_, r,loc) =                fun spillInstr{src,spilledCell,spillLoc,an} =
82                    [I.STORE{stOp=I.STL, b=sp,                    [I.STORE{stOp=I.STL, b=sp,
83                             d=I.IMMop(SpillTable.getRegLoc loc),                             d=I.IMMop(SpillTable.getRegLoc spillLoc),
84                             r=r, mem=spill}]                             r=src, mem=spill}]
85    
86                (* reload register *)                (* reload register *)
87                fun reloadInstr(_, r,loc) =                fun reloadInstr{dst,spilledCell,spillLoc,an} =
88                    [I.LOAD{ldOp=I.LDL, b=sp,                    [I.LOAD{ldOp=I.LDL, b=sp,
89                            d=I.IMMop(SpillTable.getRegLoc loc),                            d=I.IMMop(SpillTable.getRegLoc spillLoc),
90                            r=r, mem=spill}]                            r=dst, mem=spill}]
91    
92                  val mode = RACore.NO_OPTIMIZATION
93            end            end
94    
95            structure Float =            structure Float =
# Line 114  Line 116 
116                    [I.FLOAD{ldOp=I.LDT, b=sp,                    [I.FLOAD{ldOp=I.LDT, b=sp,
117                             d=I.IMMop(SpillTable.getFregLoc loc),                             d=I.IMMop(SpillTable.getFregLoc loc),
118                             r=r, mem=spill}]                             r=r, mem=spill}]
119    
120                  val mode = RACore.NO_OPTIMIZATION
121            end            end
122           )           )
123    )    )

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

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