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

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/mid-to-low/ein-to-vector.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/mid-to-low/ein-to-vector.sml

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

revision 3804, Tue May 3 18:03:41 2016 UTC revision 3805, Tue May 3 18:38:31 2016 UTC
# Line 75  Line 75 
75      fun paramToVar (_, _, Param{arg, ix = [], ...}) = arg      fun paramToVar (_, _, Param{arg, ix = [], ...}) = arg
76        | paramToVar (avail, mapp, Param{id, arg, ix, kind}) = (        | paramToVar (avail, mapp, Param{id, arg, ix, kind}) = (
77            case (kind, LowIR.Var.ty arg)            case (kind, LowIR.Var.ty arg)
78             of (Indx, ty) => AvailRHS.addAssign (             of (Indx, ty) => Mk.tensorIndex (avail, mapp, arg, ix)
                 avail, "indx", Ty.realTy,  
                 IR.OP(Op.TensorIndex(ty, alphaToIdxs (mapp, ix)), [arg]))  
79              | (Proj dim, ty) => AvailRHS.addAssign (              | (Proj dim, ty) => AvailRHS.addAssign (
80                  avail, "proj", Ty.TensorTy[dim],                  avail, "proj", Ty.TensorTy[dim],
81                  IR.OP(Op.ProjectLast(ty, alphaToIdxs (mapp, ix)), [arg]))                  IR.OP(Op.ProjectLast(ty, alphaToIdxs (mapp, ix)), [arg]))

Legend:
Removed from v.3804  
changed lines
  Added in v.3805

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