diff options
author | Leo Tenenbaum <pommicket@gmail.com> | 2019-10-21 11:20:31 -0400 |
---|---|---|
committer | Leo Tenenbaum <pommicket@gmail.com> | 2019-10-21 11:20:31 -0400 |
commit | 07766b1ebf6ee4c799a3fa5d8f553881a72829c6 (patch) | |
tree | aea0aaa307d35349cbdda5240439b392e2c2b491 /test.toc | |
parent | 9d1960f4cd0e1a78abfecce4d5bfa4d850955852 (diff) |
del slices
Diffstat (limited to 'test.toc')
-rw-r--r-- | test.toc | 17 |
1 files changed, 15 insertions, 2 deletions
@@ -7,10 +7,23 @@ puti @= fn(x: int) { factorial @= fn(x: int) int { - if x == 0 { 1 } else { x * factorial(x-1) } + numbers := new(int, x); + i := 0; + while i < x { + numbers[i] = i+1; + i = i + 1; + } + product := 1; + i = 0; + while i < x{ + product = product * numbers[i]; + i = i + 1; + } + del(numbers); + product }; main @= fn() { a342 : [factorial(5)]int; - puti(factorial(20)); + puti(factorial(10)); }; |