Skip Menu |

Preferred bug tracker

Please visit the preferred bug tracker to report your issue.

This queue is for tickets about the Test-Simple CPAN distribution.

Report information
The Basics
Id: 3747
Status: resolved
Priority: 0/
Queue: Test-Simple

People
Owner: Nobody in particular
Requestors: tibbetts [...] mit.edu
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)



Subject: eq_set doesn't work right if first element of set is an arrayref
Running perl 5.8 out of Debian Testing, the Test::More out of the libtest-simple-perl package (version 0.47) fails sometimes with deep sets. In particular, it doesn't always work properly if one of the elements of a set is an arrayref. For example: if (eq_set([1,2,[3]], [1,[3],2]) && !eq_set([1,2,[3]], [[3],1,2])) { print "Failure."; } will print Failure. I think this is because _bogus_sort doesn't properly sort references. Let me know if you would like more information.
[guest - Mon Sep 8 00:36:02 2003]: Show quoted text
> Running perl 5.8 out of Debian Testing, the Test::More out of the > libtest-simple-perl package (version 0.47) fails sometimes with > deep sets. In particular, it doesn't always work properly if one of > the elements of a set is an arrayref. For example: > > if (eq_set([1,2,[3]], [1,[3],2]) && > !eq_set([1,2,[3]], [[3],1,2])) { > print "Failure."; > } > > will print Failure. I think this is because _bogus_sort doesn't > properly sort references.
Right, I was looking at that today and wondering what I was doing when I wrote that. :)