Mercurial > repos > tabletprog

comparison samples/fib.tp @ 68:3a169ebb3224

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Change strategy for handling true and false to avoid some initialization order problems and improve performance. Add support for negative integer literals. Update samples to reflect true/false change.
author Mike Pavone <pavone@retrodev.com>
date Sat, 14 Jul 2012 16:14:01 -0700
parents 9dd370530f69
children
comparison
equal deleted inserted replaced
67:42d5660b30b4 68:3a169ebb3224
1 #{ 1 #{
2 true <- #{
3 if:else <- :self trueblock :elseblock {
4 trueblock:
5 }
6 }
7
8 false <- #{
9 if:else <- :self trueblock :elseblock {
10 elseblock:
11 }
12 }
13
14 fib <- :n { 2 fib <- :n {
15 if: n < 2 { 3 if: n < 2 {
16 1 4 1
17 } else: { 5 } else: {
18 (fib: n-1) + (fib: n-2) 6 (fib: n-1) + (fib: n-2)