Changeset 548

Timestamp:

03/09/05 07:32:36 (4 years ago)

Author:

scw

svk:copy_cache_prev:

1869

Message:

Fix todo_isa_ok parameter.

Files:

• ext/Test/lib/Test.pm (modified) (1 diff)

ext/Test/lib/Test.pm

@@ -75 +75 @@
 }
 
-sub todo_isa_ok ($ref, Str $expected_type) returns Bool is export {
+sub todo_isa_ok ($ref, Str $expected_type, Str ?$desc) returns Bool is export {
     my $ref_type = ref($ref);
     my $out := defined($desc) ?? $desc :: "The object is-a '$expected_type'";