Skip to content
This repository
Browse code

[t][TT#2103] Parrot_PMC_cmp_pmc

This test gives this error:

even though PP->P seems to be the correct signature.
  • Loading branch information...
commit e71819b14e4b33ea3ebc2bb3364e64ba6b588dc0 1 parent 504e86f
Duke Leto authored April 27, 2011

Showing 1 changed file with 24 additions and 23 deletions. Show diff stats Hide diff stats

  1. 47  t/src/extend_vtable.t
47  t/src/extend_vtable.t
@@ -152,6 +152,30 @@ CODE
152 152
 
153 153
 # actual tests start here
154 154
 
  155
+extend_vtable_output_is(<<'CODE', <<'OUTPUT', "Parrot_PMC_cmp_pmc" );
  156
+    Parrot_PMC_set_integer_native(interp, pmc, 42);
  157
+    Parrot_PMC_set_integer_native(interp, pmc2, 17);
  158
+
  159
+    pmc3 = Parrot_PMC_cmp_pmc(interp, pmc, pmc2);
  160
+    Parrot_printf(interp,"%P\n", pmc3 );
  161
+
  162
+    Parrot_PMC_set_integer_native(interp, pmc, 17);
  163
+    Parrot_PMC_set_integer_native(interp, pmc2, 42);
  164
+
  165
+    pmc3 = Parrot_PMC_cmp_pmc(interp, pmc, pmc2);
  166
+    Parrot_printf(interp,"%P\n", pmc3 );
  167
+
  168
+    Parrot_PMC_set_integer_native(interp, pmc, 42);
  169
+
  170
+    pmc3 = Parrot_PMC_cmp_pmc(interp, pmc, pmc2);
  171
+    Parrot_printf(interp,"%P\n", pmc3 );
  172
+CODE
  173
+1
  174
+-1
  175
+0
  176
+Done!
  177
+OUTPUT
  178
+
155 179
 extend_vtable_output_is(<<'CODE', <<'OUTPUT', "Parrot_PMC_does_pmc" );
156 180
     pmc2   = Parrot_PMC_new(interp, Parrot_PMC_typenum(interp, "Role"));
157 181
     integer = Parrot_PMC_does_pmc(interp,pmc,pmc2);
@@ -1390,29 +1414,6 @@ Done!
1390 1414
 OUTPUT
1391 1415
 
1392 1416
 
1393  
-#extend_vtable_output_is(<<'CODE', <<'OUTPUT', "Parrot_PMC_cmp_pmc" );
1394  
-#    Parrot_PMC_set_integer_native(interp, pmc, 42);
1395  
-#    Parrot_PMC_set_integer_native(interp, pmc2, 17);
1396  
-#
1397  
-#    pmc3 = Parrot_PMC_cmp_pmc(interp, pmc, pmc2);
1398  
-#    Parrot_printf(interp,"%P\n", pmc3 );
1399  
-#
1400  
-#    Parrot_PMC_set_integer_native(interp, pmc, 17);
1401  
-#    Parrot_PMC_set_integer_native(interp, pmc2, 42);
1402  
-#
1403  
-#    pmc3 = Parrot_PMC_cmp_pmc(interp, pmc, pmc2);
1404  
-#    Parrot_printf(interp,"%P\n", pmc3 );
1405  
-#
1406  
-#    Parrot_PMC_set_integer_native(interp, pmc, 42);
1407  
-#
1408  
-#    pmc3 = Parrot_PMC_cmp_pmc(interp, pmc, pmc2);
1409  
-#    Parrot_printf(interp,"%P\n", pmc3 );
1410  
-#CODE
1411  
-#1
1412  
-#-1
1413  
-#0
1414  
-#Done!
1415  
-#OUTPUT
1416 1417
 
1417 1418
 extend_vtable_output_is(<<'CODE', <<'OUTPUT', "Parrot_PMC_cmp_num" );
1418 1419
     Parrot_PMC_set_integer_native(interp, pmc, 42);

0 notes on commit e71819b

Please sign in to comment.
Something went wrong with that request. Please try again.