develooper Front page | perl.cvs.parrot | Postings from December 2008

[svn:parrot] r34724 - in branches/pdd30install_stage3: config/gen t/steps

From:
jkeenan
Date:
December 31, 2008 12:55
Subject:
[svn:parrot] r34724 - in branches/pdd30install_stage3: config/gen t/steps
Message ID:
20081231205458.92AA2CB9FA@x12.develooper.com
Author: jkeenan
Date: Wed Dec 31 12:54:55 2008
New Revision: 34724

Modified:
   branches/pdd30install_stage3/config/gen/opengl.pm
   branches/pdd30install_stage3/t/steps/gen_platform-01.t

Log:
1. Update test in t/steps/gen_platform-01.t to reflect fact that _handle_begin_c() now takes \$conf as first argument.
2. gen::opengl needs to import Parrot::BuildUtil::add_to_generated()..


Modified: branches/pdd30install_stage3/config/gen/opengl.pm
==============================================================================
--- branches/pdd30install_stage3/config/gen/opengl.pm	(original)
+++ branches/pdd30install_stage3/config/gen/opengl.pm	Wed Dec 31 12:54:55 2008
@@ -42,7 +42,7 @@
 use base qw(Parrot::Configure::Step);
 
 use Parrot::Configure::Utils ':gen';
-
+use Parrot::BuildUtil;
 
 my @GLUT_1_CALLBACKS = (
     [ 'Display',          'void' ],

Modified: branches/pdd30install_stage3/t/steps/gen_platform-01.t
==============================================================================
--- branches/pdd30install_stage3/t/steps/gen_platform-01.t	(original)
+++ branches/pdd30install_stage3/t/steps/gen_platform-01.t	Wed Dec 31 12:54:55 2008
@@ -181,7 +181,7 @@
     my $plat_c = q{src/platform.c};
     open my $PLATFORM_C, '>', $plat_c
         or croak "Unable to open handle for writing";
-    $step->_handle_begin_c($platform, $PLATFORM_C);
+    $step->_handle_begin_c($conf, $platform, $PLATFORM_C);
     close $PLATFORM_C or croak "Unable to close handle after writing";
 
     my $text = _slurp( $plat_c );



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About