1 files changed, 1 insertions, 2 deletions
diff --git a/src/sysdep.c b/src/sysdep.c
index 36527dd735b..e868bc9c499 100644
--- a/src/sysdep.c
+++ b/src/sysdep.c
@@ -677,8 +677,7 @@ sys_subshell ()
     which somehow wedges the hp compiler.  So instead...  */
  dir = intern ("default-directory");
-  /* Can't use NILP */
+  if (NILP (Fboundp (dir)))
-  if (XFASTINT (Fboundp (dir)) == XFASTINT (Qnil))
    goto xyzzy;
  dir = Fsymbol_value (dir);
  if (!STRINGP (dir))

diff --git a/src/sysdep.c b/src/sysdep.c index 36527dd735b..e868bc9c499 100644 --- a/src/sysdep.c +++ b/src/sysdep.c
@@ -677,8 +677,7 @@ sys_subshell ()
677	which somehow wedges the hp compiler. So instead... */	677	which somehow wedges the hp compiler. So instead... */
678		678
679	dir = intern ("default-directory");	679	dir = intern ("default-directory");
680	/* Can't use NILP */	680	if (NILP (Fboundp (dir)))
681	if (XFASTINT (Fboundp (dir)) == XFASTINT (Qnil))
682	goto xyzzy;	681	goto xyzzy;
683	dir = Fsymbol_value (dir);	682	dir = Fsymbol_value (dir);
684	if (!STRINGP (dir))	683	if (!STRINGP (dir))