El 7/3/07 9:21 PM, "Keith Hodges" <[EMAIL PROTECTED]> escribió:

> Dear Edgar,
> 
> I have integrated the SystemEditor, from Monticello2 so that Monticello1
> can use it for true atomic loading.
> 
> Loading Monticello from http://www.squeaksource.com/mc and SystemEditor
> from http://source.wiresong.ca/mc
> 
> Switch the method MCPackageLoader-theChosenLoaderClass to return
> MCPackageLoader2
> 
> In discussions with Colin Putney, the System editor is likely to need
> some debugging. Lukas has volunteered to help me with this.
> 
> So if you are looking for horror stories, you could try it.
> 
> Note this version of mc does not support Traits yet, but then neither
> does the SystemEditor as yet.
> 
> best regards
> 
> Keith


Well , here my first horror story.

To Ralph request, I was cleaning the complete building process for people
just switching from 3.9 final into 3.10 and loading all updates.
Is still not finished .

So I load Monticello-kph.415.mcz and SystemEditor-kph.58.mcz into a fresh
converted Squeak3.10alpha.7069.image and change the method as you said.

I attach the walkback when I hit the updates button of Squeak flap.


Could be worst try Monticello 2 when you have Monticello 415 and we have 311
,one hundred more versions for crashing on first attempt....


And now ?

Edgar





MessageNotUnderstood: MetaclassEditor>>edExpand
4 July 2007 10:30:21 am

VM: Mac OS - a SmalltalkImage
Image: Squeak3.10alpha [latest update: #7069]

SecurityManager state:
Restricted: false
FileAccess: true
SocketAccess: true
Working Dir Discovery:Users:admin:SqueakDevelop:Squeak3.10alpha.7068
Trusted Dir Discovery:Users:admin:SqueakDevelop:Squeak3.10alpha.7068
Untrusted Dir Discovery:Users:admin:Library:Preferences:Squeak:Internet:My 
Squeak

MetaclassEditor(Object)>>doesNotUnderstand: #edExpand
        Receiver: a MetaclassEditor on: ObjectTracer
        Arguments and temporary variables: 
                aMessage:       edExpand
        Receiver's instance variables: 
                superclass:     ClassEditor
                methodDict:     a MethodDictionary()
                format:         154
                editor:         a ClassEditor on: ObjectTracer
                superEditor:    a ClassEditor on: Class
                instVarNames:   nil
                methods:        nil
                organization:   nil

SystemEditor>>edExpandEditors
        Receiver: a SystemEditor
        Arguments and temporary variables: 
                queue:  an OrderedCollection(a MetaclassEditor on: 
PseudoContext a MetaclassEdit...etc...
                editor:         a MetaclassEditor on: ObjectTracer
        Receiver's instance variables: 
                subject:        a SystemDictionary(lots of globals)
                editors:        an IdentityDictionary(size 1872)
                removals:       a Set()
                progressBar:    [] in SystemProgressMorph>>label:min:max: 
{[:barVal |  return := n...etc...

SystemEditor>>commit
        Receiver: a SystemEditor
        Arguments and temporary variables: 
                migration:      nil
                export:         nil
        Receiver's instance variables: 
                subject:        a SystemDictionary(lots of globals)
                editors:        an IdentityDictionary(size 1872)
                removals:       a Set()
                progressBar:    [] in SystemProgressMorph>>label:min:max: 
{[:barVal |  return := n...etc...

[] in SystemEditor>>commitWithProgress {[:bar |  self setProgressBar: bar.  
self commit.  self setProgressBar: nil]}
        Arguments and temporary variables: 
                bar:    [] in SystemProgressMorph>>label:min:max: {[:barVal |  
return := nil.  bar...etc...


--- The full stack ---
MetaclassEditor(Object)>>doesNotUnderstand: #edExpand
SystemEditor>>edExpandEditors
SystemEditor>>commit
[] in SystemEditor>>commitWithProgress {[:bar |  self setProgressBar: bar.  
self commit.  self setProgressBar: nil]}
 - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
ByteString(String)>>displayProgress:at:from:to:during:
SystemEditor>>commitWithProgress
MCPackageLoader2>>basicLoad
[] in MCPackageLoader2>>progressedLoad {[:bar |  self setProgressBar: bar.  
self basicLoad.  self setProgressBar: nil]}
[] in ProgressInitiationException>>defaultMorphicAction {[result := workBlock 
value: progress]}
BlockContext>>ensure:
ProgressInitiationException>>defaultMorphicAction
ProgressInitiationException>>defaultAction
UndefinedObject>>handleSignal:
MethodContext(ContextPart)>>handleSignal:
MethodContext(ContextPart)>>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:
ByteString(String)>>displayProgress:at:from:to:during:
MCPackageLoader2>>progressedLoad
[] in MCPackageLoader2>>protectedLoad {[self progressedLoad]}
BlockContext>>on:do:
[] in MCPackageLoader2>>protectedLoad {[[self progressedLoad]   on: 
InMidstOfFileinNotification   do: [:n | n resum...]}
BlockContext>>ensure:
[] in MCPackageLoader2>>protectedLoad {[[[self progressedLoad]   on: 
InMidstOfFileinNotification   do: [:n | n resu...]}
BlockContext>>on:do:
MCPackageLoader2>>protectedLoad
[] in MCPackageLoader2>>loadWithNameLike: {[self protectedLoad]}
[] in MCPackageLoader2>>useChangeSetNamed:during: {[aBlock value]}
BlockContext>>ensure:
MCPackageLoader2>>useChangeSetNamed:during:
MCPackageLoader2>>useNewChangeSetNamedLike:during:
MCPackageLoader2>>loadWithNameLike:
MCVersionLoader>>loadWithNameLike:
MCVersionLoader>>load
MCVersionLoader class>>loadVersion:
MCVersion>>load
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 MultiByteBinaryOrTextStream(PositionableStream)>>fileInAnnouncing: {[val 
:= (self peekFor: $!)     ifTrue: [(Compiler evaluate: self nextChunk l...]}
BlockContext>>on:do:
[] in MultiByteBinaryOrTextStream(PositionableStream)>>fileInAnnouncing: {[:bar 
|  [self atEnd]   whileFalse: [bar value: self position.    self skipS...]}
...etc...
_______________________________________________
V3dot10 mailing list
[email protected]
http://lists.squeakfoundation.org/mailman/listinfo/v3dot10

Reply via email to