Mercurial > repos > tabletprog
view samples/testarray.tp @ 71:01b6f8204cdf
added 'not' message to 'true' and 'false' modules
author | William Morgan <bill@mrgn.org> |
---|---|
date | Sat, 14 Jul 2012 20:05:51 -0700 |
parents | 927fd7911a01 |
children | 48daa1d3e052 |
line wrap: on
line source
#{ sum <- :arr { cursum <- 0 foreach: arr :idx el { cursum <- cursum + el } cursum } main <- { foo <- #[42 30 28] bar <- #[] bar append: 30 bar append: 28 bar append: 42 (sum: foo) + (sum: bar) } }