develooper Front page | perl.cvs.parrot | Postings from January 2009

[svn:parrot] r35054 - trunk/compilers/pirc/src

From:
kjs
Date:
January 6, 2009 09:28
Subject:
[svn:parrot] r35054 - trunk/compilers/pirc/src
Message ID:
20090106172818.EFB88CB9F9@x12.develooper.com
Author: kjs
Date: Tue Jan  6 09:28:18 2009
New Revision: 35054

Modified:
   trunk/compilers/pirc/src/pircompunit.c

Log:
[pirc] fix a logic error.

Modified: trunk/compilers/pirc/src/pircompunit.c
==============================================================================
--- trunk/compilers/pirc/src/pircompunit.c	(original)
+++ trunk/compilers/pirc/src/pircompunit.c	Tue Jan  6 09:28:18 2009
@@ -793,8 +793,9 @@
         newarg->next = inv->arguments->next;
         inv->arguments->next = newarg;
     }
+    else
+        inv->arguments = newarg;
 
-    inv->arguments = newarg;
     return inv->arguments;
 }
 



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About