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-scalar.sml
ViewVC logotype

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

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

revision 3741, Sun Apr 10 23:33:56 2016 UTC revision 3742, Mon Apr 11 04:53:02 2016 UTC
# Line 113  Line 113 
113                      | E.Op2(E.Div, e1 as E.Tensor (_, [_]), e2 as E.Tensor (_, [])) =>                      | E.Op2(E.Div, e1 as E.Tensor (_, [_]), e2 as E.Tensor (_, [])) =>
114                          gen (mapp, E.Opn(E.Prod, [E.Op2 (E.Div, E.Const 1, e2), e1]))                          gen (mapp, E.Opn(E.Prod, [E.Op2 (E.Div, E.Const 1, e2), e1]))
115                      | E.Op2(E.Div, e1, e2) => Mk.realDiv (avail, gen (mapp, e1), gen (mapp, e2))                      | E.Op2(E.Div, e1, e2) => Mk.realDiv (avail, gen (mapp, e1), gen (mapp, e2))
116                      | E.Sum(sx, E.Opn(E.Prod, prod as (E.Img(Vid, _, _) :: E.Krn(Hid, _, _) ::_))) =>                      | E.Sum(sx, E.Opn(E.Prod, prod as (E.Img _ :: E.Krn _ ::_))) =>
117                          FieldToLow.expand {                          FieldToLow.expand {
118                              avail = avail, mapp = mapp,                              avail = avail, mapp = mapp,
119                              sx = sx, prod = prod,                              sx = sx, prod = prod,

Legend:
Removed from v.3741  
changed lines
  Added in v.3742

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