Subject: | corrupted packet from tricky blessedness |
Date: | Tue, 3 Feb 2015 11:08:23 +0000 |
To: | bug-Sereal-Encoder [...] rt.cpan.org |
From: | Zefram <zefram [...] fysh.org> |
I was playing around with variations on [rt.cpan.org #101878] and got
this surprising result:
$ perl -MSereal::Encoder=encode_sereal -MSereal::Decoder=decode_sereal -MData::Dumper=Dumper -we '@a=(3,0,0,3); $a[1]=\$a[0]; $a[2]=\$a[3]; bless \$a[0], "Foo"; bless \$a[3], "Foo"; decode_sereal(encode_sereal(\@a))'
Sereal: Error in srl_decoder.c line 1476 and char 15 of input: Corrupted packet. OBJECTV(_FREEZE) used without preceding OBJECT(_FREEZE) to define classname at -e line 1.
Obviously this is a more serious fault than the loss of blessedness
that I was looking at. I'm reporting it separately because it appears
to have a distinct (albeit related) cause.
-zefram