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 1701, Tue Mar 6 12:54:48 2012 UTC revision 1702, Tue Mar 6 13:05:40 2012 UTC
# Line 41  Line 41 
41        | D_Verbatim of string list        | D_Verbatim of string list
42      (* global variable declaration *)      (* global variable declaration *)
43        | D_Var of attr list * ty * var * initializer option        | D_Var of attr list * ty * var * initializer option
44        (* function prototype *)
45          | D_Proto of attr list * ty * string * param list
46      (* function definition *)      (* function definition *)
47        | D_Func of attr list * ty * string * param list * stm        | D_Func of attr list * ty * string * param list * stm
48      (* typedef of struct type *)      (* typedef of struct type *)
# Line 348  Line 350 
350            fun e2s (e, l) = (case e            fun e2s (e, l) = (case e
351                 of E_Grp e => "(" :: e2s(e, ")"::l)                 of E_Grp e => "(" :: e2s(e, ")"::l)
352                  | E_AssignOp(e1, rator, e2) => e2s(e1, assignopToString rator :: e2s(e2, l))                  | E_AssignOp(e1, rator, e2) => e2s(e1, assignopToString rator :: e2s(e2, l))
353                    | E_Cond(e1, e2, e3) => "(" :: e2s(e1, "?" :: e2s(e2, ":" :: e2s (e3, ")" :: l)))
354                  | E_BinOp(e1, rator, e2) => e2s(e1, binopToString rator :: e2s(e2, l))                  | E_BinOp(e1, rator, e2) => e2s(e1, binopToString rator :: e2s(e2, l))
355                  | E_UnOp(rator, e) => unopToString rator :: e2s(e, l)                  | E_UnOp(rator, e) => unopToString rator :: e2s(e, l)
356                  | E_PostOp(e, rator) => e2s(e, postopToString rator :: l)                  | E_PostOp(e, rator) => e2s(e, postopToString rator :: l)

Legend:
Removed from v.1701  
changed lines
  Added in v.1702

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