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/mk-low-ir.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/mid-to-low/mk-low-ir.sml

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

revision 3831, Thu May 5 22:17:06 2016 UTC revision 3832, Fri May 6 15:08:12 2016 UTC
# Line 55  Line 55 
55      val vecMul   : AvailRHS.t * int * LowIR.var * LowIR.var -> LowIR.var      val vecMul   : AvailRHS.t * int * LowIR.var * LowIR.var -> LowIR.var
56      val vecNeg   : AvailRHS.t * int * LowIR.var -> LowIR.var      val vecNeg   : AvailRHS.t * int * LowIR.var -> LowIR.var
57      val vecSum   : AvailRHS.t * int * LowIR.var -> LowIR.var      val vecSum   : AvailRHS.t * int * LowIR.var -> LowIR.var
     val vecProj  : AvailRHS.t * int * LowIR.var * int -> LowIR.var  
58      val vecDot   : AvailRHS.t * int * LowIR.var * LowIR.var -> LowIR.var      val vecDot   : AvailRHS.t * int * LowIR.var * LowIR.var -> LowIR.var
59    
60    (* tensor operations *)    (* tensor operations *)
# Line 150  Line 149 
149      val vecMul = vecOp2 Op.VMul      val vecMul = vecOp2 Op.VMul
150      val vecNeg = vecOp1 Op.VNeg      val vecNeg = vecOp1 Op.VNeg
151      fun vecSum (avail, dim, v) = add (avail, "vsm", Ty.realTy, IR.OP(Op.VSum dim, [v]))      fun vecSum (avail, dim, v) = add (avail, "vsm", Ty.realTy, IR.OP(Op.VSum dim, [v]))
     fun vecProj (avail, dim, x, i) =  
           add (avail, "v", Ty.TensorTy[dim], IR.OP(Op.VProj(dim, i), [x]))  
152      end (* local *)      end (* local *)
153    
154      fun vecDot (avail, vecIX, a, b) =      fun vecDot (avail, vecIX, a, b) =

Legend:
Removed from v.3831  
changed lines
  Added in v.3832

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