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 3778, Wed Apr 27 13:29:39 2016 UTC revision 3784, Wed Apr 27 18:13:26 2016 UTC
# Line 109  Line 109 
109                          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]))
110                      | 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))
111  (* FIXME: images have been lifted out of Ein expressions at this point (i.e., LoadVoxels) *)  (* FIXME: images have been lifted out of Ein expressions at this point (i.e., LoadVoxels) *)
112                      | E.Sum(sx, E.Opn(E.Prod, prod as (E.Img _ :: E.Krn _ :: _))) =>                  (*    | E.Sum(sx, E.Opn(E.Prod, prod as (E.Img _ :: E.Krn _ :: _))) =>
113  raise Fail "FIXME"  raise Fail "FIXME"
114  (*  (*
115                          FieldToLow.expand {                          FieldToLow.expand {
# Line 117  Line 117 
117                              sx = sx, prod = prod,                              sx = sx, prod = prod,
118                              args = lowArgs                              args = lowArgs
119                            }                            }
120  *)  *)*)
121    
122    | E.Sum(sx, E.Opn(E.Prod, prod as (E.Img _ :: E.Krn _ :: _))) =>
123    FieldToLow.expand {
124    avail = avail, mapp = mapp,
125    sx = sx, prod = prod,
126    args = lowArgs
127    }
128    
129    
130    
131                      | E.Sum(sumx, e) =>                      | E.Sum(sumx, e) =>
132                          Mk.reduce (avail, Mk.realAdd, sumCheck (mapp, sumx, e))                          Mk.reduce (avail, Mk.realAdd, sumCheck (mapp, sumx, e))
133  (* FIXME: need to add normalize *)  (* FIXME: need to add normalize *)

Legend:
Removed from v.3778  
changed lines
  Added in v.3784

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