I got the following walkback when I ran the Monticello tests and wanted
to let you know about it.

I did the following:
- Downloaded Squeak3.7a-5657.zip
- Updated code from the Squeak Public Updates (European Mirror)
- Opened the Package Loader
- Installed Monticello 131 from SqueakMap
- Opened the SUnit Test Runner
- Set the filter to 'MC*'
- Ran the tests: 201 run, 173 passed, 0 failed, 28 errors
- Upgraded all installed packages (because I thought this might help)
- Reran the tests and got the debugger

I found out that the upgrade from PackageInfo 1.30 to 9 was the culprit
for the debugger.
When I did that I got the following message:
	Registry is still used in code of class PackageInfo class.
	Is it okay to move it to Undeclared?
I answered yes.

So it seems to me that the newest SqueakMap registered versions of
Monticello (131) and PackageInfo (9) do not fit together? Or did I
forget something which I should have done?

- Bernhard


21 February 2004 2:22:48 pm

VM: Win32 - a SmalltalkImage
Image: Squeak3.7alpha [latest update: #5707]

MCMockPackageInfo class(Object)>>doesNotUnderstand: #default
	Receiver: MCMockPackageInfo
	Arguments and temporary variables: 
		aMessage: 	default
	Receiver's instance variables: 
		superclass: 	PackageInfo
		methodDict: 	a MethodDictionary(#classNames->a CompiledMethod (632)
#classes->a ...etc...
		format: 	134
		instanceVariables: 	nil
		organization: 	('as yet unclassified' classNames classes
extensionMethods packag...etc...
		subclasses: 	nil
		name: 	#MCMockPackageInfo
		classPool: 	nil
		sharedPools: 	nil
		environment: 	a SystemDictionary(lots of globals)
		category: 	nil

MCSnapshotResource class>>mockPackageName
	Receiver: MCSnapshotResource
	Arguments and temporary variables: 

	Receiver's instance variables: 
		superclass: 	TestResource
		methodDict: 	a MethodDictionary(#definitions->a CompiledMethod (1980)
#setUp->a ...etc...
		format: 	136
		instanceVariables: 	#('snapshot')
		organization: 	('as yet unclassified' definitions setUp snapshot)

		subclasses: 	nil
		name: 	#MCSnapshotResource
		classPool: 	nil
		sharedPools: 	nil
		environment: 	a SystemDictionary(lots of globals)
		category: 	nil
		current: 	nil

MCSnapshotResource class>>mockPackage
	Receiver: MCSnapshotResource
	Arguments and temporary variables: 

	Receiver's instance variables: 
		superclass: 	TestResource
		methodDict: 	a MethodDictionary(#definitions->a CompiledMethod (1980)
#setUp->a ...etc...
		format: 	136
		instanceVariables: 	#('snapshot')
		organization: 	('as yet unclassified' definitions setUp snapshot)

		subclasses: 	nil
		name: 	#MCSnapshotResource
		classPool: 	nil
		sharedPools: 	nil
		environment: 	a SystemDictionary(lots of globals)
		category: 	nil
		current: 	nil

MCSnapshotResource class>>takeSnapshot
	Receiver: MCSnapshotResource
	Arguments and temporary variables: 

	Receiver's instance variables: 
		superclass: 	TestResource
		methodDict: 	a MethodDictionary(#definitions->a CompiledMethod (1980)
#setUp->a ...etc...
		format: 	136
		instanceVariables: 	#('snapshot')
		organization: 	('as yet unclassified' definitions setUp snapshot)

		subclasses: 	nil
		name: 	#MCSnapshotResource
		classPool: 	nil
		sharedPools: 	nil
		environment: 	a SystemDictionary(lots of globals)
		category: 	nil
		current: 	nil


--- The full stack ---
MCMockPackageInfo class(Object)>>doesNotUnderstand: #default
MCSnapshotResource class>>mockPackageName
MCSnapshotResource class>>mockPackage
MCSnapshotResource class>>takeSnapshot
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
MCSnapshotResource>>setUp
MCSnapshotResource(TestResource)>>initialize
MCSnapshotResource class(Behavior)>>new
MCSnapshotResource class(TestResource class)>>current
MCSnapshotResource class(TestResource class)>>isAvailable
[] in TestSuite>>run {[:res | res isAvailable   ifFalse: [^ res
signalInitializationError]]}
Set>>do:
TestSuite>>run
[] in TestRunner>>runSuite: {[result := suite run]}
BlockContext>>ensure:
[] in TestRunner>>runSuite: {[[result := suite run]   ensure: [running
:= nil.    suite removeDependent: ...]}
[] in BlockContext>>newProcess {[self value.  Processor
terminateActive]}