[MacPerl] Problem with MacPerl 5.14 debugger

[Philippe de Rochambeau <pr1@club-internet.fr>]

I am having problems with the MacPerl debugger on System 8:

- The "X <variable name>" command works one time out of two; e.g., "X var1",
where $var1 is a variable and contains "hello", yields nothing.

- I usually get a 

>DB::fake::(Macintosh HD:MacPerl °:lib:perl5db.pl:2061):
>2061:	  "Debugged program terminated.  Use `q' to quit or `R' to restart.";

   .... message after typing 'n' a few times in the debugger

- on my PowerBook 5300, I often get errors number 2 after a while, even with
simple programs.

The following simple script 

======== begin script =============
my ($var1, $var2);

$var1 = "Value 1";

$var2 = "Value 2";

print "$var1\n";
print "$var2\n";

========= end script =============


yields the following debugger log:

========== begin debugger log ==============

Loading DB routines from perl5db.pl version 1
Emacs support available.

Enter h or `h h' for help.

main::(Macintosh HD:Desktop Folder:test.pl:1):
1:	my ($var1, $var2);
  DB<1> X
$@ = ''
FileHandle(stdin) => fileno(0)
%SIG = (
   'ALRM' => undef
>   'BUS' => CODE(0x339f230)
      -> & in ???
   'FPE' => undef
>
<LOTS OF VARIABLES HERE>

$| = 1
$? = 0
  DB<1> n
main::(Macintosh HD:Desktop Folder:test.pl:3):
3:	$var1 = "Value 1";
  DB<1> n
main::(Macintosh HD:Desktop Folder:test.pl:5):
5:	$var2 = "Value 2";
  DB<1> X var1
  DB<2> X var2
  DB<3> n
main::(Macintosh HD:Desktop Folder:test.pl:7):
7:	print "$var1\n";
  DB<3> X var1
  DB<4> X var2
  DB<5> L
  DB<5> n
main::(Macintosh HD:Desktop Folder:test.pl:8):
8:	print "$var2\n";
  DB<5> n
DB::fake::(Macintosh HD:MacPerl °:lib:perl5db.pl:2061):
2061:	  "Debugged program terminated.  Use `q' to quit or `R' to restart.";
  DB<5> 

========== End debugger log ===========


Question : according to David Till, the 'L' command is supposed to tell you
what the current line is. However, when I type it, the debugger does nothing. Why?

Any help on this matter would be much appreciated.

Philippe de Rochambeau

***** Want to unsubscribe from this list?
***** Send mail with body "unsubscribe" to mac-perl-request@iis.ee.ethz.ch