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

[svn:parrot] r33583 - trunk/languages/perl6/src/classes

From:
pmichaud
Date:
December 6, 2008 18:41
Subject:
[svn:parrot] r33583 - trunk/languages/perl6/src/classes
Message ID:
20081207024133.8CE93CB9AF@x12.develooper.com
Author: pmichaud
Date: Sat Dec  6 18:41:31 2008
New Revision: 33583

Modified:
   trunk/languages/perl6/src/classes/Capture.pir
   trunk/languages/perl6/src/classes/Object.pir

Log:
[rakudo]:  Cleanup Capture definition slightly.


Modified: trunk/languages/perl6/src/classes/Capture.pir
==============================================================================
--- trunk/languages/perl6/src/classes/Capture.pir	(original)
+++ trunk/languages/perl6/src/classes/Capture.pir	Sat Dec  6 18:41:31 2008
@@ -13,7 +13,7 @@
 .namespace ['Perl6Capture']
 
 .sub 'onload' :anon :init :load
-    load_bytecode 'PCT.pbc'
+    load_bytecode 'Parrot/Capture_PIR.pbc'
     .local pmc p6meta, captureproto
     p6meta = get_hll_global ['Perl6Object'], '$!P6META'
     captureproto = p6meta.'new_class'('Perl6Capture', 'parent'=>'Capture_PIR Any', 'name'=>'Capture')

Modified: trunk/languages/perl6/src/classes/Object.pir
==============================================================================
--- trunk/languages/perl6/src/classes/Object.pir	(original)
+++ trunk/languages/perl6/src/classes/Object.pir	Sat Dec  6 18:41:31 2008
@@ -25,7 +25,7 @@
 .namespace []
 .sub 'onload' :anon :init :load
     .local pmc p6meta
-    load_bytecode 'P6object.pbc'
+    load_bytecode 'PCT.pbc'
     $P0 = get_root_global ['parrot'], 'P6metaclass'
     $P0.'new_class'('Perl6Object', 'name'=>'Object')
     p6meta = $P0.'HOW'()



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