Mercurial > hg > octave-nkf

diff scripts/control/system/sysmult.m @ 3979:e0b7a493e5a8

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2002-07-10 17:45:34 by jwe]
author jwe
date Wed, 10 Jul 2002 17:45:34 +0000
parents d178e2bbd873
children 22bd65326ec1
line wrap: on
line diff
--- a/scripts/control/system/sysmult.m
+++ b/scripts/control/system/sysmult.m
@@ -36,7 +36,7 @@
 ## Created: July 1996
 ## updated for variable number of arguments by A. S. Hodel July 1999
 
-function sys = sysmult (...)
+function sys = sysmult (varargin)
 
   if(nargin < 1)
     usage("sysmult: sys = sysmult(Asys{,Bsys,...})");
@@ -44,9 +44,8 @@
 
   ## collect all arguments
   arglist = list();
-  va_start();
   for kk=1:nargin
-    arglist(kk) = va_arg();
+    arglist(kk) = varargin{kk};
     if(!is_struct(nth(arglist,kk)))
       error("sysadd: argument %d is not a data structure",kk);
     endif