Optimization: fix empty matrix addition
[scilab.git] / scilab / modules / graphics / macros / fplot2d.sci
index ef8cef5..f7f4723 100644 (file)
@@ -1,10 +1,13 @@
 // Scilab ( http://www.scilab.org/ ) - This file is part of Scilab
 // Copyright (C) INRIA
-// This file must be used under the terms of the CeCILL.
-// This source file is licensed as described in the file COPYING, which
-// you should have received as part of this distribution.  The terms
-// are also available at
-// http://www.cecill.info/licences/Licence_CeCILL_V2.1-en.txt
+// Copyright (C) 2012 - 2016 - Scilab Enterprises
+//
+// This file is hereby licensed under the terms of the GNU GPL v2.0,
+// pursuant to article 5.3.4 of the CeCILL v.2.1.
+// This file was originally licensed under the terms of the CeCILL v2.1,
+// and continues to be available under such terms.
+// For more information, see the COPYING file which you should have received
+// along with this program.
 
 function []=fplot2d(xr,f,style,strf,leg,rect,nax,void)
     // 2D plot of function f : a Scilab function or the name (as a string)
@@ -26,7 +29,7 @@ function []=fplot2d(xr,f,style,strf,leg,rect,nax,void)
     elseif rhs < 2 then
         error(msprintf(gettext("%s: Wrong number of input argument(s): At least %d expected.\n"), "fplot2d", 2));
     end
-    //handling optionnal arguments
+    //handling optional arguments
 
     opts=[]
 
@@ -41,6 +44,11 @@ function []=fplot2d(xr,f,style,strf,leg,rect,nax,void)
     if size(opts,2)<rhs-2 then
         error(msprintf(gettext("%s: Wrong value for input argument: ''%s'', ''%s'', ''%s'', ''%s'', ''%s'', ''%s'', ''%s'' or ''%s'' expected.\n"),"fplot2d","style","strf","leg","rect","nax","logflag","frameflag","axesflag"));
     end
-    execstr("plot2d(xr,feval(xr,f),"+strcat(opts,",")+")")
+
+    if isempty(opts) then
+        plot2d(xr,feval(xr,f))
+    else
+        execstr("plot2d(xr,feval(xr,f),"+strcat(opts,",")+")")
+    end
 
 endfunction