Download

• Repository: OBPackageBrowser
• Location: http://www.squeaksource.com/OBPackageBrowser

Current issues

• after loading a new version using MC, it can happen that the cache is not completely valid any more (due heavy dependence on system notifications), refresh using:
  • PackageExtensionOrganizer reinitialize
  • PackageClassOrganizer reinitialize

Performance

Code

 classes := Smalltalk allClasses 
	select: [ :class | 
		('\*kernel\*' match: class category)
		or: [ '\*collection\*' match: class category ]
		or: [ '\*morphic\*' match: class category ] ].

 block := [ classes collect: [ :class | PackageOrganizer default packageOfClass: class ] ].
 ((1 to: 20) collect: [ :i | MessageTally time: block ] ) average asFloat.

 block := [ mcats collect: [ : a | PackageOrganizer default packageOfMethodCategory: a value in: a key ] ].
 mcats := classes gather: [ :class | class organization categories collect: [ :cat | class -> cat] ].
 ((1 to: 10) collect: [ :i | MessageTally time: block ] ) average asFloat

 methods := classes gather: [ :class | class selectors collect: [ : sel | MethodReference class: class selector: sel ] ].
 block := [ methods collect: [ :mref | PackageOrganizer default packageOfMethod: mref ] ].
 ((1 to: 10) collect: [ :i | MessageTally time: block ] ) average asFloat