Change 11205 by pudge@pudge-mobile on 2001/07/07 23:55:56
Allow symbols in try_symbol() to begin with "_".
Affected files ...
... //depot/maint-5.6/macperl/makedef.pl#2 edit
Differences ...
==== //depot/maint-5.6/macperl/makedef.pl#2 (xtext) ====
Index: perl/makedef.pl
--- perl/makedef.pl.~1~ Sat Jul 7 18:00:06 2001
+++ perl/makedef.pl Sat Jul 7 18:00:06 2001
@@ -645,7 +645,7 @@
sub try_symbol {
my $symbol = shift;
- return if $symbol !~ /^[A-Za-z]/;
+ return if $symbol !~ /^[A-Za-z_]/;
return if $symbol =~ /^\#/;
$symbol =~s/\r//g;
chomp($symbol);
End of Patch.
