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

SCM Repository

[diderot] Diff of /branches/vis12/src/compiler/codegen/clang.sml
ViewVC logotype

Diff of /branches/vis12/src/compiler/codegen/clang.sml

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

revision 1715, Sat Mar 10 14:42:07 2012 UTC revision 1716, Sat Mar 10 17:08:11 2012 UTC
# Line 29  Line 29 
29      val charPtr = T_Ptr(charTy)      val charPtr = T_Ptr(charTy)
30      val charArrayPtr = T_Ptr(charPtr)      val charArrayPtr = T_Ptr(charPtr)
31      val intTy = T_Named "int"      val intTy = T_Named "int"
32        val int8 = T_Num(RawTypes.RT_Int8)
33        val uint8 = T_Num(RawTypes.RT_UInt8)
34      val int32 = T_Num(RawTypes.RT_Int32)      val int32 = T_Num(RawTypes.RT_Int32)
35      val uint32 = T_Num(RawTypes.RT_UInt32)      val uint32 = T_Num(RawTypes.RT_UInt32)
36      val int64 = T_Num(RawTypes.RT_Int64)      val int64 = T_Num(RawTypes.RT_Int64)
# Line 45  Line 47 
47        | D_Proto of attr list * ty * string * param list        | D_Proto of attr list * ty * string * param list
48      (* function definition *)      (* function definition *)
49        | D_Func of attr list * ty * string * param list * stm        | D_Func of attr list * ty * string * param list * stm
50      (* typedef of struct type *)      (* struct type declaration; if the second argument is SOME name, then a
51        | D_StructDef of (ty * string) list * string       * typedef is generated.
52         *)
53          | D_StructDef of string option * (ty * string) list * string option
54    
55      and initializer      and initializer
56        = I_Exp of exp        = I_Exp of exp

Legend:
Removed from v.1715  
changed lines
  Added in v.1716

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