Mercurial > repos > tabletprog
annotate samples/private.tp @ 215:f3d5068cbd43
Add contains? method to list
author | Michael Pavone <pavone@retrodev.com> |
---|---|
date | Sat, 21 Dec 2013 12:06:10 -0800 |
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 |