[Pharo-project] Integer>>asDateFromZip

Guillermo Polito guillermopolito at gmail.com
Tue Jun 19 08:10:07 EDT 2012


Haha, I did a

(monthIndex max: 1) min: 12

:D

On Tue, Jun 19, 2012 at 1:57 PM, Camillo Bruni <camillobruni at gmail.com>wrote:

> I did a rather stupid hack to make that work...
> basically deactivating all the sanity checks in the zip date parsing :P
>
> On 2012-06-19, at 13:39, Sven Van Caekenberghe wrote:
>
> > Even with the latest build, I still get problems with illegal Zip dates
> when trying to load older MC packages, I thought this was fixed ?
> > Is there some quick patch that I could do to get passed this, as it is
> blocking the loading of code, which is rather fundamental.
> >
> > Thx,
> >
> > Sven
> >
> >
> > 19 June 2012 1:37:18.454 pm
> >
> > VM: Mac OS - intel - 1074 - CoInterpreter
> VMMaker-oscog-EstebanLorenzano.139 uuid:
> 5aa53979-d7d8-4ca3-91fe-cfc3b4109c33 Dec 11 2011,
> StackToRegisterMappingCogit VMMaker-oscog-EstebanLorenzano.139 uuid:
> 5aa53979-d7d8-4ca3-91fe-cfc3b4109c33 Dec 11 2011,
> https://git.gitorious.org/cogvm/blessed.git Commit:
> 364a7f1fab69798c1bdc9575ba15e18ea319585a Date: Sun Dec 11 15:17:52 2011
> -0300 By: Esteban Lorenzano <estebanlm at gmail.com>
> > Image: Pharo2.0a [Latest update: #20134]
> >
> > Array(Object)>>errorSubscriptBounds:
> >       Receiver: #(31 28 31 30 31 30 31 31 30 31 30 31)
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> > #(31 28 31 30 31 30 31 31 30 31 30 31)
> >
> > Array(Object)>>at:
> >       Receiver: #(31 28 31 30 31 30 31 31 30 31 30 31)
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> > #(31 28 31 30 31 30 31 31 30 31 30 31)
> >
> > Month class>>daysInMonth:forYear:
> >       Receiver: Month
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               superclass:     Timespan
> >               methodDict:     a
> MethodDictionary(#asMonth->(Month>>#asMonth "a CompiledMethod(611...etc...
> >               format:         134
> >               layout:         nil
> >               instanceVariables:      nil
> >               organization:   a ClassOrganizer
> >               subclasses:     nil
> >               name:   #Month
> >               classPool:      nil
> >               sharedPools:    an OrderedCollection(ChronologyConstants)
> >               environment:    a SystemDictionary(lots of globals)
> >               category:       #'Kernel-Chronology'
> >               traitComposition:       nil
> >               localSelectors:         nil
> >
> > DateAndTime class>>year:month:day:hour:minute:second:nanoSecond:offset:
> >       Receiver: DateAndTime
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               superclass:     Magnitude
> >               methodDict:     a MethodDictionary(#+->(DateAndTime>>#+ "a
> CompiledMethod(868220928...etc...
> >               format:         138
> >               layout:         nil
> >               instanceVariables:      #('seconds' 'offset' 'jdn' 'nanos')
> >               organization:   a ClassOrganizer
> >               subclasses:     {TimeStamp}
> >               name:   #DateAndTime
> >               classPool:      a Dictionary(#ClockProvider->Time
> #DaysSinceEpoch->2456098 #LastMill...etc...
> >               sharedPools:    an OrderedCollection(ChronologyConstants)
> >               environment:    a SystemDictionary(lots of globals)
> >               category:       #'Kernel-Chronology'
> >               traitComposition:       {}
> >               localSelectors:         nil
> >
> > DateAndTime class>>year:month:day:hour:minute:second:offset:
> >       Receiver: DateAndTime
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               superclass:     Magnitude
> >               methodDict:     a MethodDictionary(#+->(DateAndTime>>#+ "a
> CompiledMethod(868220928...etc...
> >               format:         138
> >               layout:         nil
> >               instanceVariables:      #('seconds' 'offset' 'jdn' 'nanos')
> >               organization:   a ClassOrganizer
> >               subclasses:     {TimeStamp}
> >               name:   #DateAndTime
> >               classPool:      a Dictionary(#ClockProvider->Time
> #DaysSinceEpoch->2456098 #LastMill...etc...
> >               sharedPools:    an OrderedCollection(ChronologyConstants)
> >               environment:    a SystemDictionary(lots of globals)
> >               category:       #'Kernel-Chronology'
> >               traitComposition:       {}
> >               localSelectors:         nil
> >
> > DateAndTime class>>year:month:day:hour:minute:second:
> >       Receiver: DateAndTime
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               superclass:     Magnitude
> >               methodDict:     a MethodDictionary(#+->(DateAndTime>>#+ "a
> CompiledMethod(868220928...etc...
> >               format:         138
> >               layout:         nil
> >               instanceVariables:      #('seconds' 'offset' 'jdn' 'nanos')
> >               organization:   a ClassOrganizer
> >               subclasses:     {TimeStamp}
> >               name:   #DateAndTime
> >               classPool:      a Dictionary(#ClockProvider->Time
> #DaysSinceEpoch->2456098 #LastMill...etc...
> >               sharedPools:    an OrderedCollection(ChronologyConstants)
> >               environment:    a SystemDictionary(lots of globals)
> >               category:       #'Kernel-Chronology'
> >               traitComposition:       {}
> >               localSelectors:         nil
> >
> > DateAndTime class>>year:month:day:hour:minute:
> >       Receiver: DateAndTime
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               superclass:     Magnitude
> >               methodDict:     a MethodDictionary(#+->(DateAndTime>>#+ "a
> CompiledMethod(868220928...etc...
> >               format:         138
> >               layout:         nil
> >               instanceVariables:      #('seconds' 'offset' 'jdn' 'nanos')
> >               organization:   a ClassOrganizer
> >               subclasses:     {TimeStamp}
> >               name:   #DateAndTime
> >               classPool:      a Dictionary(#ClockProvider->Time
> #DaysSinceEpoch->2456098 #LastMill...etc...
> >               sharedPools:    an OrderedCollection(ChronologyConstants)
> >               environment:    a SystemDictionary(lots of globals)
> >               category:       #'Kernel-Chronology'
> >               traitComposition:       {}
> >               localSelectors:         nil
> >
> > DateAndTime class>>year:month:day:
> >       Receiver: DateAndTime
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               superclass:     Magnitude
> >               methodDict:     a MethodDictionary(#+->(DateAndTime>>#+ "a
> CompiledMethod(868220928...etc...
> >               format:         138
> >               layout:         nil
> >               instanceVariables:      #('seconds' 'offset' 'jdn' 'nanos')
> >               organization:   a ClassOrganizer
> >               subclasses:     {TimeStamp}
> >               name:   #DateAndTime
> >               classPool:      a Dictionary(#ClockProvider->Time
> #DaysSinceEpoch->2456098 #LastMill...etc...
> >               sharedPools:    an OrderedCollection(ChronologyConstants)
> >               environment:    a SystemDictionary(lots of globals)
> >               category:       #'Kernel-Chronology'
> >               traitComposition:       {}
> >               localSelectors:         nil
> >
> > Date class>>year:month:day:
> >       Receiver: Date
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               superclass:     Timespan
> >               methodDict:     a
> MethodDictionary(#addDays:->(Date>>#addDays: "a CompiledMethod(28...etc...
> >               format:         134
> >               layout:         nil
> >               instanceVariables:      nil
> >               organization:   a ClassOrganizer
> >               subclasses:     nil
> >               name:   #Date
> >               classPool:      nil
> >               sharedPools:    an OrderedCollection(ChronologyConstants)
> >               environment:    a SystemDictionary(lots of globals)
> >               category:       #'Kernel-Chronology'
> >               traitComposition:       {}
> >               localSelectors:         nil
> >
> > SmallInteger(Integer)>>asDateFromZip
> >       Receiver: 15370
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> > 15370
> >
> > ZipFileMember>>readCentralDirectoryFileHeaderFrom:
> >       Receiver: a ZipFileMember()
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               fileName:       ''
> >               isCorrupt:      false
> >               lastModFileDateTime:    1901-01-01T00:00:00+02:00
> >               fileAttributeFormat:    3
> >               versionMadeBy:  20
> >               versionNeededToExtract:         20
> >               bitFlag:        0
> >               compressionMethod:      8
> >               desiredCompressionMethod:       8
> >               desiredCompressionLevel:        6
> >               internalFileAttributes:         0
> >               externalFileAttributes:         2176188416
> >               cdExtraField:   ''
> >               localExtraField:        ''
> >               fileComment:    ''
> >               crc32:  0
> >               compressedSize:         0
> >               uncompressedSize:       0
> >               writeLocalHeaderRelativeOffset:         nil
> >               readDataRemaining:      nil
> >               externalFileName:
> '/Users/sven/smalltalk/package-cache/Zinc-AWS-SvenVanCaekenbe...etc...
> >               stream:         MultiByteFileStream:
> '/Users/sven/smalltalk/package-cache/Zinc-AWS-Sven...etc...
> >               localHeaderRelativeOffset:      0
> >               dataOffset:     0
> >
> > ZipFileMember>>readFrom:
> >       Receiver: a ZipFileMember()
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               fileName:       ''
> >               isCorrupt:      false
> >               lastModFileDateTime:    1901-01-01T00:00:00+02:00
> >               fileAttributeFormat:    3
> >               versionMadeBy:  20
> >               versionNeededToExtract:         20
> >               bitFlag:        0
> >               compressionMethod:      8
> >               desiredCompressionMethod:       8
> >               desiredCompressionLevel:        6
> >               internalFileAttributes:         0
> >               externalFileAttributes:         2176188416
> >               cdExtraField:   ''
> >               localExtraField:        ''
> >               fileComment:    ''
> >               crc32:  0
> >               compressedSize:         0
> >               uncompressedSize:       0
> >               writeLocalHeaderRelativeOffset:         nil
> >               readDataRemaining:      nil
> >               externalFileName:
> '/Users/sven/smalltalk/package-cache/Zinc-AWS-SvenVanCaekenbe...etc...
> >               stream:         MultiByteFileStream:
> '/Users/sven/smalltalk/package-cache/Zinc-AWS-Sven...etc...
> >               localHeaderRelativeOffset:      0
> >               dataOffset:     0
> >
> > ZipArchive>>readMembersFrom:named:
> >       Receiver: a ZipArchive
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               members:        an OrderedCollection()
> >               centralDirectorySize:   228
> >               centralDirectoryOffsetWRTStartingDiskNumber:    9759
> >               zipFileComment:         #[]
> >               writeCentralDirectoryOffset:    0
> >               writeEOCDOffset:        0
> >
> > ZipArchive>>readFrom:
> >       Receiver: a ZipArchive
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               members:        an OrderedCollection()
> >               centralDirectorySize:   228
> >               centralDirectoryOffsetWRTStartingDiskNumber:    9759
> >               zipFileComment:         #[]
> >               writeCentralDirectoryOffset:    0
> >               writeEOCDOffset:        0
> >
> > MCMczReader>>zip
> >       Receiver: a MCMczReader
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               stream:         MultiByteFileStream:
> '/Users/sven/smalltalk/package-cache/Zinc-AWS-Sven...etc...
> >               package:        nil
> >               info:   nil
> >               definitions:    nil
> >               dependencies:   nil
> >               zip:    a ZipArchive
> >               infoCache:      nil
> >
> > MCMczReader>>parseMember:
> >       Receiver: a MCMczReader
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               stream:         MultiByteFileStream:
> '/Users/sven/smalltalk/package-cache/Zinc-AWS-Sven...etc...
> >               package:        nil
> >               info:   nil
> >               definitions:    nil
> >               dependencies:   nil
> >               zip:    a ZipArchive
> >               infoCache:      nil
> >
> > MCMczReader>>loadPackage
> >       Receiver: a MCMczReader
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               stream:         MultiByteFileStream:
> '/Users/sven/smalltalk/package-cache/Zinc-AWS-Sven...etc...
> >               package:        nil
> >               info:   nil
> >               definitions:    nil
> >               dependencies:   nil
> >               zip:    a ZipArchive
> >               infoCache:      nil
> >
> > MCMczReader(MCVersionReader)>>package
> >       Receiver: a MCMczReader
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               stream:         MultiByteFileStream:
> '/Users/sven/smalltalk/package-cache/Zinc-AWS-Sven...etc...
> >               package:        nil
> >               info:   nil
> >               definitions:    nil
> >               dependencies:   nil
> >               zip:    a ZipArchive
> >               infoCache:      nil
> >
> > MCMczReader(MCVersionReader)>>basicVersion
> >       Receiver: a MCMczReader
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               stream:         MultiByteFileStream:
> '/Users/sven/smalltalk/package-cache/Zinc-AWS-Sven...etc...
> >               package:        nil
> >               info:   nil
> >               definitions:    nil
> >               dependencies:   nil
> >               zip:    a ZipArchive
> >               infoCache:      nil
> >
> > MCMczReader(MCVersionReader)>>version
> >       Receiver: a MCMczReader
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               stream:         MultiByteFileStream:
> '/Users/sven/smalltalk/package-cache/Zinc-AWS-Sven...etc...
> >               package:        nil
> >               info:   nil
> >               definitions:    nil
> >               dependencies:   nil
> >               zip:    a ZipArchive
> >               infoCache:      nil
> >
> > [:r | r version] in MCCacheRepository>>loadVersionFromFileNamed:
> >       Receiver: a MCCacheRepository(/Users/sven/smalltalk/package-cache)
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               creationTemplate:       nil
> >               storeDiffs:     nil
> >               cache:  nil
> >               allFileNames:   nil
> >               cacheFileNames:         nil
> >               directory:      UnixFileDirectory on
> '/Users/sven/smalltalk/package-cache'
> >               packageCaches:  nil
> >               seenFiles:      nil
> >
> > [:s | (MCVersionReader readerClassForFileNamed: aString)
> >               ifNotNil: [:class | aBlock
> >                               value: (class on: s fileName: aString)]]
> in MCCacheRepository(MCFileBasedRepository)>>versionReaderForFileNamed:do:
> >       Receiver: a MCCacheRepository(/Users/sven/smalltalk/package-cache)
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               creationTemplate:       nil
> >               storeDiffs:     nil
> >               cache:  nil
> >               allFileNames:   nil
> >               cacheFileNames:         nil
> >               directory:      UnixFileDirectory on
> '/Users/sven/smalltalk/package-cache'
> >               packageCaches:  nil
> >               seenFiles:      nil
> >
> > MCCacheRepository(MCDirectoryRepository)>>readStreamForFileNamed:do:
> >       Receiver: a MCCacheRepository(/Users/sven/smalltalk/package-cache)
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               creationTemplate:       nil
> >               storeDiffs:     nil
> >               cache:  nil
> >               allFileNames:   nil
> >               cacheFileNames:         nil
> >               directory:      UnixFileDirectory on
> '/Users/sven/smalltalk/package-cache'
> >               packageCaches:  nil
> >               seenFiles:      nil
> >
> > MCCacheRepository(MCFileBasedRepository)>>versionReaderForFileNamed:do:
> >       Receiver: a MCCacheRepository(/Users/sven/smalltalk/package-cache)
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               creationTemplate:       nil
> >               storeDiffs:     nil
> >               cache:  nil
> >               allFileNames:   nil
> >               cacheFileNames:         nil
> >               directory:      UnixFileDirectory on
> '/Users/sven/smalltalk/package-cache'
> >               packageCaches:  nil
> >               seenFiles:      nil
> >
> > MCCacheRepository>>loadVersionFromFileNamed:
> >       Receiver: a MCCacheRepository(/Users/sven/smalltalk/package-cache)
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               creationTemplate:       nil
> >               storeDiffs:     nil
> >               cache:  nil
> >               allFileNames:   nil
> >               cacheFileNames:         nil
> >               directory:      UnixFileDirectory on
> '/Users/sven/smalltalk/package-cache'
> >               packageCaches:  nil
> >               seenFiles:      nil
> >
> > MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed:
> >       Receiver: a MCHttpRepository(http://mc.stfx.eu/ZincHTTPComponents)
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               creationTemplate:       'MCHttpRepository
> >       location: ''http://mc.stfx.eu/ZincHTTPComp...etc...
> >               storeDiffs:     nil
> >               cache:  a
> Dictionary('Zinc-HTTP-SvenVanCaekenberghe.280.mcz'->a
> MCVersion(Zinc-H...etc...
> >               allFileNames:   nil
> >               cacheFileNames:         nil
> >               location:       'http://mc.stfx.eu/ZincHTTPComponents'
> >               user:   ''
> >               password:       ''
> >               readerCache:    nil
> >
> > [self loadVersionFromFileNamed: aString] in
> MCHttpRepository(MCFileBasedRepository)>>versionFromFileNamed:
> >       Receiver: a MCHttpRepository(http://mc.stfx.eu/ZincHTTPComponents)
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               creationTemplate:       'MCHttpRepository
> >       location: ''http://mc.stfx.eu/ZincHTTPComp...etc...
> >               storeDiffs:     nil
> >               cache:  a
> Dictionary('Zinc-HTTP-SvenVanCaekenberghe.280.mcz'->a
> MCVersion(Zinc-H...etc...
> >               allFileNames:   nil
> >               cacheFileNames:         nil
> >               location:       'http://mc.stfx.eu/ZincHTTPComponents'
> >               user:   ''
> >               password:       ''
> >               readerCache:    nil
> >
> > Dictionary>>at:ifAbsent:
> >       Receiver: a Dictionary('Zinc-HTTP-SvenVanCaekenberghe.280.mcz'->a
> MCVersion(Zinc-HTTP-SvenVanCaekenb...etc...
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               tally:  1
> >               array:  an Array(nil nil nil nil
> 'Zinc-HTTP-SvenVanCaekenberghe.280.mcz'->a MCVe...etc...
> >
> > MCHttpRepository(MCFileBasedRepository)>>versionFromFileNamed:
> >       Receiver: a MCHttpRepository(http://mc.stfx.eu/ZincHTTPComponents)
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               creationTemplate:       'MCHttpRepository
> >       location: ''http://mc.stfx.eu/ZincHTTPComp...etc...
> >               storeDiffs:     nil
> >               cache:  a
> Dictionary('Zinc-HTTP-SvenVanCaekenberghe.280.mcz'->a
> MCVersion(Zinc-H...etc...
> >               allFileNames:   nil
> >               cacheFileNames:         nil
> >               location:       'http://mc.stfx.eu/ZincHTTPComponents'
> >               user:   ''
> >               password:       ''
> >               readerCache:    nil
> >
> > [version := repository versionFromFileNamed: selectedVersion] in
> MCFileRepositoryInspector>>version
> >       Receiver: a MCFileRepositoryInspector
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               morph:  a SystemWindow(418381824)
> >               label:  nil
> >               modal:  false
> >               modalValue:     nil
> >               version:        nil
> >               repository:     a MCHttpRepository(
> http://mc.stfx.eu/ZincHTTPComponents)
> >               versions:       #(#('Zinc-Tests' 'SvenVanCaekenberghe' 2
> 'Zinc-Tests-SvenVanCaekenber...etc...
> >               loaded:         a
> Set('System-FileRegistry-StephaneDucasse.17'
> 'System-Clipboard-Stepha...etc...
> >               newer:  a Set('Zinc-Tests' 'Zinc-HTTP')
> >               inherited:      a Set('Network-Url-TonyFleig.46'
> 'EmergencyEvaluator-StephaneDucasse...etc...
> >               packageList:    an Array(a Text for 'Zinc-HTTP' a Text for
> 'Zinc-Patch-HTTPSocket'...etc...
> >               selectedPackage:        'Zinc-AWS'
> >               selectedVersion:
>  'Zinc-AWS-SvenVanCaekenberghe.15.mcz'
> >               order:  5
> >               versionInfo:    nil
> >               pattern:        nil
> >               packagePattern:         nil
> >               versionPattern:         nil
> >
> > BlockClosure>>ensure:
> >       Receiver: [version := repository versionFromFileNamed:
> selectedVersion]
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               outerContext:   MCFileRepositoryInspector>>version
> >               startpc:        46
> >               numArgs:        0
> >
> > CursorWithMask(Cursor)>>showWhile:
> >       Receiver: ((CursorWithMask
> >       extent: (16 at 16)
> >       depth: 1
> >       fromArray: #(
> >               2r0
> >               2r111111111111110000000...etc...
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               bits:   a Bitmap of length 16
> >               width:  16
> >               height:         16
> >               depth:  1
> >               offset:         (-1@ -1)
> >               maskForm:       Form(16x16x1)
> >
> > MCFileRepositoryInspector>>version
> >       Receiver: a MCFileRepositoryInspector
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               morph:  a SystemWindow(418381824)
> >               label:  nil
> >               modal:  false
> >               modalValue:     nil
> >               version:        nil
> >               repository:     a MCHttpRepository(
> http://mc.stfx.eu/ZincHTTPComponents)
> >               versions:       #(#('Zinc-Tests' 'SvenVanCaekenberghe' 2
> 'Zinc-Tests-SvenVanCaekenber...etc...
> >               loaded:         a
> Set('System-FileRegistry-StephaneDucasse.17'
> 'System-Clipboard-Stepha...etc...
> >               newer:  a Set('Zinc-Tests' 'Zinc-HTTP')
> >               inherited:      a Set('Network-Url-TonyFleig.46'
> 'EmergencyEvaluator-StephaneDucasse...etc...
> >               packageList:    an Array(a Text for 'Zinc-HTTP' a Text for
> 'Zinc-Patch-HTTPSocket'...etc...
> >               selectedPackage:        'Zinc-AWS'
> >               selectedVersion:
>  'Zinc-AWS-SvenVanCaekenberghe.15.mcz'
> >               order:  5
> >               versionInfo:    nil
> >               pattern:        nil
> >               packagePattern:         nil
> >               versionPattern:         nil
> >
> > MCFileRepositoryInspector(MCVersionInspector)>>versionSummary
> >       Receiver: a MCFileRepositoryInspector
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               morph:  a SystemWindow(418381824)
> >               label:  nil
> >               modal:  false
> >               modalValue:     nil
> >               version:        nil
> >               repository:     a MCHttpRepository(
> http://mc.stfx.eu/ZincHTTPComponents)
> >               versions:       #(#('Zinc-Tests' 'SvenVanCaekenberghe' 2
> 'Zinc-Tests-SvenVanCaekenber...etc...
> >               loaded:         a
> Set('System-FileRegistry-StephaneDucasse.17'
> 'System-Clipboard-Stepha...etc...
> >               newer:  a Set('Zinc-Tests' 'Zinc-HTTP')
> >               inherited:      a Set('Network-Url-TonyFleig.46'
> 'EmergencyEvaluator-StephaneDucasse...etc...
> >               packageList:    an Array(a Text for 'Zinc-HTTP' a Text for
> 'Zinc-Patch-HTTPSocket'...etc...
> >               selectedPackage:        'Zinc-AWS'
> >               selectedVersion:
>  'Zinc-AWS-SvenVanCaekenberghe.15.mcz'
> >               order:  5
> >               versionInfo:    nil
> >               pattern:        nil
> >               packagePattern:         nil
> >               versionPattern:         nil
> >
> > MCFileRepositoryInspector(MCVersionInspector)>>summary
> >       Receiver: a MCFileRepositoryInspector
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               morph:  a SystemWindow(418381824)
> >               label:  nil
> >               modal:  false
> >               modalValue:     nil
> >               version:        nil
> >               repository:     a MCHttpRepository(
> http://mc.stfx.eu/ZincHTTPComponents)
> >               versions:       #(#('Zinc-Tests' 'SvenVanCaekenberghe' 2
> 'Zinc-Tests-SvenVanCaekenber...etc...
> >               loaded:         a
> Set('System-FileRegistry-StephaneDucasse.17'
> 'System-Clipboard-Stepha...etc...
> >               newer:  a Set('Zinc-Tests' 'Zinc-HTTP')
> >               inherited:      a Set('Network-Url-TonyFleig.46'
> 'EmergencyEvaluator-StephaneDucasse...etc...
> >               packageList:    an Array(a Text for 'Zinc-HTTP' a Text for
> 'Zinc-Patch-HTTPSocket'...etc...
> >               selectedPackage:        'Zinc-AWS'
> >               selectedVersion:
>  'Zinc-AWS-SvenVanCaekenberghe.15.mcz'
> >               order:  5
> >               versionInfo:    nil
> >               pattern:        nil
> >               packagePattern:         nil
> >               versionPattern:         nil
> >
> > PluggableTextMorph>>getText
> >       Receiver: a PluggableTextMorph(489160704)
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               bounds:         (857.0 at 482.0) corner: (1487.0 at 653.0)
> >               owner:  a SystemWindow(418381824)
> >               submorphs:      an Array(a TransformMorph(142606336))
> >               fullBounds:     (857 at 482) corner: (1487 at 653)
> >               color:  Color white
> >               extension:      a MorphExtension (597164032) [locked]
>  [other:  (kmDispatcher -> a K...etc...
> >               borderWidth:    1
> >               borderColor:    (Color r: 0.706 g: 0.706 b: 0.706)
> >               model:  a MCFileRepositoryInspector
> >               open:   false
> >               accessor:       nil
> >               scrollBar:      a ScrollBar(502267904)
> >               scroller:       a TransformMorph(142606336)
> >               retractableScrollBar:   false
> >               scrollBarOnLeft:        false
> >               getMenuSelector:        nil
> >               getMenuTitleSelector:   nil
> >               hasFocus:       false
> >               hScrollBar:     a ScrollBar(323485696)
> >               textMorph:      a TextMorphForEditView(618397696)
> >               getTextSelector:        #summary
> >               setTextSelector:        #summary:
> >               getSelectionSelector:   nil
> >               hasUnacceptedEdits:     false
> >               askBeforeDiscardingEdits:       true
> >               selectionInterval:      (1 to: 0)
> >               hasEditingConflicts:    false
> >               acceptAction:   nil
> >               getColorSelector:       nil
> >               unstyledAcceptText:     nil
> >               styler:         nil
> >               autoAccept:     nil
> >               enabled:        true
> >               getEnabledSelector:     nil
> >               highlights:     an OrderedCollection()
> >               acceptOnFocusChange:    nil
> >               selectionColor:         nil
> >               alwaysAccept:   nil
> >               changedAction:  nil
> >
> > PluggableTextMorph>>update:
> >       Receiver: a PluggableTextMorph(489160704)
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               bounds:         (857.0 at 482.0) corner: (1487.0 at 653.0)
> >               owner:  a SystemWindow(418381824)
> >               submorphs:      an Array(a TransformMorph(142606336))
> >               fullBounds:     (857 at 482) corner: (1487 at 653)
> >               color:  Color white
> >               extension:      a MorphExtension (597164032) [locked]
>  [other:  (kmDispatcher -> a K...etc...
> >               borderWidth:    1
> >               borderColor:    (Color r: 0.706 g: 0.706 b: 0.706)
> >               model:  a MCFileRepositoryInspector
> >               open:   false
> >               accessor:       nil
> >               scrollBar:      a ScrollBar(502267904)
> >               scroller:       a TransformMorph(142606336)
> >               retractableScrollBar:   false
> >               scrollBarOnLeft:        false
> >               getMenuSelector:        nil
> >               getMenuTitleSelector:   nil
> >               hasFocus:       false
> >               hScrollBar:     a ScrollBar(323485696)
> >               textMorph:      a TextMorphForEditView(618397696)
> >               getTextSelector:        #summary
> >               setTextSelector:        #summary:
> >               getSelectionSelector:   nil
> >               hasUnacceptedEdits:     false
> >               askBeforeDiscardingEdits:       true
> >               selectionInterval:      (1 to: 0)
> >               hasEditingConflicts:    false
> >               acceptAction:   nil
> >               getColorSelector:       nil
> >               unstyledAcceptText:     nil
> >               styler:         nil
> >               autoAccept:     nil
> >               enabled:        true
> >               getEnabledSelector:     nil
> >               highlights:     an OrderedCollection()
> >               acceptOnFocusChange:    nil
> >               selectionColor:         nil
> >               alwaysAccept:   nil
> >               changedAction:  nil
> >
> > [:aDependent | aDependent update: aParameter] in
> MCFileRepositoryInspector(Object)>>changed:
> >       Receiver: a MCFileRepositoryInspector
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> >               morph:  a SystemWindow(418381824)
> >               label:  nil
> >               modal:  false
> >               modalValue:     nil
> >               version:        nil
> >               repository:     a MCHttpRepository(
> http://mc.stfx.eu/ZincHTTPComponents)
> >               versions:       #(#('Zinc-Tests' 'SvenVanCaekenberghe' 2
> 'Zinc-Tests-SvenVanCaekenber...etc...
> >               loaded:         a
> Set('System-FileRegistry-StephaneDucasse.17'
> 'System-Clipboard-Stepha...etc...
> >               newer:  a Set('Zinc-Tests' 'Zinc-HTTP')
> >               inherited:      a Set('Network-Url-TonyFleig.46'
> 'EmergencyEvaluator-StephaneDucasse...etc...
> >               packageList:    an Array(a Text for 'Zinc-HTTP' a Text for
> 'Zinc-Patch-HTTPSocket'...etc...
> >               selectedPackage:        'Zinc-AWS'
> >               selectedVersion:
>  'Zinc-AWS-SvenVanCaekenberghe.15.mcz'
> >               order:  5
> >               versionInfo:    nil
> >               pattern:        nil
> >               packagePattern:         nil
> >               versionPattern:         nil
> >
> > DependentsArray>>do:
> >       Receiver: a DependentsArray(a SystemWindow(418381824) a
> PluggableButtonMorph(757071872) a PluggableB...etc...
> >       Arguments and temporary variables:
> > <<error during printing>
> >       Receiver's instance variables:
> > a DependentsArray(a SystemWindow(418381824) a
> PluggableButtonMorph(757071872) a PluggableB...etc...
> >
> >
> > --- The full stack ---
> > Array(Object)>>errorSubscriptBounds:
> > Array(Object)>>at:
> > Month class>>daysInMonth:forYear:
> > DateAndTime class>>year:month:day:hour:minute:second:nanoSecond:offset:
> > DateAndTime class>>year:month:day:hour:minute:second:offset:
> > DateAndTime class>>year:month:day:hour:minute:second:
> > DateAndTime class>>year:month:day:hour:minute:
> > DateAndTime class>>year:month:day:
> > Date class>>year:month:day:
> > SmallInteger(Integer)>>asDateFromZip
> > ZipFileMember>>readCentralDirectoryFileHeaderFrom:
> > ZipFileMember>>readFrom:
> > ZipArchive>>readMembersFrom:named:
> > ZipArchive>>readFrom:
> > MCMczReader>>zip
> > MCMczReader>>parseMember:
> > MCMczReader>>loadPackage
> > MCMczReader(MCVersionReader)>>package
> > MCMczReader(MCVersionReader)>>basicVersion
> > MCMczReader(MCVersionReader)>>version
> > [:r | r version] in MCCacheRepository>>loadVersionFromFileNamed:
> > [:s | (MCVersionReader readerClassForFileNamed: aString)
> >               ifNotNil: [:class | aBlock
> >                               value: (class on: s fileName: aString)]]
> in MCCacheRepository(MCFileBasedRepository)>>versionReaderForFileNamed:do:
> > MCCacheRepository(MCDirectoryRepository)>>readStreamForFileNamed:do:
> > MCCacheRepository(MCFileBasedRepository)>>versionReaderForFileNamed:do:
> > MCCacheRepository>>loadVersionFromFileNamed:
> > MCHttpRepository(MCFileBasedRepository)>>loadVersionFromFileNamed:
> > [self loadVersionFromFileNamed: aString] in
> MCHttpRepository(MCFileBasedRepository)>>versionFromFileNamed:
> > Dictionary>>at:ifAbsent:
> > MCHttpRepository(MCFileBasedRepository)>>versionFromFileNamed:
> > [version := repository versionFromFileNamed: selectedVersion] in
> MCFileRepositoryInspector>>version
> > BlockClosure>>ensure:
> > CursorWithMask(Cursor)>>showWhile:
> > MCFileRepositoryInspector>>version
> > MCFileRepositoryInspector(MCVersionInspector)>>versionSummary
> > MCFileRepositoryInspector(MCVersionInspector)>>summary
> > PluggableTextMorph>>getText
> > PluggableTextMorph>>update:
> > [:aDependent | aDependent update: aParameter] in
> MCFileRepositoryInspector(Object)>>changed:
> > DependentsArray>>do:
> > - - - - - - - - - - - - - - -
> >                       - - - - - - - - - - - - - - - - - -
> > MCFileRepositoryInspector(Object)>>changed:
> > MCFileRepositoryInspector>>versionSelection:
> > PluggableListMorph>>changeModelSelection:
> > PluggableListMorph>>mouseUpOnSingle:
> > PluggableListMorph>>mouseUp:
> > PluggableListMorph(Morph)>>handleMouseUp:
> > MouseButtonEvent>>sentTo:
> > PluggableListMorph(Morph)>>handleEvent:
> > MorphicEventDispatcher>>dispatchDefault:with:
> > MorphicEventDispatcher>>dispatchEvent:with:
> > PluggableListMorph(Morph)>>processEvent:using:
> > PluggableListMorph(Morph)>>processEvent:
> > PluggableListMorph>>handleFocusEvent:
> > [ActiveHand := self.
> >       ActiveEvent := anEvent.
> >       result := focusHolder
> >                               handleFocusEvent: (anEvent
> >                                               transformedBy:
> (focusHolder transformedFrom: self))] in HandMorph>>sendFocusEvent:to:clear:
> > [aBlock value] in PasteUpMorph>>becomeActiveDuring:
> > BlockClosure>>on:do:
> > PasteUpMorph>>becomeActiveDuring:
> > HandMorph>>sendFocusEvent:to:clear:
> > HandMorph>>sendEvent:focus:clear:
> > HandMorph>>sendMouseEvent:
> > HandMorph>>handleEvent:
> > HandMorph>>processEvents
> > [:h |
> > ActiveHand := h.
> >       h processEvents.
> >       ActiveHand := nil] in WorldState>>doOneCycleNowFor:
> > Array(SequenceableCollection)>>do:
> > WorldState>>handsDo:
> > WorldState>>doOneCycleNowFor:
> > WorldState>>doOneCycleFor:
> > PasteUpMorph>>doOneCycle
> > [[World doOneCycle.
> >       Processor yield.
> >       false] whileFalse.
> >       nil] in MorphicUIManager>>spawnNewProcess
> > [self value.
> >       Processor terminateActive] in BlockClosure>>newProcess
> >
> >
>
>
>
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.pharo.org/pipermail/pharo-dev_lists.pharo.org/attachments/20120619/c4872d8b/attachment.html>


More information about the Pharo-dev mailing list