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

[svn:parrot] r34553 - trunk/lib/Parrot/Pmc2c

From:
petdance
Date:
December 28, 2008 22:34
Subject:
[svn:parrot] r34553 - trunk/lib/Parrot/Pmc2c
Message ID:
20081229063426.60CC6CB9FA@x12.develooper.com
Author: petdance
Date: Sun Dec 28 22:34:25 2008
New Revision: 34553

Modified:
   trunk/lib/Parrot/Pmc2c/Method.pm
   trunk/lib/Parrot/Pmc2c/PMC.pm
   trunk/lib/Parrot/Pmc2c/PMCEmitter.pm

Log:
pruned unused imports

Modified: trunk/lib/Parrot/Pmc2c/Method.pm
==============================================================================
--- trunk/lib/Parrot/Pmc2c/Method.pm	(original)
+++ trunk/lib/Parrot/Pmc2c/Method.pm	Sun Dec 28 22:34:25 2008
@@ -7,7 +7,7 @@
 use constant VTABLE       => 'VTABLE';
 use constant NON_VTABLE   => 'NON_VTABLE';
 use constant MULTI        => 'MULTI';
-use Parrot::Pmc2c::UtilFunctions qw(count_newlines args_from_parameter_list passable_args_from_parameter_list);
+use Parrot::Pmc2c::UtilFunctions qw( args_from_parameter_list passable_args_from_parameter_list );
 
 sub new {
     my ( $class, $self_hash ) = @_;

Modified: trunk/lib/Parrot/Pmc2c/PMC.pm
==============================================================================
--- trunk/lib/Parrot/Pmc2c/PMC.pm	(original)
+++ trunk/lib/Parrot/Pmc2c/PMC.pm	Sun Dec 28 22:34:25 2008
@@ -1,4 +1,4 @@
-# Copyright (C) 2004-2006, The Perl Foundation.
+# Copyright (C) 2004-2008, The Perl Foundation.
 # $Id$
 #
 
@@ -27,7 +27,6 @@
 our @EXPORT_OK = qw();
 use Storable ();
 use Parrot::PMC;
-use Parrot::Pmc2c::UtilFunctions qw(spew);
 use Parrot::Pmc2c::Method;
 
 sub create {

Modified: trunk/lib/Parrot/Pmc2c/PMCEmitter.pm
==============================================================================
--- trunk/lib/Parrot/Pmc2c/PMCEmitter.pm	(original)
+++ trunk/lib/Parrot/Pmc2c/PMCEmitter.pm	Sun Dec 28 22:34:25 2008
@@ -25,8 +25,7 @@
 use Parrot::Pmc2c::Emitter;
 use Parrot::Pmc2c::Method;
 use Parrot::Pmc2c::MethodEmitter;
-use Parrot::Pmc2c::UtilFunctions
-    qw( gen_ret dont_edit count_newlines dynext_load_code c_code_coda );
+use Parrot::Pmc2c::UtilFunctions qw( dont_edit dynext_load_code c_code_coda );
 use Text::Balanced 'extract_bracketed';
 use Parrot::Pmc2c::PCCMETHOD;
 use Parrot::Pmc2c::MULTI;



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