develooper Front page | perl.cvs.parrot | Postings from January 2009

[svn:parrot] r35379 - trunk/languages/perl6/src/builtins

From:
pmichaud
Date:
January 10, 2009 19:55
Subject:
[svn:parrot] r35379 - trunk/languages/perl6/src/builtins
Message ID:
20090111035543.E7540CBA08@x12.develooper.com
Author: pmichaud
Date: Sat Jan 10 19:55:43 2009
New Revision: 35379

Modified:
   trunk/languages/perl6/src/builtins/guts.pir

Log:
[rakudo]: Adjust CALLMETHOD to work on Perl6Scalar.


Modified: trunk/languages/perl6/src/builtins/guts.pir
==============================================================================
--- trunk/languages/perl6/src/builtins/guts.pir	(original)
+++ trunk/languages/perl6/src/builtins/guts.pir	Sat Jan 10 19:55:43 2009
@@ -71,7 +71,7 @@
 .sub '!CALLMETHOD'
     .param string method
     .param pmc obj
-    $I0 = isa obj, 'ObjectRef'
+    $I0 = isa obj, 'Perl6Scalar'
     if $I0 goto any_method
     $I0 = can obj, method
     unless $I0 goto any_method



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