--- config/init/hints/hpux.pl.orig	Fri Oct 17 18:07:21 2003
+++ config/init/hints/hpux.pl	Fri Oct 17 18:04:44 2003
@@ -0,0 +1,8 @@
+my $libs = Configure::Data->get('libs');
+if ( $libs !~ /-lpthread/ ) {
+    $libs .= ' -lpthread';
+}
+
+Configure::Data->set(
+    libs => $libs,
+);
--- config/gen/makefiles/root.in.orig	Fri Oct 17 11:13:40 2003
+++ config/gen/makefiles/root.in	Fri Oct 17 18:10:32 2003
@@ -22,7 +22,7 @@
 LINK = ${link}
 LD = ${ld}
 LD_SHARED = ${ld_shared}
-TOUCH  = $(PERL) -e ${PQ}open(A,q{>>},$$_) or die foreach @ARGV${PQ}
+TOUCH  = $(PERL) -e ${PQ}open(A,q{>>$$_}) or die foreach @ARGV${PQ}
 YACC = ${yacc}
 LEX = ${lex}
 
--- languages/imcc/cfg.c.orig	Mon Sep  8 08:00:15 2003
+++ languages/imcc/cfg.c	Fri Oct 17 18:03:35 2003
@@ -316,7 +316,7 @@
 }
 
 
-void
+static void
 bb_add_edge(Parrot_Interp interpreter, Basic_block *from, Basic_block *to) {
 
     Edge *e;
@@ -519,7 +519,7 @@
  * the var is alive.
  */
 
-void
+static void
 analyse_life_block(Parrot_Interp interpreter, Basic_block* bb, SymReg* r) {
     Instruction* ins, *special;
     Life_range* l;
@@ -961,7 +961,7 @@
     free_loops(interpreter);
 }
 
-Basic_block*
+static Basic_block*
 make_basic_block(Parrot_Interp interpreter, Instruction* ins) {
     Basic_block *bb;
     int n;