At Misys we have recently hit some hardcoded space limits in the packager.
This is only software, anything is possible, but it seems much easier to hack those limits.
Unless, of course, you tell us why we shouldn't do it
appOC :=OrderedCollection new.
classSet := Set new.
selectorSet := OrderedCollection new.
appOC := SubApplication currentlyLoaded.
appOC do: [ :app |
classSet addAll: app defined.
app defined do: [ :cls |
addAll: cls selectors;
addAll: cls class selectors;
yourself ] ].
at: #numberOfApps put: appOC size;
at: #numberOfClasses put: classSet size;
at: #numberOfSelectors put: selectorSet size;
Users browsing this forum: Yahoo [Bot] and 1 guest