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

SCM Repository

[diderot] Diff of /branches/charisee/src/compiler/c-util/print-as-c.sml
ViewVC logotype

Diff of /branches/charisee/src/compiler/c-util/print-as-c.sml

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

revision 2666, Wed Jun 4 01:59:49 2014 UTC revision 2667, Thu Jun 5 18:54:12 2014 UTC
# Line 236  Line 236 
236                    | CL.S_Return _ => str "return;"                    | CL.S_Return _ => str "return;"
237                    | CL.S_Break => str "break;"                    | CL.S_Break => str "break;"
238                    | CL.S_Continue => str "continue;"                    | CL.S_Continue => str "continue;"
  | CL.S_ExtAssign (ty,v,e)=>  (ppTy(ty, NONE); str v; str "=";str" __extension__ "; ppExp e; str ";")  
239   | CL.S_Eq(e1,e2) => (ppExp e1;str "="; ppExp e2;str";")   | CL.S_Eq(e1,e2) => (ppExp e1;str "="; ppExp e2;str";")
240    
241                  (* end case *))                  (* end case *))
# Line 299  Line 298 
298                          str "* )&("; ppExp e2; str ")")                          str "* )&("; ppExp e2; str ")")
299                  (*  *(ty* )& (exp)  *)                  (*  *(ty* )& (exp)  *)
300                 | CL.E_Ext e=>  ( str " __extension__ "; ppExp e)                 | CL.E_Ext e=>  ( str " __extension__ "; ppExp e)
301                    | CL.E_TyVar(ty,v)=>(ppTy(ty,NONE);str v)
302     | CL.E_Sqrt e=> (str"SQRT("; ppExp e;  str ")")
303    
304    
305                  (* end case *))                  (* end case *))

Legend:
Removed from v.2666  
changed lines
  Added in v.2667

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