diff options
author | Lorry Tar Creator <lorry-tar-importer@lorry> | 2015-04-18 15:03:28 +0000 |
---|---|---|
committer | Lorry Tar Creator <lorry-tar-importer@lorry> | 2015-04-18 15:03:28 +0000 |
commit | 2fe5b8de1e9d06482aa76303e7342bc6605700ea (patch) | |
tree | cccc47c409970b2db7a8f64f6c25e993270ddf9b /t/inbox.t | |
download | YAML-tarball-master.tar.gz |
Diffstat (limited to 't/inbox.t')
-rw-r--r-- | t/inbox.t | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/t/inbox.t b/t/inbox.t new file mode 100644 index 0000000..e6a1790 --- /dev/null +++ b/t/inbox.t @@ -0,0 +1,22 @@ +use strict; +use lib -e 't' ? 't' : 'test'; +use TestYAML tests => 3; + +SKIP: { + skip 'fix this next release', 3; + my $x; + is(Dump(bless(\$x)), 'foo'); +} + +__END__ +03:14 < audreyt> ingy: +03:14 < audreyt> use YAML; my $x; print Dump bless(\$x); +03:14 < audreyt> is erroneous +03:14 < audreyt> then +03:14 < audreyt> use YAML; my $x = \3; print Dump bless(\$x); +03:14 < audreyt> is fatal error +03:15 < audreyt> use YAML; my $x; $x = \$x; print Dump bless(\$x); +03:15 < audreyt> is scary fatal error +03:15 < audreyt> (YAML::Syck handles all three ^^;) +03:16 * audreyt goes back to do $job work + |