cvsuser 04/07/21 07:33:28
Modified: examples/benchmarks primes.pasm
Log:
Printing wrong register
Revision Changes Path
1.4 +2 -2 parrot/examples/benchmarks/primes.pasm
Index: primes.pasm
===================================================================
RCS file: /cvs/public/parrot/examples/benchmarks/primes.pasm,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -w -r1.3 -r1.4
--- primes.pasm 8 Mar 2004 11:43:41 -0000 1.3
+++ primes.pasm 21 Jul 2004 14:33:28 -0000 1.4
@@ -1,5 +1,5 @@
# Copyright (C) 2001-2003 The Perl Foundation. All rights reserved.
-# $Id: primes.pasm,v 1.3 2004/03/08 11:43:41 leo Exp $
+# $Id: primes.pasm,v 1.4 2004/07/21 14:33:28 dan Exp $
=head1 NAME
@@ -53,7 +53,7 @@
inc P1
le P1, P2, REDO
time N11
- print I6
+ print P6
print "\nlast is: "
print P7
print "\n"