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 4468, Tue Aug 30 13:54:15 2016 UTC revision 4469, Tue Aug 30 13:56:03 2016 UTC
# Line 34  Line 34 
34    (* the strand type *)    (* the strand type *)
35      val strandTyName : string -> string      val strandTyName : string -> string
36      val strandTy     : string -> CLang.ty      val strandTy     : string -> CLang.ty
37        val localTyName  : string -> string         (* name of sub-struct that holds local state *)
38        val sharedTyName : string -> string         (* name of sub-struct that holds shared state *)
39    
40      val inputsTyName : string      val inputsTyName : string
41      val inputsPtrTy : CLang.ty      val inputsPtrTy : CLang.ty
# Line 100  Line 102 
102    
103      fun strandTyName s = s ^ "_strand"      fun strandTyName s = s ^ "_strand"
104      fun strandTy s = CL.T_Named(strandTyName s)      fun strandTy s = CL.T_Named(strandTyName s)
105        fun localTyName s = s ^ "_local"
106        fun sharedTyName s = s ^ "_shared"
107    
108      val inputsTyName = "cmd_line_inputs"      val inputsTyName = "cmd_line_inputs"
109      val inputsPtrTy  = CL.T_Ptr(CL.T_Named inputsTyName)      val inputsPtrTy  = CL.T_Ptr(CL.T_Named inputsTyName)

Legend:
Removed from v.4468  
changed lines
  Added in v.4469

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