From a21e3cecc50bd1f7b551e1ab96d816b263c28832 Mon Sep 17 00:00:00 2001
From: Miles Bader <miles@gnu.org>
Date: Mon, 26 Feb 1996 21:39:56 +0000
Subject: (check_hashbang): Correctly deal with interpreter lines having no
argument.
---
exec/hashexec.c | 16 ++++++++++++----
1 file changed, 12 insertions(+), 4 deletions(-)
(limited to 'exec')
diff --git a/exec/hashexec.c b/exec/hashexec.c
index 397f8a0a..11a6c19e 100644
--- a/exec/hashexec.c
+++ b/exec/hashexec.c
@@ -145,10 +145,18 @@ check_hashbang (struct execdata *e,
/* Find the name of the interpreter. */
p = ibuf + strspn (ibuf, " \t");
interp = strsep (&p, " \t");
- /* Skip remaining blanks, and the rest of the line is the argument. */
- p += strspn (p, " \t");
- arg = p;
- len = interp_len - (arg - ibuf);
+
+ if (p)
+ /* Skip remaining blanks, and the rest of the line is the argument. */
+ {
+ p += strspn (p, " \t");
+ arg = p;
+ len = interp_len - (arg - ibuf);
+ }
+ else
+ /* There is no argument. */
+ len = 0;
+
if (len == 0)
arg = NULL;
else
--
cgit v1.2.3