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

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/cxx-util/tree-to-cxx.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/cxx-util/tree-to-cxx.sml

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

revision 4431, Thu Aug 18 23:21:27 2016 UTC revision 4432, Fri Aug 19 15:10:12 2016 UTC
# Line 215  Line 215 
215              | (Op.LoadVoxel info, [addr, offp]) => let              | (Op.LoadVoxel info, [addr, offp]) => let
216                  val voxel = CL.mkSubscript(addr, offp)                  val voxel = CL.mkSubscript(addr, offp)
217                  in                  in
218                    case ImageInfo.sampleTy info                    if RawTypes.same(ImageInfo.sampleTy info, Env.rawRealTy env)
                    of NONE => voxel (* no proxy, so we are using the default real type *)  
                     | SOME rty => if RawTypes.same(rty, Env.rawRealTy env)  
219                          then voxel                          then voxel
220                          else CL.mkStaticCast(Env.realTy env, voxel)                          else CL.mkStaticCast(Env.realTy env, voxel)
                   (* end case *)  
221                  end                  end
222              | (Op.Inside(layout, _, s), args) =>              | (Op.Inside(layout, _, s), args) =>
223                  CL.mkApply (RN.inside(#wid layout, s), args)                  CL.mkApply (RN.inside(#wid layout, s), args)

Legend:
Removed from v.4431  
changed lines
  Added in v.4432

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