cwitty@cs.Stanford.EDU (Carl Witty) (06/13/91)
I mailed these bug reports to Larry, but they must have fallen between
the cracks.
SunOS 4.1.1, Perl 4.010, Sparcstation 1
uname -a output: SunOS elaine16. 4.1.1 1 sun4c
1)
The manual seems to imply that the following two lines are equivalent:
if {1;} {2;}
if (do {1;}) {2;}
However, the second executes fine, but the first segmentation faults.
2)
This comment from stab.c yearns toward a state of affairs that doesn't
actually exist:
/* hopefully this is only called on local symbol table entries */
Here is a program that segmentation faults because stab_clear() is
called on a non-local symbol table entry. (As a workaround, I took
out the "local" declaration for the symbol table entries in my
program.)
---- cut here ----
#!/afs/ir/@sys/local/bin/perl
{
local(*c);
%foo = ();
*c = *foo;
}
$foo = ' ' x 3;
---- cut here ----
Carl Witty
cwitty@cs.stanford.edu