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

SCM Repository

[diderot] Diff of /branches/vis15/src/compiler/high-to-mid/handle-ein.sml
ViewVC logotype

Diff of /branches/vis15/src/compiler/high-to-mid/handle-ein.sml

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

revision 3550, Wed Jan 6 15:51:57 2016 UTC revision 3552, Wed Jan 6 18:48:59 2016 UTC
# Line 18  Line 18 
18    
19      fun useCount (SrcIR.V{useCnt, ...}) = !useCnt      fun useCount (SrcIR.V{useCnt, ...}) = !useCnt
20    
21      fun expand (lhs, Ein.EIN{params, index, body}, args) = let      fun expand (lhs, ein, args) = let
         (* ************* Sweep for 0's'*********** *)  
           val bodysweep = sweepEin.sweep body  
           val ein1 = Ein.EIN{params=params, index=index, body=bodysweep}  
22          (* ************** distribute and push Summation*********** *)          (* ************** distribute and push Summation*********** *)
23            val ein2 = SummationEin.main ein1            val ein' = EinSums.transform ein
24          (* **************** split phase ************* *)          (* **************** split phase ************* *)
25            val newbies5 = Split.splitEinApp (lhs, DstIR.EINAPP(ein2, args))            val newbies5 = Split.splitEinApp (lhs, DstIR.EINAPP(ein', args))
26          (* ************** ProbeEIN *********** *)          (* ************** ProbeEIN *********** *)
27          (*gives probeEIN the set. Could split into a sepearate step*)          (*gives probeEIN the set. Could split into a sepearate step*)
28            val fieldset= einSet.EinSet.empty            val fieldset= einSet.EinSet.empty

Legend:
Removed from v.3550  
changed lines
  Added in v.3552

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