[svn:parrot] r37167 - trunk/lib/Parrot/Harness

[rurban at svn.parrot.org]

Author: rurban
Date: Sat Mar  7 14:15:17 2009
New Revision: 37167
URL: https://trac.parrot.org/parrot/changeset/37167

Log:
[t] TT #323 smolder 32/64 wordsize oops

Modified:
   trunk/lib/Parrot/Harness/Smoke.pm

Modified: trunk/lib/Parrot/Harness/Smoke.pm
==============================================================================
--- trunk/lib/Parrot/Harness/Smoke.pm	Sat Mar  7 13:53:01 2009	(r37166)
+++ trunk/lib/Parrot/Harness/Smoke.pm	Sat Mar  7 14:15:17 2009	(r37167)
@@ -105,7 +105,7 @@
     my $arch = $PConfig{cpuarch} eq 'sun4' ? 'sparc' : $PConfig{cpuarch};
     # add the 32/64 bit suffix to the cpuarch
     if ($arch !~ /\d$/) {
-      $arch .= 8 * $PConfig{wordsize};
+      $arch .= 8 * $PConfig{opcode_t_size};
     }
     my $devel = $PConfig{DEVEL};
     # check for local-modifications if -d .svn and query to continue