pushing onto undef should (and does) work
Dave Rolsky [Mon, 20 Sep 2010 21:41:19 +0000 (16:41 -0500)]
This works (under strict/warnings with no warning output)

 my $x;
 push @{$x}, 1;

t/070_native_traits/011_array_subtypes.t

index 20a312f..5daa36a 100644 (file)
@@ -64,8 +64,6 @@ use Test::Exception;
 my $foo = Foo->new;
 
 {
-    dies_ok { $foo->push_array('foo') } "array - can't push onto undef";
-
     $foo->array( [] );
     is_deeply( $foo->array, [], "array - correct contents" );
 
@@ -74,8 +72,6 @@ my $foo = Foo->new;
 }
 
 {
-    dies_ok { $foo->push_array_int(1) } "array_int - can't push onto undef";
-
     $foo->array_int( [] );
     is_deeply( $foo->array_int, [], "array_int - correct contents" );