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/handleEin.sml
ViewVC logotype

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

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

revision 3415, Thu Nov 12 20:59:23 2015 UTC revision 3440, Mon Nov 16 19:16:54 2015 UTC
# Line 58  Line 58 
58      (*      (*
59           val (einapp1,e2)=L.testLift  bind3           val (einapp1,e2)=L.testLift  bind3
60          val _ =  print("\n **** lift Length"^(Int.toString(length(e2))))          val _ =  print("\n **** lift Length"^(Int.toString(length(e2))))
61          val newbies5=  Split.iterAll2(einapp1,e2)          val newbies5=  Split.limitSplit(einapp1,e2,200)
62      *)      *)
63    
64          (* **************** split phase ************* *)          (* **************** split phase ************* *)
65    (*
66          val (newbies5)= Split.splitEinApp(bind3,9)          val (newbies5)= Split.splitEinApp bind3
67    *)
68    
69  (* **************** split With Limit phase ************* *)  (* **************** split With Limit phase ************* *)
70    
71  val (newbies5)=Split.iterAll2(bind3,[])  val (newbies5)=Split.limitSplit(bind3,[],200)
72    
73          (**************** printing result ***************)          (**************** printing result ***************)
74          val _ =testp["\n\n Returning \n\n =>",          val _ =testp["\n\n Returning \n\n =>",

Legend:
Removed from v.3415  
changed lines
  Added in v.3440

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