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

SCM Repository

[diderot] Diff of /branches/vis12/src/compiler/c-util/gen-library-interface.sml
ViewVC logotype

Diff of /branches/vis12/src/compiler/c-util/gen-library-interface.sml

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

revision 1819, Wed Apr 11 10:49:58 2012 UTC revision 1820, Wed Apr 11 10:53:15 2012 UTC
# Line 31  Line 31 
31    
32      val nrrdPtrTy = CL.T_Ptr(CL.T_Named "Nrrd")      val nrrdPtrTy = CL.T_Ptr(CL.T_Named "Nrrd")
33    
34    (* translate TreeIL types to CLang types *)    (* translate a TreeIL type to the C types used to represent it in the external API *)
35      val trType = TreeTyToC.trType      val trType = CTyTranslate.toCType
36    
37      fun mkSymbol base = let      fun mkSymbol base = let
38            fun tr c = if Char.isAlpha c then Char.toUpper c            fun tr c = if Char.isAlpha c then Char.toUpper c

Legend:
Removed from v.1819  
changed lines
  Added in v.1820

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