cvsuser 05/01/20 23:44:26
Modified: t/pmc object-meths.t
Log:
typo
Revision Changes Path
1.29 +3 -3 parrot/t/pmc/object-meths.t
Index: object-meths.t
===================================================================
RCS file: /cvs/public/parrot/t/pmc/object-meths.t,v
retrieving revision 1.28
retrieving revision 1.29
diff -u -r1.28 -r1.29
--- object-meths.t 17 Jan 2005 14:56:48 -0000 1.28
+++ object-meths.t 21 Jan 2005 07:44:26 -0000 1.29
@@ -1,6 +1,6 @@
#! perl -w
# Copyright: 2001-2003 The Perl Foundation. All Rights Reserved.
-# $Id: object-meths.t,v 1.28 2005/01/17 14:56:48 leo Exp $
+# $Id: object-meths.t,v 1.29 2005/01/21 07:44:26 leo Exp $
=head1 NAME
@@ -863,8 +863,8 @@
.pcc_sub meth:
print "in meth\n"
.include "interpinfo.pasm"
- interpinfo $S0, .INTERPINFO_CURRENT_METHOD
- print $S0
+ interpinfo S0, .INTERPINFO_CURRENT_METHOD
+ print S0
print "\n"
returncc
CODE
