aboutsummaryrefslogtreecommitdiff
path: root/greet.ell
blob: 3bfad4e547191f4bb065a16076de8b95fd03197c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
set greet {
	arg _name
	print 'hello ' @_name '\n'
}
set decr {
	arg _name
	set @_name (- @@_name 1)
}

set limit 2
for (map { arg _x; .. @_x ! } [
	world
	creator
	'darkness, my old friend'
]) {
	arg _whom
	greet @_whom
	if (= 0 (decr limit)) { break }
}