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

SCM Repository

[diderot] Diff of /branches/pure-cfg/src/compiler/c-target/c-target.sml
ViewVC logotype

Diff of /branches/pure-cfg/src/compiler/c-target/c-target.sml

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

revision 731, Sat Apr 2 03:15:31 2011 UTC revision 732, Sat Apr 2 03:18:30 2011 UTC
# Line 256  Line 256 
256                        | T_IVec n => (n, !RN.gIntSuffix, T_Int)                        | T_IVec n => (n, !RN.gIntSuffix, T_Int)
257                      (* end case *))                      (* end case *))
258                val unionTy = CL.T_Named(concat["union", Int.toString n, tyCode, "_t"])                val unionTy = CL.T_Named(concat["union", Int.toString n, tyCode, "_t"])
259                  val vecExp = CL.mkSelect(CL.mkCast(unionTy, e1), "r")
260                in                in
261                  E(CL.mkSubscript(e1, e2), elemTy)                  E(CL.mkSubscript(vecExp, e2), elemTy)
262                end                end
263    
264        (* vector (and scalar) arithmetic *)        (* vector (and scalar) arithmetic *)

Legend:
Removed from v.731  
changed lines
  Added in v.732

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