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/cxx-names.sml
ViewVC logotype

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

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

revision 3917, Sat May 28 16:41:39 2016 UTC revision 3918, Mon May 30 06:31:35 2016 UTC
# Line 33  Line 33 
33      val selfInVar    : CLang.var      val selfInVar    : CLang.var
34      val selfOutVar   : CLang.var      val selfOutVar   : CLang.var
35    
36      (* wrapper struct for tensor types (to enable overload resolution) *)
37        val tensorStruct : int list -> string
38        val tensorTy : int list -> CLang.ty
39    
40    end = struct    end = struct
41    
42      structure CL = CLang      structure CL = CLang
# Line 75  Line 79 
79      val selfInVar    = "selfIn"      val selfInVar    = "selfIn"
80      val selfOutVar   = "selfOut"      val selfOutVar   = "selfOut"
81    
82        fun tensorStruct shape = "tensor_" ^ String.concatWithMap "_" Int.toString shape
83        fun tensorTy shape = CL.T_Named(tensorStruct shape)
84    
85    end    end

Legend:
Removed from v.3917  
changed lines
  Added in v.3918

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