[svn:parrot] r20763 - trunk/config/auto

Author: particle
Date: Tue Aug 21 08:51:30 2007
New Revision: 20763

Modified:
   trunk/config/auto/attributes.pm

Log:
[config]: work around msvc warning for unused variable during compiler 
attribute detection

Modified: trunk/config/auto/attributes.pm
==============================================================================
--- trunk/config/auto/attributes.pm     (original)
+++ trunk/config/auto/attributes.pm     Tue Aug 21 08:51:30 2007
@@ -65,8 +65,14 @@
     my $cc = $conf->option_or_data( 'cc' );
     cc_gen('config/auto/attributes/test_c.in');
 
+    my $disable_warnings = '';
+    # work around msvc warning for unused variable
+    if ( defined $conf->option_or_data( 'msvcversion' ) ) {
+        $disable_warnings = '-wd4101';
+    }
+
     my $ccflags = $conf->option_or_data( 'ccflags');
-    my $tryflags = "$ccflags -D$attr";
+    my $tryflags = "$ccflags -D$attr $disable_warnings";
 
     my $command_line = Parrot::Configure::Step::_build_compile_command( $cc, 
$tryflags );
     $verbose and print "  ", $command_line, $/;