[svn:parrot] r40964 - trunk/t/pmc
NotFound at svn.parrot.org
NotFound at svn.parrot.org
Thu Sep 3 21:30:05 UTC 2009
Author: NotFound
Date: Thu Sep 3 21:30:05 2009
New Revision: 40964
URL: https://trac.parrot.org/parrot/changeset/40964
Log:
[cage] make some TODOed test at least compile
Modified:
trunk/t/pmc/threads.t
Modified: trunk/t/pmc/threads.t
==============================================================================
--- trunk/t/pmc/threads.t Thu Sep 3 20:46:22 2009 (r40963)
+++ trunk/t/pmc/threads.t Thu Sep 3 21:30:05 2009 (r40964)
@@ -831,10 +831,10 @@
.local pmc the_value
the_value = new ['PerlInt']
the_value = 42
- store_global 'Foo', 'x', the_value
- $I0 = typeof passed_value
- $I1 = typeof the_value
- $I0 = $I0 - $I1
+ set_hll_global ['Foo'], 'x', the_value
+ $S0 = typeof passed_value
+ $S1 = typeof the_value
+ $I0 = iseq $S0, $S1
print $I0
print "\n"
.local pmc ns
@@ -848,7 +848,7 @@
okay:
print "ok (equal)\n"
- $I0 = fortytwo
+ $I0 = the_value
print $I0
print "\n"
.end
More information about the parrot-commits
mailing list