Mercurial > repos > tabletprog
annotate samples/private.tp @ 322:fb54a3af9c86
Add sort method to arrays
author | Michael Pavone <pavone@retrodev.com> |
---|---|
date | Sun, 22 Mar 2015 22:06:50 -0700 |
parents | cd41f7c22fcd |
children |
rev | line source |
---|---|
47
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
1 #{ |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
2 makeobj <- { |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
3 foo <- 40 |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
4 #{ |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
5 bar <- { |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
6 foo |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
7 } |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
8 inc <- { |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
9 foo <- foo + 1 |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
10 1 |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
11 } |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
12 } |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
13 } |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
14 main <- { |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
15 baz <- makeobj: |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
16 inc: baz |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
17 inc: baz |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
18 bar: baz |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
19 } |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
20 } |
cd41f7c22fcd
Remove compiled hello and private samples and add source
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
21 |