7 lines
129 B
Smalltalk
7 lines
129 B
Smalltalk
|
accessing
|
||
|
|
emptyTruth
|
||
|
|
<gtExample>
|
||
|
|
| testSfTruth |
|
||
|
|
testSfTruth := SfTruth new.
|
||
|
|
self assert: testSfTruth isEmpty.
|
||
|
|
^ testSfTruth
|