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

SCM Repository

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

Diff of /branches/vis15/src/compiler/low-to-tree/low-to-tree.sml

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

revision 4025, Wed Jun 22 15:01:29 2016 UTC revision 4026, Wed Jun 22 15:55:07 2016 UTC
# Line 504  Line 504 
504                    in                    in
505                      case (rhs, eqClassRepOf(env, lhs), emitBind)                      case (rhs, eqClassRepOf(env, lhs), emitBind)
506                       of (_, NOEQ, false) => (Env.bindVar (env, lhs, rhs); stms)                       of (_, NOEQ, false) => (Env.bindVar (env, lhs, rhs); stms)
507    (* FIXME: if the rhs has TensorRef type, then we should make the lhs TensorRef too! *)
508                        | (Env.TREE e, NOEQ, true) => mkDefn'(newLocal(env, lhs), e) :: stms                        | (Env.TREE e, NOEQ, true) => mkDefn'(newLocal(env, lhs), e) :: stms
509                        | (Env.TREE e, VAR x', _) => mkAssign'(x', e) :: stms                        | (Env.TREE e, VAR x', _) => mkAssign'(x', e) :: stms
510                        | (Env.VEC(layout, es), NOEQ, true) => let                        | (Env.VEC(layout, es), NOEQ, true) => let

Legend:
Removed from v.4025  
changed lines
  Added in v.4026

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