# HG changeset patch # User William Morgan # Date 1376088833 25200 # Node ID a4ac42c69285a1e0f58c1307c83ed90c38d3bfb2 # Parent 92db3d1e88096cda40ea6209fe4d16f44156fdfd cleanup. diff -r 92db3d1e8809 -r a4ac42c69285 src/requests.tp --- a/src/requests.tp Fri Aug 09 15:52:16 2013 -0700 +++ b/src/requests.tp Fri Aug 09 15:53:53 2013 -0700 @@ -1,20 +1,14 @@ #{ strJoin <- :str arr { - //head <- arr.get(0) - //tail <- arr. - print: "go\n" - //print: (string: (arr length)) acc <- "" arr foreach: :i el { - print: (string: i) . " " . (string: el) . "\n" if: i = 0 { acc <- (string: el) } else: { acc <- acc . ", " . (string: el) } } - print: "stop\n" acc //arr fold: "" with: :acc el {acc . el} }