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

SCM Repository

[diderot] Diff of /trunk/src/compiler/cl-target/tree-to-cl.sml
ViewVC logotype

Diff of /trunk/src/compiler/cl-target/tree-to-cl.sml

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

revision 1890, Fri May 25 16:28:16 2012 UTC revision 1891, Fri May 25 16:28:56 2012 UTC
# Line 165  Line 165 
165                  in                  in
166                    CL.mkSubscript(vecExp, ix)                    CL.mkSubscript(vecExp, ix)
167                  end                  end
168                | (Op.Subscript(Ty.SeqTy(Ty.TensorTy[], n)), [v, CL.E_Int(ix, _)]) => vecIndex (v, Int.fromLarge ix)
169              | (Op.Subscript(Ty.SeqTy(ty, n)), [v, ix]) => CL.mkSubscript(v, ix)              | (Op.Subscript(Ty.SeqTy(ty, n)), [v, ix]) => CL.mkSubscript(v, ix)
170              | (Op.Subscript(Ty.TensorTy[n]), [v, CL.E_Int(ix, _)]) => vecIndex (v, Int.fromLarge ix)              | (Op.Subscript(Ty.TensorTy[n]), [v, CL.E_Int(ix, _)]) => vecIndex (v, Int.fromLarge ix)
171              | (Op.Subscript(Ty.TensorTy[n]), [v, ix]) => let              | (Op.Subscript(Ty.TensorTy[n]), [v, ix]) => let

Legend:
Removed from v.1890  
changed lines
  Added in v.1891

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