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

SCM Repository

[diderot] Diff of /branches/vis12/src/compiler/translate/translate-basis.sml
ViewVC logotype

Diff of /branches/vis12/src/compiler/translate/translate-basis.sml

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

revision 1944, Thu Jul 5 17:19:46 2012 UTC revision 1945, Fri Jul 6 14:54:21 2012 UTC
# Line 179  Line 179 
179                                            in                                            in
180                                              assign (y, rator, xs)                                              assign (y, rator, xs)
181                                            end),                                            end),
182                    (BV.op_colon,           fn (y, [sh1, sh2, _], xs) => let
183                                              val ty1 as DstTy.TensorTy dd1 = pruneShape sh1
184                                              val ty2 as DstTy.TensorTy dd2 = pruneShape sh2
185                                              in
186                                                assign (y, Op.ColonMul(ty1, ty2), xs)
187                                              end),
188                  (BV.fn_inside,          fn (y, [_, dv, _], xs) =>                  (BV.fn_inside,          fn (y, [_, dv, _], xs) =>
189                                            assign(y, Op.Inside(pruneDim(MV.toDim dv)), xs)),                                            assign(y, Op.Inside(pruneDim(MV.toDim dv)), xs)),
190                  (BV.clamp_rrr,          simpleOp (Op.Clamp DstTy.realTy)),                  (BV.clamp_rrr,          simpleOp (Op.Clamp DstTy.realTy)),

Legend:
Removed from v.1944  
changed lines
  Added in v.1945

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