[svn:parrot] r46071 - trunk/examples/shootout
mikehh at svn.parrot.org
mikehh at svn.parrot.org
Tue Apr 27 18:36:47 UTC 2010
Author: mikehh
Date: Tue Apr 27 18:36:46 2010
New Revision: 46071
URL: https://trac.parrot.org/parrot/changeset/46071
Log:
replace in-place string op
Modified:
trunk/examples/shootout/revcomp.pir
Modified: trunk/examples/shootout/revcomp.pir
==============================================================================
--- trunk/examples/shootout/revcomp.pir Tue Apr 27 18:14:11 2010 (r46070)
+++ trunk/examples/shootout/revcomp.pir Tue Apr 27 18:36:46 2010 (r46071)
@@ -1,5 +1,5 @@
#!parrot
-# Copyright (C) 2005-2009, Parrot Foundation.
+# Copyright (C) 2005-2010, Parrot Foundation.
# $Id$
# Reads from stdin a file in the format made by fasta.pir
# ./parrot -R jit
@@ -54,7 +54,7 @@
print line
goto endif
else:
- chopn line, 1
+ line = chopn line, 1
seq .= line
endif:
goto beginwhile
More information about the parrot-commits
mailing list