Mercurial > repos > tabletprog
annotate samples/private.tp @ 353:95bc24c729e6
Move right hand parameter to cmp in _compileBinary to a temp reg if it is a constant since those are only supported in the left hand param currently
author | Michael Pavone <pavone@retrodev.com> |
---|---|
date | Tue, 14 Apr 2015 19:54:03 -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 |