changeset 15808:68919cd4cd45

isa.m: Match docstring variable names and function prototype names. * scripts/general/isa.m: Change input variable to "classname" from "class". Rename variable "class_of_x" to "class_of_obj" to match input names.
author Rik <rik@octave.org>
date Mon, 17 Dec 2012 14:59:41 -0800
parents 37104cd70d0f
children cf3a18843a26
files scripts/general/isa.m
diffstat 1 files changed, 10 insertions(+), 10 deletions(-) [+]
line wrap: on
line diff
--- a/scripts/general/isa.m	Mon Dec 17 13:32:33 2012 -0800
+++ b/scripts/general/isa.m	Mon Dec 17 14:59:41 2012 -0800
@@ -17,10 +17,10 @@
 ## <http://www.gnu.org/licenses/>.
 
 ## -*- texinfo -*-
-## @deftypefn {Function File} {} isa (@var{obj}, @var{class})
-## Return true if @var{obj} is an object from the class @var{class}.
+## @deftypefn {Function File} {} isa (@var{obj}, @var{classname})
+## Return true if @var{obj} is an object from the class @var{classname}.
 ##
-## @var{class} may also be one of the following class categories: 
+## @var{classname} may also be one of the following class categories: 
 ##
 ## @table @asis
 ## @item "float"
@@ -38,23 +38,23 @@
 ## Author: Paul Kienzle <pkienzle@users.sf.net>
 ## Adapted-by: jwe
 
-function retval = isa (obj, cname)
+function retval = isa (obj, classname)
 
   if (nargin != 2)
     print_usage ();
   endif
 
-  if (strcmp (cname, "float"))
+  if (strcmp (classname, "float"))
     retval = isfloat (obj);
-  elseif (strcmp (cname, "integer"))
+  elseif (strcmp (classname, "integer"))
     retval = isinteger (obj);
-  elseif (strcmp (cname, "numeric"))
+  elseif (strcmp (classname, "numeric"))
     retval = isnumeric (obj);
   else
-    class_of_x = class (obj);
-    retval = strcmp (class_of_x, cname);
+    class_of_obj = class (obj);
+    retval = strcmp (class_of_obj, classname);
     if (! retval && isobject (obj))
-      retval = __isa_parent__ (obj, cname);
+      retval = __isa_parent__ (obj, classname);
     endif
   endif