[Pharo-project] Integer>>asDateFromZip

June 19, 2012


      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@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@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@482.0) corner: (1487.0@653.0)
		owner: 	a SystemWindow(418381824)
		submorphs: 	an Array(a TransformMorph(142606336))
		fullBounds: 	(857@482) corner: (1487@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@482.0) corner: (1487.0@653.0)
		owner: 	a SystemWindow(418381824)
		submorphs: 	an Array(a TransformMorph(142606336))
		fullBounds: 	(857@482) corner: (1487@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

[Pharo-project] Integer>>asDateFromZip

Sven Van Caekenberghe