[svn:parrot] r36174 - trunk/languages/pod

[allison at svn.parrot.org]

Author: allison
Date: Fri Jan 30 17:09:31 2009
New Revision: 36174
URL: https://trac.parrot.org/parrot/changeset/36174

Log:
[pod] Fixing inheritance for HLLCompiler subclass.

Modified:
   trunk/languages/pod/pod.pir

Modified: trunk/languages/pod/pod.pir
==============================================================================
--- trunk/languages/pod/pod.pir	Fri Jan 30 15:13:28 2009	(r36173)
+++ trunk/languages/pod/pod.pir	Fri Jan 30 17:09:31 2009	(r36174)
@@ -46,8 +46,8 @@
 
 .sub 'onload' :anon :load :init
     load_bytecode 'PCT.pbc'
-    $P0 = get_hll_global ['PCT'], 'HLLCompiler'
-    $P2 = subclass $P0, 'PODCompiler'
+    $P0 = get_class ['PCT';'HLLCompiler']
+    $P2 = subclass $P0, ['Pod';'Compiler']
     $P1 = $P2.'new'()
     $P1.'language'('pod')
     $P0 = get_hll_namespace ['Pod';'Grammar']