develooper Front page | perl.cvs.parrot | Postings from December 2008

[svn:parrot] r34017 - trunk/t/pmc

From:
kjs
Date:
December 17, 2008 03:18
Subject:
[svn:parrot] r34017 - trunk/t/pmc
Message ID:
20081217111843.C81B1CBA12@x12.develooper.com
Author: kjs
Date: Wed Dec 17 03:18:43 2008
New Revision: 34017

Modified:
   trunk/t/pmc/orderedhash.t

Log:
[t] minor changes to test that remove tests for [a,b] syntax in orderedhash.t

Modified: trunk/t/pmc/orderedhash.t
==============================================================================
--- trunk/t/pmc/orderedhash.t	(original)
+++ trunk/t/pmc/orderedhash.t	Wed Dec 17 03:18:43 2008
@@ -651,10 +651,6 @@
     print "--\n"
     set P2, P0[0]
     print P2
-    set P2, P0[1, 'foo']
-    print P2
-    set P2, P0[1, 'quux']
-    print P2
     end
 CODE
 bar
@@ -662,8 +658,6 @@
 xyzzy
 --
 Foo
-baz
-xyzzy
 OUTPUT
 
 pasm_output_is( <<'CODE', <<'OUTPUT', "exists compound key" );
@@ -732,7 +726,7 @@
     exists I0, P0[2]
     print I0
     print "\n--\n"
-    delete P0[1, 'quux']
+    delete P0[1; 'quux']
     exists I0, P0['b'; 'quux']
     print I0
     exists I0, P0[1; 'quux']



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About