[svn:parrot] r33588 - trunk/compilers/pct/src/PCT

Author: pmichaud
Date: Sat Dec  6 21:01:36 2008
New Revision: 33588

Modified:
   trunk/compilers/pct/src/PCT/Node.pir

Log:
[pct]:  Eliminate the guts of PCT::Node's 'node' method.
The current implementation is actually broken (it doesn't do
what it's supposed to), we're not really using it yet, and so
it's just creating more stuff to GC.  We'll disable it for
now, and reinstate it when we can do hll source line mapping (soon).


Modified: trunk/compilers/pct/src/PCT/Node.pir
==============================================================================
--- trunk/compilers/pct/src/PCT/Node.pir	(original)
+++ trunk/compilers/pct/src/PCT/Node.pir	Sat Dec  6 21:01:36 2008
@@ -217,19 +217,9 @@
 
 .sub 'node' :method
     .param pmc node
-    $I0 = isa node, ['PAST';'Node']
-    if $I0 goto clone_past
-  clone_pge:
-    $S0 = node
-    $I0 = node.'from'()
-    self['source'] = $S0
-    self['pos'] = $I0
-    .return ()
-  clone_past:
-    $P0 = node['source']
-    $P1 = node['pos']
-    self['source'] = $P0
-    self['pos'] = $P1
+     ## Do nothing for now.  When we're in a better position to
+     ## handle source line information (RT #43269 and others)
+     ## we'll figure out what to do here.
     .return ()
 .end
 

• [svn:parrot] r33588 - trunk/compilers/pct/src/PCT by pmichaud