equal
deleted
inserted
replaced
78 !BooleanValueHolder methodsFor:'logical operations'! |
78 !BooleanValueHolder methodsFor:'logical operations'! |
79 |
79 |
80 & anotherBooleanValueHolder |
80 & anotherBooleanValueHolder |
81 "return another valueHolder, which returns the logical and of myself and another valueHolder" |
81 "return another valueHolder, which returns the logical and of myself and another valueHolder" |
82 |
82 |
83 ^ BlockValue |
83 ^ BooleanBlockValue |
84 forLogical:self and:anotherBooleanValueHolder |
84 forLogical:self and:anotherBooleanValueHolder |
85 |
85 |
86 " |
86 " |
87 |b1 b2 a| |
87 |b1 b2 a| |
88 |
88 |
98 ! |
98 ! |
99 |
99 |
100 not |
100 not |
101 "return another valueHolder, which returns the logical not of myself" |
101 "return another valueHolder, which returns the logical not of myself" |
102 |
102 |
103 ^ BlockValue forLogicalNot:self. |
103 ^ BooleanBlockValue forLogicalNot:self. |
104 |
104 |
105 " |
105 " |
106 |b nb| |
106 |b nb| |
107 |
107 |
108 b := BooleanValueHolder new. |
108 b := BooleanValueHolder new. |
115 ! |
115 ! |
116 |
116 |
117 | anotherBooleanValueHolder |
117 | anotherBooleanValueHolder |
118 "return another valueHolder, which returns the logical and of myself and another valueHolder" |
118 "return another valueHolder, which returns the logical and of myself and another valueHolder" |
119 |
119 |
120 ^ BlockValue |
120 ^ BooleanBlockValue |
121 forLogical:self or:anotherBooleanValueHolder |
121 forLogical:self or:anotherBooleanValueHolder |
122 |
122 |
123 " |
123 " |
124 |b1 b2 o| |
124 |b1 b2 o| |
125 |
125 |
135 ! ! |
135 ! ! |
136 |
136 |
137 !BooleanValueHolder class methodsFor:'documentation'! |
137 !BooleanValueHolder class methodsFor:'documentation'! |
138 |
138 |
139 version |
139 version |
140 ^ '$Header: /cvs/stx/stx/libview2/BooleanValueHolder.st,v 1.1 2008-05-17 10:18:52 cg Exp $' |
140 ^ '$Header: /cvs/stx/stx/libview2/BooleanValueHolder.st,v 1.2 2008-05-19 16:12:21 cg Exp $' |
141 ! ! |
141 ! ! |