search

Perl / perl5

🐪 The Perl programming language
https://dev.perl.org/perl5/
Other
1.99k stars 557 forks source link

#line directive messes up 'called too early to check prototype' warning #4529

Closed p5pRT closed 18 years ago

p5pRT commented 23 years ago

Migrated from rt.perl.org#7850 (status was 'rejected')

Searchable as RT7850$

p5pRT commented 23 years ago

From @brentdax

Using the #line directive can screw up the '%s called to early to check prototype' warning.

cat test.pl use warnings; #line 10 sub foo() { #line 2   foo(); }

perl test.pl main​::foo() called too early to check prototype at test.pl line 2.

This occurs as of 5.6.1; I'm not sure about earlier versions

Perl Info ``` Flags: category=core severity=low Site configuration information for perl v5.6.1: Configured by Administrator at Wed Jul 4 15:40:52 2001. Summary of my perl5 (revision 5 version 6 subversion 1) configuration: Platform: osname=MSWin32, osvers=4.0, archname=MSWin32-x86-multi-thread uname='' config_args='undef' hint=recommended, useposix=true, d_sigaction=undef usethreads=undef use5005threads=undef useithreads=define usemultiplicity=define useperlio=undef d_sfio=undef uselargefiles=undef usesocks=undef use64bitint=undef use64bitall=undef uselongdouble=undef Compiler: cc='cl', ccflags ='-nologo -O1 -MD -DNDEBUG -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCR YPT -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DPERL_MSVCRT_READFIX', optimize='-O1 -MD -DNDEBUG', cppflags='-DWIN32' ccversion='', gccversion='', gccosandvers='' intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234 d_longlong=undef, longlongsize=8, d_longdbl=define, longdblsize=10 ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=4 alignbytes=8, usemymalloc=n, prototype=define Linker and Libraries: ld='link', ldflags '-nologo -nodefaultlib -release -libpath:"C:\Perl\lib\CORE" -machine:x 86' libpth="C:\Perl\lib\CORE" libs= oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib netapi32.lib uuid.lib wsock32.lib mpr.lib winmm.lib version.lib odbc32.lib odbccp32.lib msvcrt.lib perllibs= oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib netapi32.lib uuid.lib wsock32.lib mpr.lib winmm.lib version.lib odbc32.lib odbccp32.lib msvcrt.lib libc=msvcrt.lib, so=dll, useshrplib=yes, libperl=perl56.lib Dynamic Linking: dlsrc=dl_win32.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' ' cccdlflags=' ', ddlflags='-dll -nologo -nodefaultlib -release -libpath:"C:\Perl\lib\COR E" -machine:x86' Locally applied patches: ACTIVEPERL_LOCAL_PATCHES_ENTRY @INC for perl v5.6.1: C:/Perl/lib C:/Perl/site/lib . Environment for perl v5.6.1: HOME (unset) LANG (unset) LANGUAGE (unset) LD_LIBRARY_PATH (unset) LOGDIR (unset) PATH=C:\Perl\bin\;C:\WINNT\system32;C:\WINNT;C:\WINNT\System32\Wbem;C:\P ROGRA~1\ULTRAE~1;C:\util;C:\Perl\5.7.1\bin\MSWin32-x86-multi-thread;C:\P rogram Files\GNU\WinCvs 1.3;C:\Program Files\SSH Communications Security\SSH Secure Shell;c:\djgpp\bin PERL_BADLANG (unset) SHELL (unset) ```
p5pRT commented 18 years ago

From @rgs

I don't see how that's different from #line changing the line reported for any other warning. The reported result is correct to me. Marking this bug as rejected.

p5pRT commented 18 years ago

@rgs - Status changed from 'open' to 'rejected'