diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-12-04 21:55:27 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-12-04 21:55:27 +0000 |
| commit | d0456cad3918fc93900d9454be6ff427d745b536 (patch) | |
| tree | 94e6bf842cd599dbcfadf2ec7429abb6342d2909 /toke.c | |
| parent | db7ec62399075c965a182629c9ca8ed4044fc594 (diff) | |
| download | perl-d0456cad3918fc93900d9454be6ff427d745b536.tar.gz | |
make weak keyword check look for defined(&lock), not
merely defined(*lock)
p4raw-id: //depot/perl@4643
Diffstat (limited to 'toke.c')
| -rw-r--r-- | toke.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -3502,6 +3502,7 @@ Perl_yylex(pTHX) } else if (gv && !gvp && -tmp==KEY_lock /* XXX generalizable kludge */ + && GvCVu(gv) && !hv_fetch(GvHVn(PL_incgv), "Thread.pm", 9, FALSE)) { tmp = 0; /* any sub overrides "weak" keyword */ |