Author: chromatic
Date: Tue Oct 2 14:18:47 2007
New Revision: 21760
Modified:
branches/pdd15oo/t/pdd15oo/mmd.t
Log:
[t] Clean up deprecated syntax in some MMD tests.
Modified: branches/pdd15oo/t/pdd15oo/mmd.t
==============================================================================
--- branches/pdd15oo/t/pdd15oo/mmd.t (original)
+++ branches/pdd15oo/t/pdd15oo/mmd.t Tue Oct 2 14:18:47 2007
@@ -1034,17 +1034,17 @@
pir_output_is( <<'CODE', <<'OUTPUT', "mmd bug reported by Jeff" );
.namespace ['Foo']
-.sub bar :method, :multi(Foo, string)
+.sub bar :method :multi(Foo, string)
.param string arg
print "string\n"
.end
-.sub bar :method, :multi(Foo, pmc)
+.sub bar :method :multi(Foo, pmc)
.param pmc arg
print "PMC\n"
.end
-.sub bar :method, :multi(Foo)
+.sub bar :method :multi(Foo)
print "nothing\n"
.end
@@ -1131,11 +1131,11 @@
print $S0
print "\n"
.end
-.sub foo :method, :multi(string)
+.sub foo :method :multi(string)
.param pmc x
print " foo\n"
.end
-.sub foo :method, :multi(pmc)
+.sub foo :method :multi(pmc)
.param pmc x
print " foo\n"
.end
@@ -1276,7 +1276,6 @@
.local pmc class
newclass class, [ 'Some'; 'Class' ]
-
.local pmc instance
instance = new [ 'Some'; 'Class' ]
