here is it. I've just typed :
$ squeak -memory 40m Squeak3.7gamma1.image &

and Squeak print me this error message. So, sorry Goran, the issue is
not gone !

3 September 2004 7:08:40 am

VM: unix - a SmalltalkImage
Image: Squeak3.7gamma [latest update: #5985]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir /home/quetzalcoatl/squeak-3.7
Trusted Dir /home/quetzalcoatl/squeak-3.7/secure
Untrusted Dir /home/quetzalcoatl/squeak-3.7/untrusted

Array(Object)>>error:
	Receiver: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary
#xBinary #xBinary #xDelimiter #xDe...etc...
	Arguments and temporary variables: 
		aString: 	'subscript is out of bounds: 0'
	Receiver's instance variables: 
#(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary
#xBinary #xDelimiter #xDe...etc...

Array(Object)>>errorSubscriptBounds:
	Receiver: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary
#xBinary #xBinary #xDelimiter #xDe...etc...
	Arguments and temporary variables: 
		index: 	0
	Receiver's instance variables: 
#(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary
#xBinary #xDelimiter #xDe...etc...

Array(Object)>>at:
	Receiver: #(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary
#xBinary #xBinary #xDelimiter #xDe...etc...
	Arguments and temporary variables: 
		index: 	0
	Receiver's instance variables: 
#(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary #xBinary
#xBinary #xDelimiter #xDe...etc...

Parser(Scanner)>>xBinary
	Receiver: a Parser
	Arguments and temporary variables: 

	Receiver's instance variables: 
		source: 	a ReadStream
'f  @   Th   íº€»
<                                 ...etc...
		mark: 	2
		hereChar: 	$ 
		aheadChar: 	$ 
		token: 	#
		tokenType: 	#binary
		currentComment: 	nil
		buffer: 	a WriteStream 'f'
		typeTable: 	#(#xBinary #xBinary #xBinary #xBinary #xBinary #xBinary
#xBinary #xB...etc...
		here: 	'f'
		hereType: 	#word
		hereMark: 	1
		hereEnd: 	1
		prevMark: 	1
		prevEnd: 	nil
		encoder: 	nil
		requestor: 	nil
		parseNode: 	nil
		failBlock: 	[] in
Parser>>parse:class:noPattern:context:notifying:ifFail: {[^ aB...etc...
		requestorOffset: 	0
		tempsMark: 	nil
		doitFlag: 	nil


--- The full stack ---
Array(Object)>>error:
Array(Object)>>errorSubscriptBounds:
Array(Object)>>at:
Parser(Scanner)>>xBinary
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Parser(Scanner)>>scanToken
Parser>>advance
Parser>>init:notifying:failBlock:
Parser>>parse:class:noPattern:context:notifying:ifFail:
Compiler>>translate:noPattern:ifFail:
Compiler>>evaluate:in:to:notifying:ifFail:logged:
Compiler class>>evaluate:for:notifying:logged:
Compiler class>>evaluate:for:logged:
Compiler class>>evaluate:logged:
[] in RWBinaryOrTextStream(PositionableStream)>>fileInAnnouncing: {[val
:= (self peekFor: $!)     ifTrue: [(Compiler evaluate: self nextChunk
l...]}
BlockContext>>on:do:
[] in RWBinaryOrTextStream(PositionableStream)>>fileInAnnouncing: {[:bar
|  [self atEnd]   whileFalse: [bar value: self position.    self
skipS...]}
ProgressInitiationException>>defaultAction
UndefinedObject>>handleSignal:
ProgressInitiationException(Exception)>>signal
ProgressInitiationException>>display:at:from:to:during:
ProgressInitiationException class>>display:at:from:to:during:
String>>displayProgressAt:from:to:during:
RWBinaryOrTextStream(PositionableStream)>>fileInAnnouncing:
RWBinaryOrTextStream(PositionableStream)>>fileIn
CodeLoader>>installSourceFile:
[] in CodeLoader>>installSourceFiles {[:req | self installSourceFile:
req contentStream]}
Array(SequenceableCollection)>>do:
CodeLoader>>installSourceFiles
ProjectLauncher>>startUpAfterLogin
ProjectLauncher>>startUp
[] in AutoStart class>>startUp: {[launcher startUp]}
WorldState>>runStepMethodsIn:
PasteUpMorph>>runStepMethods
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
PasteUpMorph>>doOneCycle
[] in Project class>>spawnNewProcess {[[World doOneCycle.  Processor
yield.  false] whileFalse.  nil]}
[] in BlockContext>>newProcess {[self value.  Processor
terminateActive]}