[svn:parrot] r40811 - trunk/config/init/hints

dukeleto at svn.parrot.org dukeleto at svn.parrot.org
Wed Aug 26 04:57:23 UTC 2009


Author: dukeleto
Date: Wed Aug 26 04:57:21 2009
New Revision: 40811
URL: https://trac.parrot.org/parrot/changeset/40811

Log:
[TT #947] Add word boundary assertions to various hints files, darbelo++

Original patch description:

r40798 (in the pluggable_runcore branch) added word boundary assertions
to config/init/hints/linux.pm This patch does the same to the other
files in that directory. config/init/hints/linux.pm is left untouched to
avoid later merge conflicts.

Modified:
   trunk/config/init/hints/dec_osf.pm
   trunk/config/init/hints/dragonfly.pm
   trunk/config/init/hints/hpux.pm
   trunk/config/init/hints/irix.pm
   trunk/config/init/hints/netbsd.pm
   trunk/config/init/hints/openbsd.pm
   trunk/config/init/hints/solaris.pm

Modified: trunk/config/init/hints/dec_osf.pm
==============================================================================
--- trunk/config/init/hints/dec_osf.pm	Wed Aug 26 01:46:42 2009	(r40810)
+++ trunk/config/init/hints/dec_osf.pm	Wed Aug 26 04:57:21 2009	(r40811)
@@ -11,7 +11,7 @@
 
     # Tru64
     my $ccflags = $conf->data->get('ccflags');
-    if ( $ccflags !~ /-pthread/ ) {
+    if ( $ccflags !~ /-pthread\b/ ) {
         $ccflags .= ' -pthread';
     }
     if ( $ccflags !~ /-D_REENTRANT/ ) {
@@ -24,7 +24,7 @@
     $conf->data->set( ccflags => $ccflags );
 
     my $libs = $conf->data->get('libs');
-    if ( $libs !~ /-lpthread/ ) {
+    if ( $libs !~ /-lpthread\b/ ) {
         $libs .= ' -lpthread';
     }
     $conf->data->set( libs => $libs );
@@ -37,7 +37,7 @@
     }
 
     my $linkflags = $conf->data->get('linkflags');
-    if ( $linkflags !~ /-expect_unresolved/ ) {
+    if ( $linkflags !~ /-expect_unresolved\b/ ) {
         $linkflags = "-expect_unresolved '*' -O4 -msym -std $linkflags";
         $conf->data->set( linkflags => $linkflags );
     }

Modified: trunk/config/init/hints/dragonfly.pm
==============================================================================
--- trunk/config/init/hints/dragonfly.pm	Wed Aug 26 01:46:42 2009	(r40810)
+++ trunk/config/init/hints/dragonfly.pm	Wed Aug 26 04:57:21 2009	(r40811)
@@ -13,7 +13,7 @@
     my $version   = $conf->option_or_data('VERSION');
     my $libs = $conf->data->get('libs');
 
-    $libs .= ' -pthread' unless $libs =~ /pthread/;
+    $libs .= ' -pthread' unless $libs =~ /pthread\b/;
 
     $conf->data->set(
         libs  => $libs,

Modified: trunk/config/init/hints/hpux.pm
==============================================================================
--- trunk/config/init/hints/hpux.pm	Wed Aug 26 01:46:42 2009	(r40810)
+++ trunk/config/init/hints/hpux.pm	Wed Aug 26 04:57:21 2009	(r40811)
@@ -10,7 +10,7 @@
     my ( $self, $conf ) = @_;
 
     my $libs = $conf->data->get('libs');
-    if ( $libs !~ /-lpthread/ ) {
+    if ( $libs !~ /-lpthread\b/ ) {
         $libs .= ' -lpthread';
     }
 

Modified: trunk/config/init/hints/irix.pm
==============================================================================
--- trunk/config/init/hints/irix.pm	Wed Aug 26 01:46:42 2009	(r40810)
+++ trunk/config/init/hints/irix.pm	Wed Aug 26 04:57:21 2009	(r40811)
@@ -21,7 +21,7 @@
     $conf->data->set( ccflags => $ccflags );
 
     my $libs = $conf->data->get('libs');
-    if ( $libs !~ /-lpthread/ ) {
+    if ( $libs !~ /-lpthread\b/ ) {
         $libs .= ' -lpthread';
     }
     $conf->data->set( libs => $libs );

Modified: trunk/config/init/hints/netbsd.pm
==============================================================================
--- trunk/config/init/hints/netbsd.pm	Wed Aug 26 01:46:42 2009	(r40810)
+++ trunk/config/init/hints/netbsd.pm	Wed Aug 26 04:57:21 2009	(r40811)
@@ -10,13 +10,13 @@
     my ( $self, $conf ) = @_;
 
     my $ccflags = $conf->data->get('ccflags');
-    if ( $ccflags !~ /-pthread/ ) {
+    if ( $ccflags !~ /-pthread\b/ ) {
         $ccflags .= ' -pthread';
     }
     $conf->data->set( ccflags => $ccflags );
 
     my $libs = $conf->data->get('libs');
-    if ( $libs !~ /-lpthread/ ) {
+    if ( $libs !~ /-lpthread\b/ ) {
         $libs .= ' -lpthread';
     }
     $conf->data->set( libs => $libs );

Modified: trunk/config/init/hints/openbsd.pm
==============================================================================
--- trunk/config/init/hints/openbsd.pm	Wed Aug 26 01:46:42 2009	(r40810)
+++ trunk/config/init/hints/openbsd.pm	Wed Aug 26 04:57:21 2009	(r40811)
@@ -12,13 +12,13 @@
     my $share_ext = $conf->option_or_data('share_ext');
     my $version   = $conf->option_or_data('VERSION');
     my $ccflags = $conf->data->get('ccflags');
-    if ( $ccflags !~ /-pthread/ ) {
+    if ( $ccflags !~ /-pthread\b/ ) {
         $ccflags .= ' -pthread';
     }
     $conf->data->set( ccflags => $ccflags );
 
     my $libs = $conf->data->get('libs');
-    if ( $libs !~ /-lpthread/ ) {
+    if ( $libs !~ /-lpthread\b/ ) {
         $libs .= ' -lpthread';
     }
     $conf->data->set(

Modified: trunk/config/init/hints/solaris.pm
==============================================================================
--- trunk/config/init/hints/solaris.pm	Wed Aug 26 01:46:42 2009	(r40810)
+++ trunk/config/init/hints/solaris.pm	Wed Aug 26 04:57:21 2009	(r40811)
@@ -10,7 +10,7 @@
     my ( $self, $conf ) = @_;
 
     my $libs = $conf->data->get('libs');
-    if ( $libs !~ /-lpthread/ ) {
+    if ( $libs !~ /-lpthread\b/ ) {
         $libs .= ' -lpthread';
     }
     if ( $libs !~ /-lrt\b/ ) {


More information about the parrot-commits mailing list