Mercurial > forge

changeset 10054:4224a87e0f51 octave-forge

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
vrml: make use of nargin function rather than replacing it by a var as it was before
author carandraug
date Mon, 16 Apr 2012 09:50:24 +0000
parents 4d9a41d74ed1
children 41e405a5cff5
files main/vrml/inst/save_vrml.m main/vrml/inst/vrml_faces.m main/vrml/inst/vrml_group.m main/vrml/inst/vrml_lines.m
diffstat 4 files changed, 1 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- a/main/vrml/inst/save_vrml.m	Mon Apr 16 09:40:34 2012 +0000
+++ b/main/vrml/inst/save_vrml.m	Mon Apr 16 09:50:24 2012 +0000
@@ -67,10 +67,8 @@
 lightstr = "";
 
 				# Read eventual options
-nargin = nargin();
 ninit = nargin;
 
-
 i = 1;
 args = nargin; # nargin is now a function
 while --args,
--- a/main/vrml/inst/vrml_faces.m	Mon Apr 16 09:40:34 2012 +0000
+++ b/main/vrml/inst/vrml_faces.m	Mon Apr 16 09:50:24 2012 +0000
@@ -89,7 +89,6 @@
   opt0 = " smooth convex " ;
 
   verbose = 0 ;
-#  nargin -= 2 ;
 
   i = 1;
   while (nargin -2) >= i
--- a/main/vrml/inst/vrml_group.m	Mon Apr 16 09:40:34 2012 +0000
+++ b/main/vrml/inst/vrml_group.m	Mon Apr 16 09:50:24 2012 +0000
@@ -17,7 +17,6 @@
 
 function v = vrml_group ( varargin )
 
-nargin = nargin();
 if nargin == 0, return end
 
 s = "";
--- a/main/vrml/inst/vrml_lines.m	Mon Apr 16 09:40:34 2012 +0000
+++ b/main/vrml/inst/vrml_lines.m	Mon Apr 16 09:50:24 2012 +0000
@@ -30,7 +30,6 @@
 function s = vrml_lines(x,f,varargin)
 
 if nargin < 2, f = ones (1,columns(x)); end
-args = nargin; # nargin is now a function
 col = [1, 0, 0] ;
 
 opt1 = " col " ;
@@ -38,10 +37,9 @@
 
 verbose = 0 ;
 
-args -= 2 ;
 i=1;
 
-while args>=i ,
+while (nargin -2) >=i ,
 
   tmp = varargin{i++} ;	# pos 2.1.39
   if ! ischar(tmp) ,