Mercurial > repos > icfp2013

comparison src/requests.tp @ 21:a4ac42c69285

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
cleanup.
author William Morgan <bill@mrgn.org>
date Fri, 09 Aug 2013 15:53:53 -0700
parents 92db3d1e8809
children a4837071b73d
comparison
equal deleted inserted replaced
20:92db3d1e8809 21:a4ac42c69285
1 #{ 1 #{
2 2
3 strJoin <- :str arr { 3 strJoin <- :str arr {
4 //head <- arr.get(0)
5 //tail <- arr.
6 print: "go\n"
7 //print: (string: (arr length))
8 acc <- "" 4 acc <- ""
9 arr foreach: :i el { 5 arr foreach: :i el {
10 print: (string: i) . " " . (string: el) . "\n"
11 if: i = 0 { 6 if: i = 0 {
12 acc <- (string: el) 7 acc <- (string: el)
13 } else: { 8 } else: {
14 acc <- acc . ", " . (string: el) 9 acc <- acc . ", " . (string: el)
15 } 10 }
16 } 11 }
17 print: "stop\n"
18 acc 12 acc
19 //arr fold: "" with: :acc el {acc . el} 13 //arr fold: "" with: :acc el {acc . el}
20 } 14 }
21 15
22 quote <- :str { 16 quote <- :str {