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

SCM Repository

[diderot] Diff of /branches/charisee_dev/src/compiler/high-il/normalize-ein.sml
ViewVC logotype

Diff of /branches/charisee_dev/src/compiler/high-il/normalize-ein.sml

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

revision 2615, Wed May 14 00:22:49 2014 UTC revision 2789, Tue Oct 28 04:35:23 2014 UTC
# Line 61  Line 61 
61                          val E.Partial d3=d1                          val E.Partial d3=d1
62                          in (1,E.Conv(v,alpha,h,d2@d3)) end                          in (1,E.Conv(v,alpha,h,d2@d3)) end
63      | E.Field _   => (0,E.Apply(d1,e1))      | E.Field _   => (0,E.Apply(d1,e1))
64      | E.Probe _   => (0,E.Apply(d1,e1))      | E.Probe _   => (0,E.Apply(d1,e1)) (*FIX ME, Should be error actually apply of a tensor result*)
65      | E.Apply(E.Partial d2,e2)  => let      | E.Apply(E.Partial d2,e2)  => let
66                          val E.Partial d3=d1                          val E.Partial d3=d1
67                          in (1,E.Apply(E.Partial(d3@d2),e2)) end                          in (1,E.Apply(E.Partial(d3@d2),e2)) end

Legend:
Removed from v.2615  
changed lines
  Added in v.2789

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