annotate samples/private.tp @ 242:0e7982adc76b

Make the successful return value from a match expression be truthy and the failure value false. This avoids an extra method call when checking the result and avoids allocating a new object when a match fails.
author Mike Pavone <pavone@retrodev.com>
date Sun, 05 Jan 2014 20:56:25 -0800
parents cd41f7c22fcd
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
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