Author: pmichaud
Date: Wed May  4 19:00:53 2005
New Revision: 7981

Modified:
   trunk/compilers/pge/PGE/Match.pir
   trunk/config/gen/makefiles/pge.in
Log:
Changed .to() method to report correct offset.  Fixed testclean
target to remove ".pir" files instead of ".imc".


Modified: trunk/compilers/pge/PGE/Match.pir
==============================================================================
--- trunk/compilers/pge/PGE/Match.pir   (original)
+++ trunk/compilers/pge/PGE/Match.pir   Wed May  4 19:00:53 2005
@@ -85,7 +85,7 @@
 
 =item C<from()>
 
-Returns the position in the target string of the first character
+Returns the offset in the target string of the first item
 this object matched.
 
 =cut
@@ -99,8 +99,7 @@
 
 =item C<to()>
 
-Returns the position in the target string of the last character
-this object matched.
+Returns the offset at the end of this match.
 
 =cut
 
@@ -108,7 +107,6 @@
     .local pmc to
     to = getattribute self, "PGE::Match\x0$:to"
     $I0 = to
-    dec $I0
     .return ($I0)
 .end
 

Modified: trunk/config/gen/makefiles/pge.in
==============================================================================
--- trunk/config/gen/makefiles/pge.in   (original)
+++ trunk/config/gen/makefiles/pge.in   Wed May  4 19:00:53 2005
@@ -43,7 +43,7 @@
        cd ../..; $(PERL) -Ilib t/harness t/p6rules/*.t
 
 testclean:
-       $(RM_RF) ../../t/p6rules/*.imc ../../t/p6rules/*.pasm
+       $(RM_RF) ../../t/p6rules/*.pir ../../t/p6rules/*.pasm
 
 clean: testclean
        $(RM_RF) PGE.pbc

Reply via email to