diff src/utils.cc @ 578:d169be9237fb

[project @ 1994-08-03 20:06:54 by jwe]
author jwe
date Wed, 03 Aug 1994 20:07:26 +0000
parents 94fd73d1a0bc
children bc813f5eb025
line wrap: on
line diff
--- a/src/utils.cc	Wed Aug 03 20:06:54 1994 +0000
+++ b/src/utils.cc	Wed Aug 03 20:07:26 1994 +0000
@@ -456,19 +456,19 @@
 }
 
 char **
-make_argv (const Octave_object& args, const char *warnfor)
+make_argv (const Octave_object& args, const char *fcn_name)
 {
   char **argv = 0;
   if (all_strings (args))
     {
       int n = args.length ();
       argv = new char * [n + 1];
-      argv[0] = 0;
+      argv[0] = strsave (fcn_name);
       for (int i = 1; i < n; i++)
 	argv[i] = strsave (args(i).string_value ());
     }
   else
-    error ("%s: expecting all arguments to be strings", warnfor);
+    error ("%s: expecting all arguments to be strings", fcn_name);
 
   return argv;
 }