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 3927, Sat Jun 4 21:20:01 2016 UTC revision 3931, Sun Jun 5 14:13:21 2016 UTC
# Line 34  Line 34 
34      val selfInVar    : CLang.var      val selfInVar    : CLang.var
35      val selfOutVar   : CLang.var      val selfOutVar   : CLang.var
36    
37        val inputsTyName : string
38        val inputsPtrTy : CLang.ty
39    
40    (* wrapper struct for tensor types (to enable overload resolution) *)    (* wrapper struct for tensor types (to enable overload resolution) *)
41      val tensorStruct : int list -> string      val tensorStruct : int list -> string
42      val tensorTy : int list -> CLang.ty      val tensorTy : int list -> CLang.ty
# Line 44  Line 47 
47      val vsum      : int -> string      val vsum      : int -> string
48      val vcons     : int -> string      val vcons     : int -> string
49      val vload     : int -> string      val vload     : int -> string
50        val vpack     : int -> string
51    
52    end = struct    end = struct
53    
# Line 88  Line 92 
92      val selfInVar    = "selfIn"      val selfInVar    = "selfIn"
93      val selfOutVar   = "selfOut"      val selfOutVar   = "selfOut"
94    
95        val inputsTyName = "cmd_line_inputs"
96        val inputsPtrTy  = CL.T_Ptr(CL.T_Named inputsTyName)
97    
98      fun tensorStruct shape = "tensor_" ^ String.concatWithMap "_" Int.toString shape      fun tensorStruct shape = "tensor_" ^ String.concatWithMap "_" Int.toString shape
99      fun tensorTy shape = CL.T_Named(tensorStruct shape)      fun tensorTy shape = CL.T_Named(tensorStruct shape)
100    
# Line 96  Line 103 
103      fun vsum w = "vsum" ^ Int.toString w      fun vsum w = "vsum" ^ Int.toString w
104      fun vcons w = "vcons" ^ Int.toString w      fun vcons w = "vcons" ^ Int.toString w
105      fun vload w = "vload" ^ Int.toString w      fun vload w = "vload" ^ Int.toString w
106        fun vpack w = "vpack" ^ Int.toString w
107    
108    end    end

Legend:
Removed from v.3927  
changed lines
  Added in v.3931

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