Goran,

I would love to test your 1.09 code, but I get the following crash in the
3.6 5423, Gamma 1 full, and Gamma 2 full images.
I select the file in the file list and attempt to FileIn the entire file.

------------------------------------

MessageNotUnderstood: UndefinedObject>>methodsFor:stamp:
3 October 2003 1:56:44 pm

VM: Win32 - Squeak3.4 of 1 March 2003 [latest update: #5170]
Image: Squeak3.6gamma [latest update: #5423]

UndefinedObject(Object)>>doesNotUnderstand: #methodsFor:stamp:
      Receiver: nil
      Arguments and temporary variables:
            aMessage:   a Message with selector: #methodsFor:stamp: and
arguments: #('service...etc...
      Receiver's instance variables:
nil
UndefinedObject>>DoIt
      Receiver: nil
      Arguments and temporary variables:

      Receiver's instance variables:
nil
Compiler>>evaluate:in:to:notifying:ifFail:
      Receiver: a Compiler
      Arguments and temporary variables:
            textOrStream:     'SMMcInstaller methodsFor: ''services''
stamp: ''gk 10/1/2003 14:...etc...
            aContext:   nil
            receiver:   nil
            aRequestor:       nil
            failBlock:  [] in Compiler
class>>evaluate:for:notifying:logged:
            methodNode:       DoIt
      ^ SMMcInstaller methodsFor: 'services' stamp: 'gk 10/1/2003
1...etc...
            method:     a CompiledMethod (3742)
            value:      nil
      Receiver's instance variables:
            sourceStream:     a ReadStream
            requestor:  nil
            class:      UndefinedObject
            context:    nil
            parserClass:      Parser
            cacheDoItNode:    true

Compiler class>>evaluate:for:notifying:logged:
      Receiver: Compiler
      Arguments and temporary variables:
            textOrString:     'SMMcInstaller methodsFor: ''services''
stamp: ''gk 10/1/2003 14:...etc...
            anObject:   nil
            aController:      nil
            logFlag:    false
            val:  nil
      Receiver's instance variables:
            superclass:       Object
            methodDict:       a MethodDictionary(#cacheDoItNode:->a
CompiledMethod (4073) #compil...etc...
            format:     142
            instanceVariables:      #('sourceStream' 'requestor' 'class'
'context' 'parserClass'...etc...
            organization:     ('error handling' interactive notify:
notify:at:)
('public access...etc...
            subclasses:       nil
            name:       #Compiler
            classPool:  a Dictionary()
            sharedPools:      nil
            environment:      a SystemDictionary(lots of globals)
            category:   nil


--- The full stack ---
UndefinedObject(Object)>>doesNotUnderstand: #methodsFor:stamp:
UndefinedObject>>DoIt
Compiler>>evaluate:in:to:notifying:ifFail:
Compiler class>>evaluate:for:notifying:logged:
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Compiler class>>evaluate:for:logged:
Compiler class>>evaluate:logged:
[] in StandardFileStream(PositionableStream)>>fileInAnnouncing:
BlockContext>>on:do:
[] in StandardFileStream(PositionableStream)>>fileInAnnouncing:
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:
StandardFileStream(PositionableStream)>>fileInAnnouncing:
StandardFileStream(FileStream)>>fileIn
FileStream class>>fileIn:
SimpleServiceEntry>>performServiceFor:
[] in MenuItemMorph>>invokeWithEvent:
BlockContext>>ensure:
CursorWithMask(Cursor)>>showWhile:
MenuItemMorph>>invokeWithEvent:
MenuItemMorph>>mouseUp:
MenuItemMorph>>handleMouseUp:
MouseButtonEvent>>sentTo:
MenuItemMorph(Morph)>>handleEvent:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
MenuItemMorph(Morph)>>processEvent:using:
MorphicEventDispatcher>>dispatchDefault:with:
MorphicEventDispatcher>>dispatchEvent:with:
MenuMorph(Morph)>>processEvent:using:
MenuMorph(Morph)>>processEvent:
MenuMorph>>handleFocusEvent:
[] in HandMorph>>sendFocusEvent:to:clear:
PasteUpMorph>>becomeActiveDuring:
HandMorph>>sendFocusEvent:to:clear:
HandMorph>>sendEvent:focus:clear:
HandMorph>>sendMouseEvent:
HandMorph>>handleEvent:
HandMorph>>processEvents
[] in WorldState>>doOneCycleNowFor:
Array(SequenceableCollection)>>do:
WorldState>>handsDo:
WorldState>>doOneCycleNowFor:
WorldState>>doOneCycleFor:
PasteUpMorph>>doOneCycle
[] in Project class>>DoIt
[] in BlockContext>>newProcess

-----------------------------------------

Am I having a stupid attack or is something really wrong??
I'm really looking forward to using this!
Thanks in advance,
tap