$ prove -v -e ./perl6 t/04-nativecall/13-union.t t/04-nativecall/13-union.t .. 1..28 ok 1 - sizeof union is sizeof biggest member ok 2 - sizeof(MyStruct) ok 3 - getting long ok 4 - getting num ok 5 - getting int8 ok 6 - getting num32 ok 7 - getting long from C-created struct ok 8 - getting num from C-created struct ok 9 - getting int8 from C-created struct ok 10 - getting num32 from C-created struct ok 11 - long in union ok 12 - int in union ok 13 - short in union ok 14 - char in union ok 15 - sizeof(MyStruct2) ok 16 - getting long from C-created struct ok 17 - getting num from C-created struct ok 18 - getting int8 from C-created struct ok 19 - getting num32 from C-created struct ok 20 - long in union* ok 21 - int in union* ok 22 - short in union* ok 23 - char in union* ok 24 - sizeof(UnionOfStructs) ok 25 - member a of union is-a MyStruct ok 26 - member b of union is-a YourStruct Cannot look up attributes in a type object in block <unit> at t/04-nativecall/13-union.t line 137
# Looks like you planned 28 tests, but ran 26 Dubious, test returned 255 (wstat 65280, 0xff00) Failed 2/28 subtests Test Summary Report ------------------- t/04-nativecall/13-union.t (Wstat: 65280 Tests: 26 Failed: 0) Non-zero exit status: 255 Parse errors: Bad plan. You planned 28 tests but ran 26. Files=1, Tests=26, 1 wallclock secs ( 0.03 usr 0.01 sys + 1.52 cusr 0.09 csys = 1.65 CPU) Result: FAIL
