Hi Folks,
Configure.pl is giving me warnings about undef values being passed to C<split> on my
platform.
--
$ perl Configure.pl
.
.
Generating build files................................................done.
Moving platform files into place......................................Use of
uninitialized value in split at config/gen/platform.pl line 94.
Use of uninitialized value in split at config/gen/platform.pl line 189.
done.
Recording configuration data for later retrieval......................done.
Okay, we're done!
.
.
--
Is anyone else seeing these warnings?
--
Summary of my parrot 0.1.0 configuration:
configdate='Sun May 23 17:19:34 2004'
Platform:
osname=linux, archname=x86_64-linux
jitcapable=0, jitarchname=nojit,
jitosname=nojit, jitcpuarch=i386
execcapable=0
perl=/usr/bin/perl
Compiler:
cc='gcc', ccflags=' -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
Linker and Libraries:
ld='gcc', ldflags=' -L/usr/local/lib',
cc_ldflags='',
libs='-lpthread -lnsl -ldl -lm -lcrypt -lutil'
Dynamic Linking:
so='.so', ld_shared='-shared -L/usr/local/lib -fPIC',
ld_shared_flags=''
Types:
iv=long, intvalsize=8, intsize=4, opcode_t=long, opcode_t_size=8,
ptrsize=8, ptr_alignment=4 byteorder=12345678,
nv=double, numvalsize=8, doublesize=8
--
Assuming that these are harmless (I do have 7 tests failing), I've attached a patch to
suppress warnings from split.
-J
--Index: config/gen/platform.pl
===================================================================
RCS file: /cvs/public/parrot/config/gen/platform.pl,v
retrieving revision 1.15
diff -u -r1.15 platform.pl
--- config/gen/platform.pl 26 Apr 2004 09:23:47 -0000 1.15
+++ config/gen/platform.pl 24 May 2004 03:19:34 -0000
@@ -91,7 +91,9 @@
}
# finally append generated
+ $^W = 0;
@headers = grep { /\.h$/ } split(',', $generated);
+ $^W = 1;
for ( @headers ) {
if ( -e $_ ) {
local $/ = undef;
@@ -186,7 +188,9 @@
}
# append generated c files
+ $^W = 0;
@impls = grep { /\.c$/ } split(',', $generated);
+ $^W = 1;
for ( @impls ) {
if ( -e $_ ) {
local $/ = undef;
