Actually test results of type object .Str.

S32-container/stringify.t

@@ -11,27 +11,23 @@ plan 16;
 
 is Set.gist, '(Set)', 'Set.gist';
 is Set.perl, 'Set', 'Set.perl';
-#?niecza 2 todo "Don't know what Set.Str should do"
-lives_ok { ~Set }, '~Set does not die';
-lives_ok { Set.Str }, 'Set.Str does not die';
+is Set.Str, "", "Set.Str is empty string";
+is ~Set, "", "~Set is empty string";
 
 is KeySet.gist, '(KeySet)', 'KeySet.gist';
 is KeySet.perl, 'KeySet', 'KeySet.perl';
-#?niecza 2 todo "Don't know what KeySet.Str should do"
-lives_ok { ~KeySet }, '~KeySet does not die';
-lives_ok { KeySet.Str }, 'KeySet.Str does not die';
+is KeySet.Str, "", "KeySet.Str is empty string";
+is ~KeySet, "", "~KeySet is empty string";
 
 is Bag.gist, '(Bag)', 'Bag.gist';
 is Bag.perl, 'Bag', 'Bag.perl';
-#?niecza 2 todo "Don't know what Bag.Str should do"
-lives_ok { ~Bag }, '~Bag does not die';
-lives_ok { Bag.Str }, 'Bag.Str does not die';
+is Bag.Str, "", "Bag.Str is empty string";
+is ~Bag, "", "~Bag is empty string";
 
 is KeyBag.gist, '(KeyBag)', 'KeyBag.gist';
 is KeyBag.perl, 'KeyBag', 'KeyBag.perl';
-#?niecza 2 todo "Don't know what KeyBag.Str should do"
-lives_ok { ~KeyBag }, '~KeyBag does not die';
-lives_ok { KeyBag.Str }, 'KeyBag.Str does not die';
+is KeyBag.Str, "", "KeyBag.Str is empty string";
+is ~KeyBag, "", "~KeyBag is empty string";
 
 # vim: ft=perl6
 done;