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

SCM Repository

[diderot] Diff of /branches/charisee/src/compiler/low-il/check-low-il.sml
ViewVC logotype

Diff of /branches/charisee/src/compiler/low-il/check-low-il.sml

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

revision 2827, Tue Nov 11 00:18:38 2014 UTC revision 2828, Wed Nov 12 06:30:58 2014 UTC
# Line 109  Line 109 
109    
110          (*imgAddr:  shape of IMG, dim, Args:  dim number of ints*)          (*imgAddr:  shape of IMG, dim, Args:  dim number of ints*)
111          | Op.imgAddr(info , ty,dim)=> let          | Op.imgAddr(info , ty,dim)=> let
112              val arg=List.tabulate(dim,fn _=>Ty.intTy)             (* val arg=List.tabulate(dim,fn _=>Ty.intTy)*)
113              val ptrTy=Ty.AddrTy info              val ptrTy=Ty.AddrTy info
114               in (ptrTy, [ptrTy]@arg)               in (ptrTy, [ptrTy,Ty.intTy])
115              end              end
116    
117          (*imgLoad, dim, int-2*support:Args:addrVar*)          (*imgLoad, dim, int-2*support:Args:addrVar*)

Legend:
Removed from v.2827  
changed lines
  Added in v.2828

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