SCM Repository
Diff of /branches/vis12/src/compiler/c-util/gen-library-interface.sml
Parent Directory
|
Revision Log
|
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 |
|
root@smlnj-gforge.cs.uchicago.edu | ViewVC Help |
Powered by ViewVC 1.0.0 |