File parrot.diff of Package parrot

--- ./MANIFEST.orig	2010-09-06 14:15:05.000000000 +0000
+++ ./MANIFEST	2010-09-06 14:15:14.000000000 +0000
@@ -1006,7 +1006,7 @@ include/parrot/thread.h
 include/parrot/vtables.h                                    [main]include
 include/parrot/warnings.h                                   [main]include
 include/pmc/dummy                                           [main]include
-lib/File/Which.pm                                           [devel]lib
+lib/File/Which.pm                                           []
 lib/IO/CaptureOutput.pm                                     []
 lib/Parrot/BuildUtil.pm                                     [devel]lib
 lib/Parrot/Config.pm                                        [devel]lib
--- ./tools/dev/create_language.pl.orig	2011-06-22 10:16:05.000000000 +0000
+++ ./tools/dev/create_language.pl	2011-06-22 10:16:31.000000000 +0000
@@ -1,4 +1,4 @@
-#! perl
+#! /usr/bin/perl
 # Copyright (C) 2007-2010, Parrot Foundation.
 
 =head1 NAME
--- ./tools/dev/gen_makefile.pl.orig	2011-06-22 10:16:13.000000000 +0000
+++ ./tools/dev/gen_makefile.pl	2011-06-22 10:16:39.000000000 +0000
@@ -1,4 +1,4 @@
-#! perl
+#! /usr/bin/perl
 
 # Copyright (C) 2009, Parrot Foundation.
 
--- ./tools/dev/pprof2cg.pl.orig	2011-06-22 10:16:23.000000000 +0000
+++ ./tools/dev/pprof2cg.pl	2011-06-22 10:17:07.000000000 +0000
@@ -1,4 +1,4 @@
-#! perl
+#! /usr/bin/perl
 
 # Copyright (C) 2009, Parrot Foundation.
 
--- ./tools/dev/reconfigure.pl.orig	2011-06-22 10:16:17.000000000 +0000
+++ ./tools/dev/reconfigure.pl	2011-06-22 10:16:45.000000000 +0000
@@ -1,4 +1,4 @@
-#! perl
+#! /usr/bin/perl
 
 # Copyright (C) 2007, Parrot Foundation.
 
--- ./lib/Parrot/Pmc2c/PCCMETHOD.pm.orig	2011-07-18 10:38:55.000000000 +0000
+++ ./lib/Parrot/Pmc2c/PCCMETHOD.pm	2011-07-18 10:44:39.000000000 +0000
@@ -4,7 +4,8 @@ package Parrot::Pmc2c::PCCMETHOD;
 use strict;
 use warnings;
 use Carp qw(longmess croak);
-use Parrot::Pmc2c::PCCMETHOD_BITS;
+# ; added so that rpm's require generator does not pick up the requires
+; use Parrot::Pmc2c::PCCMETHOD_BITS;
 use Parrot::Pmc2c::UtilFunctions qw( trim );
 
 =head1 NAME
--- ./src/interp/api.c.orig	2012-06-22 16:55:31.000000000 +0000
+++ ./src/interp/api.c	2012-06-22 16:56:24.000000000 +0000
@@ -982,6 +982,8 @@ Parrot_interp_info_s(PARROT_INTERP, INTV
                     return Parrot_str_new_init(interp, info.version,
                         strlen(info.version),  Parrot_ascii_encoding_ptr, 0);
                 }
+                Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_UNIMPLEMENTED,
+                        "uname() call failed");
             }
             break;
           case PARROT_OS_VERSION_NUMBER:
@@ -991,6 +993,8 @@ Parrot_interp_info_s(PARROT_INTERP, INTV
                     return Parrot_str_new_init(interp, info.release,
                         strlen(info.release),  Parrot_ascii_encoding_ptr, 0);
                 }
+                Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_UNIMPLEMENTED,
+                        "uname() call failed");
             }
             break;
 #endif