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

SCM Repository

[diderot] Diff of /branches/charisee_dev/src/compiler/high-to-mid/split.sml
ViewVC logotype

Diff of /branches/charisee_dev/src/compiler/high-to-mid/split.sml

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

revision 2847, Mon Dec 15 02:17:32 2014 UTC revision 2857, Sun Jan 18 17:30:52 2015 UTC
# Line 263  Line 263 
263      fun iterSplit(y,einapp as DstIL.EINAPP(Ein.EIN{params, index, body},args))=let      fun iterSplit(y,einapp as DstIL.EINAPP(Ein.EIN{params, index, body},args))=let
264          (*val (_,_,body')=cleanIndex(body,index,[])          (*val (_,_,body')=cleanIndex(body,index,[])
265          val einapp1= assignEinApp(y,params,index,body',args)          val einapp1= assignEinApp(y,params,index,body',args)
266          *)  
267          val (_,sizes,body')=cleanIndex(body,index,[])          val (_,sizes,body')=cleanIndex(body,index,[])
268          val einapp1= assignEinApp(y,params,index,body',args)          val einapp1= assignEinApp(y,params,index,body',args)
269          val a=testp["\n rewriten einapp\n \t",printEINAPP einapp1]          val a=testp["\n rewriten einapp\n \t",printEINAPP einapp1]
270          val (einapp2,newbies2)=split einapp1          *)
271            val (einapp2,newbies2)=split (y,einapp)
272      in      in
273          iterMultiple(einapp2,newbies2)          iterMultiple(einapp2,newbies2)
274      end      end

Legend:
Removed from v.2847  
changed lines
  Added in v.2857

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