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

[coke at svn.parrot.org]

Author: coke
Date: Tue Mar 24 02:29:12 2009
New Revision: 37662
URL: https://trac.parrot.org/parrot/changeset/37662

Log:
[cage] remove unused, untested 'splat' sub.

Modified:
   trunk/lib/Parrot/Pmc2c/UtilFunctions.pm

Modified: trunk/lib/Parrot/Pmc2c/UtilFunctions.pm
==============================================================================
--- trunk/lib/Parrot/Pmc2c/UtilFunctions.pm	Tue Mar 24 02:26:16 2009	(r37661)
+++ trunk/lib/Parrot/Pmc2c/UtilFunctions.pm	Tue Mar 24 02:29:12 2009	(r37662)
@@ -9,7 +9,7 @@
 
 use base qw( Exporter );
 our @EXPORT_OK = qw( count_newlines return_statement dont_edit dynext_load_code
-    c_code_coda slurp spew splat filename escape_filename
+    c_code_coda slurp spew filename escape_filename
     args_from_parameter_list
     passable_args_from_parameter_list
 );
@@ -274,13 +274,6 @@
     close $fh;
 }
 
-sub splat {
-    my ( $filename, $data ) = @_;
-    open my $fh, '>>', $filename;
-    print {$fh} $data;
-    close $fh;
-}
-
 sub filename {
     my ( $filename, $type ) = @_;