From: Gurusamy Sarathy <gsar@cpan.org>
Date: Sat, 11 Mar 2000 17:01:47 +0000 (+0000)
Subject: off-by-one in os2.c (from Ilya Zakharevich)
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=d5d696321f9e1b87353b01d716da42f2c3275e5d;p=p5sagit%2Fp5-mst-13.2.git

off-by-one in os2.c (from Ilya Zakharevich)

p4raw-id: //depot/perl@5654
---

diff --git a/os2/os2.c b/os2/os2.c
index 8a17ae7..97e8899 100644
--- a/os2/os2.c
+++ b/os2/os2.c
@@ -777,7 +777,7 @@ U32 addflag;
 						   long enough. */
 			    a--;
 			}
-			while (nargs-- >= 0)
+			while (--nargs >= 0)
 			    PL_Argv[nargs] = argsp[nargs];
 			/* Enable pathless exec if #! (as pdksh). */
 			pass = (buf[0] == '#' ? 2 : 3);