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/demo/demo-alpha.sml
ViewVC logotype

Diff of /sml/trunk/src/MLRISC/demo/demo-alpha.sml

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

revision 744, Fri Dec 8 04:11:42 2000 UTC revision 796, Tue Mar 6 00:04:33 2001 UTC
# Line 220  Line 220 
220              | copy((rds, rss), I.COPY{tmp, ...}) =              | copy((rds, rss), I.COPY{tmp, ...}) =
221                I.COPY{dst=rds, src=rss, impl=ref NONE, tmp=tmp}                I.COPY{dst=rds, src=rss, impl=ref NONE, tmp=tmp}
222            (* spill register *)            (* spill register *)
223            fun spillInstr(_,r,loc) =            fun spillInstr{an,src,spilledCell,spillLoc}
224                [I.STORE{stOp=I.STL, b=sp, d=I.IMMop(get loc),                [I.STORE{stOp=I.STL, b=sp, d=I.IMMop(get spillLoc),
225                         r=r, mem=spill}]                         r=src, mem=spill}]
226    
227            (* spill copy temp *)            (* spill copy temp *)
228            fun spillCopyTmp(_,I.COPY{tmp,dst,src,impl},loc) =            fun spillCopyTmp(_,I.COPY{tmp,dst,src,impl},loc) =
# Line 230  Line 230 
230                       dst=dst,src=src,impl=impl}                       dst=dst,src=src,impl=impl}
231    
232            (* reload register *)            (* reload register *)
233            fun reloadInstr(_,r,loc) =             fun reloadInstr{an,dst,spilledCell,spillLoc} =
234                [I.LOAD{ldOp=I.LDL, b=sp, d=I.IMMop(get loc), r=r, mem=spill}]                 [I.LOAD{ldOp=I.LDL, b=sp, d=I.IMMop(get spillLoc), r=dst,
235                         mem=spill}]
236         end         end
237    
238         structure Float =         structure Float =

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

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