[Pangloss] tests 015 & 020 failing

[Steve Purkis]

On Tuesday, August 19, 2003, at 03:53  pm, Bruno Postle wrote:

> On Mon 18-Aug-2003 at 12:43:05PM +0100, Steve Purkis wrote:
>>
>> When I look at the test scripts, they all seem to be dying in the 
>> TODO:
>> section.  I'll wager it's something to do with these lines:
>>
>> 015..user-privileges.t:67:	catch Error with { fail(shift); };
>
> debugging, this is all the same:
>
> [snip]
>
> ..but I don't get as far as printing a result for test 30.
>
>> ->	DB<5> c
>> 	not ok 30 - Pangloss::User::Privileges does not implement abstract
>> method
>> 	 Pangloss::StoredObject::validate()! # TODO implement this
>
> I get this error instead:
>
>     Invalid value for shared scalar at ...

Ok, then how about this: instead of continuing at DB<5>, try setting a 
watch, and stepping through the code until it breaks:

	DB<5> w @_
	DB<6> s
	Watchpoint 0:   @_ changed:
	        old value:      '67'
	        new value:      'Pangloss::User::Privileges does ...'
	Test::More::fail(/System/Library/Perl/Test/More.pm:589):
	589:        $Test->ok(0, @_);
	DB<7> <enter>

Then keep pressing <enter> 'till you get that error.  If you send the 
output (it will be long!) that will give me more of a clue as to what's 
happening.  Also, the output of `perl -V` would help.

ta,
-Steve