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

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/high-to-mid/probe-ein.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/high-to-mid/probe-ein.sml

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

revision 3742, Mon Apr 11 04:53:02 2016 UTC revision 3744, Mon Apr 11 22:06:24 2016 UTC
# Line 125  Line 125 
125      * expands the body for the probed field      * expands the body for the probed field
126      *)      *)
127      fun fieldReconstruction (avail, dim, sx, alpha, dx,  Vid, nid, vH, vF, kid, border) = let      fun fieldReconstruction (avail, dim, sx, alpha, dx,  Vid, nid, vH, vF, kid, border) = let
128            val h = getKernelDst vH
129            val s = Kernel.support h
130    
131          (* image positions for image body *)          (* image positions for image body *)
132          val imgpos =          val imgpos =
# Line 133  Line 134 
134              then [E.Opn(E.Add, [E.Tensor(nid, []), E.Value(sx)])]              then [E.Opn(E.Add, [E.Tensor(nid, []), E.Value(sx)])]
135              else List.tabulate(dim, fn dir=> E.Opn(E.Add, [E.Tensor(nid, [E.C dir]), E.Value(dir+sx)]))              else List.tabulate(dim, fn dir=> E.Opn(E.Add, [E.Tensor(nid, [E.C dir]), E.Value(dir+sx)]))
136          (* image body *)          (* image body *)
137          val imgexp = E.Img(Vid, alpha, imgpos, border)          val imgexp = E.Img(Vid, alpha, imgpos, s, border)
138    
         val h = getKernelDst vH  
         val s = Kernel.support h  
139          (* create kernel body *)          (* create kernel body *)
140          fun createKrn (0,  krnexp, vAs) = (krnexp, vAs)          fun createKrn (0,  krnexp, vAs) = (krnexp, vAs)
141            | createKrn (dir, krnexp, vAs) = let            | createKrn (dir, krnexp, vAs) = let

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

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