usenet@carssdf.UUCP (John Watson) (11/07/90)
I have recently switched to patch 37 and still have dificulty using debug with user subroutines that get passed arguments. I found the following patch to be helpful, although is not well researched. It is only meant to indicate where I think the problem is. *** perldb.pl Tue Nov 6 22:37:20 1990 --- perldb.pl~ Tue Nov 6 21:47:36 1990 *************** *** 491,504 **** push(@stack, $single); $single &= 1; $single |= 4 if $#stack == $deep; - local(@args) = @_; if (wantarray) { ! @i = &$sub(@args); $single |= pop(@stack); @i; } else { ! $i = &$sub(@args); $single |= pop(@stack); $i; } --- 491,503 ---- push(@stack, $single); $single &= 1; $single |= 4 if $#stack == $deep; if (wantarray) { ! @i = &$sub; $single |= pop(@stack); @i; } else { ! $i = &$sub; $single |= pop(@stack); $i; } ============================================= Does anyone recognize a problem here? John Watson Middlesex, NJ ...!rutgers!carssdf!usenet