always return a collection from #functions and #classes
authorClaus Gittinger <cg@exept.de>
Tue, 14 Sep 1999 09:01:15 +0200
changeset 963 efa3aeb6859c
parent 962 f719d1ae79f3
child 964 5fa44b4ff2cb
always return a collection from #functions and #classes
ObjectFileHandle.st
--- a/ObjectFileHandle.st	Mon Sep 13 16:19:04 1999 +0200
+++ b/ObjectFileHandle.st	Tue Sep 14 09:01:15 1999 +0200
@@ -55,7 +55,7 @@
 classes
     "return the classes"
 
-    weakClassRefs isNil ifTrue:[^nil].
+    weakClassRefs isNil ifTrue:[^ #()].
     ^ weakClassRefs asArray 
 
     "Created: 14.9.1995 / 21:13:13 / claus"
@@ -74,7 +74,7 @@
 functions
     "return the functions which were already extracted from the module."
 
-    weakFunctionRefs isNil ifTrue:[^nil].
+    weakFunctionRefs isNil ifTrue:[^ #()].
     ^ weakFunctionRefs asArray select:[:f | f notNil and:[f ~~ 0]]
 
     "Created: 12.7.1996 / 15:33:09 / cg"
@@ -362,5 +362,5 @@
 !ObjectFileHandle class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/ObjectFileHandle.st,v 1.22 1997-01-30 20:00:59 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/ObjectFileHandle.st,v 1.23 1999-09-14 07:01:15 cg Exp $'
 ! !