Mercurial > hg > octave-lyh

diff scripts/java/javafields.m @ 15748:54e8c2527a9e

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
style and doc fixes for newly imported Java package .m files * java/cell2mlstr.m, java/errordlg.m, java/helpdlg.m, java/inputdlg.m, java/javaArray.m, java/javaaddpath.m, java/javaclasspath.m, java/javafields.m, java/javamem.m, java/javamethods.m, java/javarmpath.m, java/listdlg.m, java/msgbox.m java/questdlg.m, java/warndlg.m: Style and doc fixes.
author John W. Eaton <jwe@octave.org>
date Fri, 07 Dec 2012 17:21:27 -0500
parents da26f72408a7
children 0f1a143e5002
line wrap: on
line diff
--- a/scripts/java/javafields.m
+++ b/scripts/java/javafields.m
@@ -17,31 +17,30 @@
 ## <http://www.gnu.org/licenses/>.
 
 ## -*- texinfo -*-
-## @deftypefn {Function file} {@var{P} =} javafields (@var{class})
-##
-## Returns the fields of a Java object in the form of a cell 
-## array of strings. If no output variable is
-## given, the result is simply printed on the standard output.
-##
+## @deftypefn {Function file} {@var{p} =} javafields (@var{class})
+## Return the fields of a Java object in the form of a cell 
+## array of strings.  If no output is requested, print the result
+## printed on the standard output.
+## @seealso{javamethods}
 ## @end deftypefn
-## @seealso{javamethods}
 
-function varargout = javafields(classname)
+function retval = javafields (classname)
   
   if (nargin != 1)
-     print_usage ();
+    print_usage ();
   else
-     c_methods = java_invoke ("org.octave.ClassHelper", "getFields",classname);
-     method_list = strsplit (c_methods, ';');
+    c_methods = java_invoke ("org.octave.ClassHelper", "getFields", classname);
+    method_list = strsplit (c_methods, ';');
 
-     switch nargout
-     case 0
-       if (! isempty (method_list))
-         disp(method_list);
-       endif
-     case 1
-       varargout{1} = cellstr (method_list);
-     endswitch
-  endif
+    switch (nargout)
+      case 0
+        if (! isempty (method_list))
+          disp (method_list);
+        endif
+
+      case 1
+        retval = cellstr (method_list);
+   endswitch
+ endif
 
 endfunction