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/high-to-mid.sml
ViewVC logotype

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

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

revision 3797, Mon May 2 21:10:12 2016 UTC revision 3798, Mon May 2 21:26:24 2016 UTC
# Line 112  Line 112 
112                        val pos = Env.rename (env, pos)                        val pos = Env.rename (env, pos)
113                        val img = Env.rename (env, img)                        val img = Env.rename (env, img)
114                        val s = Kernel.support h                        val s = Kernel.support h
115                        val (x, code) = let                      (* map pos to index space point ix *)
116                          val (ix, code) = let
117                              val avail = AvailRHS.new()                              val avail = AvailRHS.new()
118                              val (_, x) = CoordSpaceTransform.worldToImage{                              val (ix, _, _) = CoordSpaceTransform.worldToIndex{
119                                      avail = avail, info = v, img = img, pos = pos                                      avail = avail, info = v, img = img, pos = pos
120                                    }                                    }
121                              in                              in
122                                (x, AvailRHS.getAssignments avail)                                (ix, AvailRHS.getAssignments avail)
123                              end                              end
124                        val code = (result, DstIR.OP(DstOp.Inside(v, s), [x, img])) :: code                        val code = (result, DstIR.OP(DstOp.Inside(v, s), [ix, img])) :: code
125                        in                        in
126                          List.rev code                          List.rev code
127                        end                        end

Legend:
Removed from v.3797  
changed lines
  Added in v.3798

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