[svn:parrot] r42815 - trunk/runtime/parrot/library

[fperrad at svn.parrot.org]

Author: fperrad
Date: Fri Nov 27 10:50:07 2009
New Revision: 42815
URL: https://trac.parrot.org/parrot/changeset/42815

Log:
[distutils] fix loop in _clean_win32_installer

Modified:
   trunk/runtime/parrot/library/distutils.pir

Modified: trunk/runtime/parrot/library/distutils.pir
==============================================================================
--- trunk/runtime/parrot/library/distutils.pir	Fri Nov 27 07:42:49 2009	(r42814)
+++ trunk/runtime/parrot/library/distutils.pir	Fri Nov 27 10:50:07 2009	(r42815)
@@ -2509,13 +2509,13 @@
     .local string exe, bin
     exe = get_exe()
     $P1 = iter $P0
-  L1:
-    unless $P1 goto L2
+  L2:
+    unless $P1 goto L1
     bin = shift $P1
     $S0 = bin . exe
     unlink($S0)
-    goto L1
-  L2:
+    goto L2
+  L1:
 
     unlink('inno.iss')
     system('if exist setup-parrot-*.exe del setup-parrot-*.exe')