Method.st
branchjv
changeset 18105 3a3a3e0ac47f
parent 18098 2bbfe6952a44
parent 15787 7ea8bff49835
child 18120 e3a375d5f6a8
--- a/Method.st	Sat Oct 26 11:22:22 2013 +0100
+++ b/Method.st	Mon Nov 04 11:11:22 2013 -0300
@@ -2793,9 +2793,9 @@
 methodArgAndVarNames
     "return a collection with the methods argument and variable names.
      Uses Parser to parse methods source and extract the names.
-     Returns nil if the source is not available, or some other
-     syntax/parse error occurred. For methods with no args and no vars,
-     an empty collection is returned."
+     Returns an empty collection if the source is not available, or some other
+     syntax/parse error occurred. 
+     For methods with no args and no vars, an empty collection is returned."
 
     |parserClass parser sourceString argNames varNames|
 
@@ -2810,7 +2810,7 @@
         varNames isNil ifTrue:[^ argNames].
         ^ (argNames , varNames)
     ].
-    ^ nil
+    ^ #()
 
     "
      (Method compiledMethodAt:#printOn:) methodArgAndVarNames
@@ -3854,11 +3854,11 @@
 !Method class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.425 2013-09-24 21:36:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.426 2013-10-18 20:57:03 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.425 2013-09-24 21:36:13 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Method.st,v 1.426 2013-10-18 20:57:03 cg Exp $'
 !
 
 version_HG