Mercurial > repos > tabletprog
annotate modules/false.tp @ 74:434988bb1fb4
Add lame linear search dictionary
author | Mike Pavone <pavone@retrodev.com> |
---|---|
date | Sat, 14 Jul 2012 21:20:30 -0700 |
parents | 01b6f8204cdf |
children | 59a94f3ad56f |
rev | line source |
---|---|
68
3a169ebb3224
Change strategy for handling true and false to avoid some initialization order problems and improve performance. Add support for negative integer literals. Update samples to reflect true/false change.
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
1 #{ |
70
0efd25a4958a
Update true and false with improved versions from ICFP contest project
Mike Pavone <pavone@retrodev.com>
parents:
68
diff
changeset
|
2 if <- :self trueblock { |
0efd25a4958a
Update true and false with improved versions from ICFP contest project
Mike Pavone <pavone@retrodev.com>
parents:
68
diff
changeset
|
3 self |
0efd25a4958a
Update true and false with improved versions from ICFP contest project
Mike Pavone <pavone@retrodev.com>
parents:
68
diff
changeset
|
4 } |
68
3a169ebb3224
Change strategy for handling true and false to avoid some initialization order problems and improve performance. Add support for negative integer literals. Update samples to reflect true/false change.
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
5 if:else <- :self trueblock :elseblock { |
3a169ebb3224
Change strategy for handling true and false to avoid some initialization order problems and improve performance. Add support for negative integer literals. Update samples to reflect true/false change.
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
6 elseblock: |
3a169ebb3224
Change strategy for handling true and false to avoid some initialization order problems and improve performance. Add support for negative integer literals. Update samples to reflect true/false change.
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
7 } |
71
01b6f8204cdf
added 'not' message to 'true' and 'false' modules
William Morgan <bill@mrgn.org>
parents:
70
diff
changeset
|
8 not <- { |
01b6f8204cdf
added 'not' message to 'true' and 'false' modules
William Morgan <bill@mrgn.org>
parents:
70
diff
changeset
|
9 true |
01b6f8204cdf
added 'not' message to 'true' and 'false' modules
William Morgan <bill@mrgn.org>
parents:
70
diff
changeset
|
10 } |
68
3a169ebb3224
Change strategy for handling true and false to avoid some initialization order problems and improve performance. Add support for negative integer literals. Update samples to reflect true/false change.
Mike Pavone <pavone@retrodev.com>
parents:
diff
changeset
|
11 } |