Mercurial > repos > tabletprog
annotate samples/fib.tp @ 78:abc6f3d644a4
Use Boehm-GC for garbage collection. Also make no_impl print on stderr rather than standard in and return a non-zero error code.
| author | Mike Pavone <pavone@retrodev.com> |
|---|---|
| date | Sun, 15 Jul 2012 18:11:00 -0700 |
| parents | 3a169ebb3224 |
| children |
| rev | line source |
|---|---|
| 10 | 1 #{ |
| 2 fib <- :n { | |
| 3 if: n < 2 { | |
| 4 1 | |
| 5 } else: { | |
| 6 (fib: n-1) + (fib: n-2) | |
| 7 } | |
| 8 } | |
| 9 | |
| 10 main <- { | |
|
44
9dd370530f69
Fix escape codes in string literals. Don't print out the return value of main method. Fixup fib example to use print: method. Cleanup error handling in compiler slightly
Mike Pavone <pavone@retrodev.com>
parents:
10
diff
changeset
|
11 print: (string: (fib: 30)) . "\n" |
| 10 | 12 } |
| 13 | |
| 14 } |