Mercurial > repos > tabletprog

view samples/slist.tp @ 317:6dfbf5691a7f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Move where additional parameters are inserted in gcc command line so that additional libs can be specified
author Michael Pavone <pavone@retrodev.com>
date Thu, 19 Mar 2015 22:39:42 -0700
parents 18598163e3ef
children
line wrap: on
line source

#{
	sum <- :l {
		l fold: 0 with: :acc el {
			acc + el
		}
	}
	main <- {
		print: (string: (sum: [])) . "\n"
		print: (string: (sum: [1 2 3 4])) . "\n"
		print: (string: (sum: 1 | 2 | 3 | 4 | [])) . "\n"
		print: (string: (sum: [1 2] . [3 4])) . "\n"
	}
}