# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 902538207 0
# Node ID 3cfe86230c875d761513f0247d48ae02b48b449c
# Parent  572895549f80459ea5021081e0b9bcd2d14c990b
(Fcall_process): Check type of process cmd args earlier on.

diff -r 572895549f80 -r 3cfe86230c87 src/callproc.c
--- a/src/callproc.c	Sat Aug 08 00:49:24 1998 +0000
+++ b/src/callproc.c	Sat Aug 08 01:03:27 1998 +0000
@@ -246,6 +246,9 @@
 	int must_encode = 0;
 
 	for (i = 4; i < nargs; i++)
+	  CHECK_STRING (args[i], i);
+
+	for (i = 4; i < nargs; i++)
 	  if (STRING_MULTIBYTE (args[i]))
 	    must_encode = 1;
 
@@ -401,8 +404,6 @@
     {
       register int i;
 
-      for (i = 4; i < nargs; i++) CHECK_STRING (args[i], i);
-
       if (! CODING_REQUIRE_ENCODING (&argument_coding))
 	{
 	  for (i = 4; i < nargs; i++)