[FIX] yet another 'nil size' buglet

ohshima at is.titech.ac.jp ohshima at is.titech.ac.jp
Tue May 4 11:22:42 UTC 1999


  StandardFileStream>>name sometimes returns nil.  As long as
I *roughly* checked the (over 400) call sites of #name
method, I found
SystemDictionary>>browseAllObjectReferencesTo:except:ifNone:
is a place where the execution would result in sending #size
to nil object.

  The following is the patch for the method, but making
StandardFileStream>>name return non-nil object could be
another solution.

                                             OHSHIMA Yoshiki
                Dept. of Mathematical and Computing Sciences
                               Tokyo Institute of Technology 

!SystemDictionary methodsFor: 'browsing' stamp: 'yo 5/4/1999 16:37' prior: 21723495!
browseAllObjectReferencesTo: anObject except: objectsToExclude ifNone: aBlock
	"Bring up a list inspector on the objects that point to anObject. If there are none, then evaluate aBlock on anObject.  "

	| aList shortName |
	aList _ Smalltalk pointersTo: anObject except: objectsToExclude.
	aList size > 0 ifFalse: [^ aBlock value: anObject].
	shortName _ anObject name.
	shortName ifNil: [shortName _ ''].
	shortName size > 12 ifTrue: [
		shortName _ (shortName truncateTo: 12), '...'.
	].
	OrderedCollectionInspector openOn: aList withEvalPane: false
		withLabel: 'Objects pointing to ', shortName.
! !





More information about the Squeak-dev mailing list