[comp.lang.perl] debugging broken in perl4.00

mac@gold.kpc.com (Mike McNamara) (04/03/91)

In Kate Hedstrom mail about running perl on a Stardent 3000 she
mentioned that 
>
> 5. The debugger dumps core. :-(
>

	This is do to a bug in perl4.00, file doarg.c, line 933:

    if (arg->arg_type == O_DBSUBR && !sub->usersub) { 

sub is declared as a local variable, and it has not yet been set.

I'm not sure what to fix, except to delete the check of sub->usersub. 

sub gets reassigned to either 	
	sub = stab_sub(DBsub); 
or to 
	sub = stab_sub(stab); 
depending on whether this if evaluates to true or false,
respectfully. 
	
	You perl experts tell me.

	I tried commenting out the check, and things seemed to work
(as far as I could tell), and also initializing it to 
	sub = stab_sub(DBsub); 
	
which also seemed to work.

	-mac
--
+-----------+-------------------------------------------------------------------+
|mac@kpc.com| Increasing Software complexity lets us sell Mainframes as         |
|           | personal computers. Carry on, X windows/Postscript/emacs/CASE!!   |
+-----------+-------------------------------------------------------------------+