equal
deleted
inserted
replaced
1 " |
1 " |
2 COPYRIGHT (c) 1988 by Claus Gittinger |
2 COPYRIGHT (c) 1988 by Claus Gittinger |
3 All Rights Reserved |
3 All Rights Reserved |
4 |
4 |
5 This software is furnished under a license and may be used |
5 This software is furnished under a license and may be used |
6 only in accordance with the terms of that license and with the |
6 only in accordance with the terms of that license and with the |
7 inclusion of the above copyright notice. This software may not |
7 inclusion of the above copyright notice. This software may not |
8 be provided or otherwise made available to, or used by, any |
8 be provided or otherwise made available to, or used by, any |
17 category:'Kernel-Objects' |
17 category:'Kernel-Objects' |
18 ! |
18 ! |
19 |
19 |
20 Boolean comment:' |
20 Boolean comment:' |
21 COPYRIGHT (c) 1988 by Claus Gittinger |
21 COPYRIGHT (c) 1988 by Claus Gittinger |
22 All Rights Reserved |
22 All Rights Reserved |
23 |
23 |
24 $Header: /cvs/stx/stx/libbasic/Boolean.st,v 1.9 1994-08-05 00:54:01 claus Exp $ |
24 $Header: /cvs/stx/stx/libbasic/Boolean.st,v 1.10 1994-10-10 00:25:13 claus Exp $ |
25 '! |
25 '! |
26 |
26 |
27 !Boolean class methodsFor:'documentation'! |
27 !Boolean class methodsFor:'documentation'! |
28 |
28 |
29 copyright |
29 copyright |
30 " |
30 " |
31 COPYRIGHT (c) 1988 by Claus Gittinger |
31 COPYRIGHT (c) 1988 by Claus Gittinger |
32 All Rights Reserved |
32 All Rights Reserved |
33 |
33 |
34 This software is furnished under a license and may be used |
34 This software is furnished under a license and may be used |
35 only in accordance with the terms of that license and with the |
35 only in accordance with the terms of that license and with the |
36 inclusion of the above copyright notice. This software may not |
36 inclusion of the above copyright notice. This software may not |
37 be provided or otherwise made available to, or used by, any |
37 be provided or otherwise made available to, or used by, any |
40 " |
40 " |
41 ! |
41 ! |
42 |
42 |
43 version |
43 version |
44 " |
44 " |
45 $Header: /cvs/stx/stx/libbasic/Boolean.st,v 1.9 1994-08-05 00:54:01 claus Exp $ |
45 $Header: /cvs/stx/stx/libbasic/Boolean.st,v 1.10 1994-10-10 00:25:13 claus Exp $ |
46 " |
46 " |
47 ! |
47 ! |
48 |
48 |
49 documentation |
49 documentation |
50 " |
50 " |
78 |
78 |
79 ^ true |
79 ^ true |
80 ! ! |
80 ! ! |
81 |
81 |
82 !Boolean methodsFor:'copying'! |
82 !Boolean methodsFor:'copying'! |
|
83 |
|
84 copy |
|
85 "return a shallow copy of the receiver |
|
86 - since both true and false are unique, return the receiver" |
|
87 |
|
88 ^ self |
|
89 ! |
83 |
90 |
84 shallowCopy |
91 shallowCopy |
85 "return a shallow copy of the receiver |
92 "return a shallow copy of the receiver |
86 - since both true and false are unique, return the receiver" |
93 - since both true and false are unique, return the receiver" |
87 |
94 |
135 !Boolean methodsFor: 'binary storage'! |
142 !Boolean methodsFor: 'binary storage'! |
136 |
143 |
137 hasSpecialBinaryRepresentation |
144 hasSpecialBinaryRepresentation |
138 "return true, if the receiver has a special binary representation" |
145 "return true, if the receiver has a special binary representation" |
139 |
146 |
140 ^true |
147 ^true |
141 ! ! |
148 ! ! |