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

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/translate/translate.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/translate/translate.sml

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

revision 4192, Tue Jul 12 22:13:25 2016 UTC revision 4193, Wed Jul 13 02:54:21 2016 UTC
# Line 377  Line 377 
377              | S.E_LoadImage(_, nrrd, info) =>              | S.E_LoadImage(_, nrrd, info) =>
378                  [IR.ASSGN(lhs, IR.OP(Op.LoadImage(DstTy.ImageTy info, nrrd), []))]                  [IR.ASSGN(lhs, IR.OP(Op.LoadImage(DstTy.ImageTy info, nrrd), []))]
379              | S.E_InsideImage(pos, img, s) => let              | S.E_InsideImage(pos, img, s) => let
380                  val Ty.T_Image{dim, shape} = SV.typeOf img                  val Ty.T_Image info = SV.typeOf img
                 val info = ImageInfo.mkInfo(dim, shape)  
381                  in                  in
382                    [IR.ASSGN(lhs, IR.OP(Op.Inside(info, s), [lookup env pos, lookup env img]))]                    [IR.ASSGN(lhs, IR.OP(Op.Inside(info, s), [lookup env pos, lookup env img]))]
383                  end                  end

Legend:
Removed from v.4192  
changed lines
  Added in v.4193

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