develooper Front page | perl.perl5.porters | Postings from September 2001

[PATCH bleadperl] why some tests fail on Win95...

Thread Next
Nikola Knezevic
September 30, 2001 12:16
[PATCH bleadperl] why some tests fail on Win95...
Message ID:
It was strange to me why some tests kept failing under Win95, altough
they seemed fine. At last, I found the reason.

lib\Net\hostent.t and lib\Net\t\hostname.t were failing due to
lack of %windir%\hosts file, and that should be reported somehow.
On Win95 I don't have hosts, but hosts.sam. Don't ask my why, I
don't know, nor I don't have MSDN disks right now to find out something
about it...
Maybe the right solution for gethostent would be to check both for hosts
and hosts.sam (on Win95).

lib\ExtUtils.t was failing because there was a file 'ExtTest', (with
apostrophes and coma) in \t\ext-$$\ directory. I turned out that all ..\ext\*
directories had same entries in the form of 'module_name',.

Wherever we had some work with MakeMaker (creation of Makefile from, after issuing nmake we would have an entry 'module_name',.
Is some else experiences the same problem on Win32?

This caused lib\ExtUtil.t to fail, because nmake clean won't erase that

Makefile was OK, so just by pure luck I found the solution. I don't know
why it works, nor why it failed in the first place, but it works.
After applying the following patch all problems disappeared
(at least with 'FILE', ;).
As you may notice, I just changed quote from ' to " and removed empty
space around =>. This implies that the problem is in command line interpreter
(I don't know how), because when I've typed problematic line manually,
there were no 'ExtTest', file...

At the last, moral part of the story is: 'If something doesn't work
as expected, blame Windows!*'. :))))))

*Or creator of your command line interpreter (in my case JPSoft)...

Differences are here:
--- bleadperl\lib\ExtUtils\  Sat Sep  1 00:04:26 2001
+++ workin_bleadperl\lib\ExtUtils\   Sun Sep 30 19:50:30 2001
@@ -95,8 +95,8 @@
 $self->{BASEEXT}.def: Makefile.PL
      q!        $(PERL) "-I$(PERL_ARCHLIB)" "-I$(PERL_LIB)" -MExtUtils::Mksymlists \\
-     -e "Mksymlists('NAME' => '!, $self->{NAME},
-     q!', 'DLBASE' => '!,$self->{DLBASE},
+     -e "Mksymlists('NAME'=>\"!, $self->{NAME},
+     q!\", 'DLBASE' => '!,$self->{DLBASE},
      q!', 'DL_FUNCS' => !,neatvalue($funcs),
      q!, 'FUNCLIST' => !,neatvalue($funclist),
      q!, 'IMPORTS' => !,neatvalue($imports),

 .            `\!,        
 .            <. .>    
 [=======oOo==( ^ )==oOo========[ ]=======]      
 |---      _    -            --- [    member of    ]--- |        
 [========( )======_==============[ .counter attack. ]==]           
 .         ()     ( )
 .                ()

Thread Next Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at | Group listing | About