Trying to install the package "ODBC for Squeak" with the SqueakMap
Package Loader in a clean 3.9g image end up in a DNU debugger.

26 September 2006 11:26:04 am

VM: Win32 - a SmalltalkImage
Image: Squeak3.9gamma [latest update: #7061]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir C:\Program Files\Squeak 3.9
Trusted Dir C:\Program Files\Squeak 3.9\Lamneth Consulting
Untrusted Dir C:\My Squeak\Lamneth Consulting

UndefinedObject(Object)>>doesNotUnderstand: #methodsFor:stamp:
	Receiver: nil
	Arguments and temporary variables: 
		aMessage: 	methodsFor: 'accessing' stamp: 'dgd 6/2/2002 00:33'
	Receiver's instance variables: 
nil

UndefinedObject>>DoIt
	Receiver: nil
	Arguments and temporary variables: 

	Receiver's instance variables: 
nil

Compiler>>evaluate:in:to:notifying:ifFail:logged:
	Receiver: a Compiler
	Arguments and temporary variables: 
		textOrStream: 	'ExternalStructure methodsFor: ''accessing'' stamp:
''dgd 6/2/200...etc...
		aContext: 	nil
		receiver: 	nil
		aRequestor: 	nil
		failBlock: 	[] in Compiler class>>evaluate:for:notifying:logged: {[^
nil]}
		logFlag: 	false
		methodNode: 	DoIt
	^ ExternalStructure methodsFor: 'accessing' stamp: 'dgd 6/2/2...etc...
		method: 	a CompiledMethod (891)
		value: 	nil
	Receiver's instance variables: 
		sourceStream: 	a ReadStream 'ExternalStructure methodsFor:
''accessing'' stamp: ...etc...
		requestor: 	nil
		class: 	UndefinedObject
		category: 	nil
		context: 	nil
		parserClass: 	Parser

Compiler class>>evaluate:for:notifying:logged:
	Receiver: Compiler
	Arguments and temporary variables: 
		textOrString: 	'ExternalStructure methodsFor: ''accessing'' stamp:
''dgd 6/2/200...etc...
		anObject: 	nil
		aController: 	nil
		logFlag: 	false
	Receiver's instance variables: 
		superclass: 	Object
		methodDict: 	a
MethodDictionary(#compile:in:classified:notifying:ifFail:->a
Comp...etc...
		format: 	142
		instanceVariables: 	#('sourceStream' 'requestor' 'class' 'category'
'context' 'p...etc...
		organization: 	('error handling' notify: notify:at:)
('public access' compile:in...etc...
		subclasses: 	nil
		name: 	#Compiler
		classPool: 	a Dictionary()
		sharedPools: 	nil
		environment: 	a SystemDictionary(lots of globals)
		category: 	#'Compiler-Kernel'
		traitComposition: 	nil
		localSelectors: 	nil


--- The full stack ---
UndefinedObject(Object)>>doesNotUnderstand: #methodsFor:stamp:
UndefinedObject>>DoIt
Compiler>>evaluate:in:to:notifying:ifFail:logged:
Compiler class>>evaluate:for:notifying:logged:
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Compiler class>>evaluate:for:logged:
Compiler class>>evaluate:logged:
[] in MultiByteFileStream(PositionableStream)>>fileInAnnouncing: {[val
:= (self peekFor: $!)     ifTrue: [(Compiler evaluate: self nextChunk
l...]}
BlockContext>>on:do:
[] in MultiByteFileStream(PositionableStream)>>fileInAnnouncing: {[:bar
|  [self atEnd]   whileFalse: [bar value: self position.    self
skipS...]}
[] in ProgressInitiationException>>defaultMorphicAction {[result :=
workBlock value: progress]}
BlockContext>>ensure:
ProgressInitiationException>>defaultMorphicAction
ProgressInitiationException>>defaultAction
UndefinedObject>>handleSignal:
MethodContext(ContextPart)>>handleSignal:
MethodContext(ContextPart)>>handleSignal:
ProgressInitiationException(Exception)>>signal
ProgressInitiationException>>display:at:from:to:during:
ProgressInitiationException class>>display:at:from:to:during:
ByteString(String)>>displayProgressAt:from:to:during:
MultiByteFileStream(PositionableStream)>>fileInAnnouncing:
[] in
SMDefaultInstaller(SMSimpleInstaller)>>fileIntoChangeSetNamed:fromStream
: {[global newChanges: changeSet.  stream fileInAnnouncing: 'Loading ' ,
newNam...]}
BlockContext>>ensure:
SMDefaultInstaller(SMSimpleInstaller)>>fileIntoChangeSetNamed:fromStream
:
SMDefaultInstaller>>fileIn
SMDefaultInstaller>>install
[] in SMLoader>>installPackageRelease: {[(SMInstaller forPackageRelease:
aRelease) install.  myRelease = self instal...]}
BlockContext>>ensure:
CursorWithMask(Cursor)>>showWhile:
[] in SMLoader>>installPackageRelease: {[Cursor wait   showWhile:
[(SMInstaller forPackageRelease: aRelease) install...]}
BlockContext>>on:do:
SMLoader>>installPackageRelease:
SMLoader>>installPackageRelease
SMLoader>>perform:orSendTo:
[] in MenuItemMorph>>invokeWithEvent: {[(selArgCount := selector
numArgs) = 0   ifTrue: [target perform: selector] ...]}
BlockContext>>ensure:
CursorWithMask(Cursor)>>showWhile:
...etc...