Home My Page Projects Code Snippets Project Openings diderot
Summary Activity Tracker Tasks SCM

SCM Repository

[diderot] Diff of /branches/pure-cfg/src/compiler/mid-to-low/mid-to-low.sml
ViewVC logotype

Diff of /branches/pure-cfg/src/compiler/mid-to-low/mid-to-low.sml

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

revision 876, Wed Apr 20 00:33:21 2011 UTC revision 877, Wed Apr 20 00:44:04 2011 UTC
# Line 262  Line 262 
262                  end                  end
263            val (tmp, code) = gen (0, sizes, indices)            val (tmp, code) = gen (0, sizes, indices)
264            val t = DstIL.Var.new ("index", DstTy.intTy)            val t = DstIL.Var.new ("index", DstTy.intTy)
 val _ = print(concat["binding ", DstIL.Var.toString t, " = ", DstIL.Var.toString ix1, " + ",  
 DstIL.Var.toString tmp, "\n"])  
265            val code = iadd(t, ix1, tmp) :: code            val code = iadd(t, ix1, tmp) :: code
266            val (offp, code) = adjustForStrideAndOffset (stride, offset, t, code)            val (offp, code) = adjustForStrideAndOffset (stride, offset, t, code)
267            val addrTy = DstTy.AddrTy info            val addrTy = DstTy.AddrTy info

Legend:
Removed from v.876  
changed lines
  Added in v.877

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