annotate modules/true.tp @ 81:a905e13db753

Increase the number of buckets checked in a hash set as it grows to keep space overhead reasonable
author Mike Pavone <pavone@retrodev.com>
date Wed, 18 Jul 2012 08:59:08 -0700
parents 01b6f8204cdf
children 59a94f3ad56f
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
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 trueblock:
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 trueblock:
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 false
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 }