[Vm-dev] VM Maker: Cog-eem.208.mcz
commits at source.squeak.org
commits at source.squeak.org
Sat Sep 27 20:16:17 UTC 2014
Eliot Miranda uploaded a new version of Cog to project VM Maker:
http://source.squeak.org/VMMaker/Cog-eem.208.mcz
==================== Summary ====================
Name: Cog-eem.208
Author: eem
Time: 27 September 2014, 1:16:00.83 pm
UUID: b30c2acd-4b7d-41c1-83c3-f1ac426af8c6
Ancestors: Cog-eem.207
Implement patchAndUploadUnpatchedInTrunk that
provides patched versions of the as-yet-unpatched
packages that are modified for Spur.
=============== Diff against Cog-eem.207 ===============
Item was added:
+ ----- Method: SpurBootstrapMonticelloPackagePatcher>>patchAndUploadUnpatchedInTrunk (in category 'patching') -----
+ patchAndUploadUnpatchedInTrunk
+ "Look for unbranched versions in the default repository that are newer than the
+ latest patched versions there-in. Download and patch them and upload the patched
+ versions."
+ "(SpurBootstrapMonticelloPackagePatcher new
+ from: 'spurpackages'
+ to: 'trunkpackages')
+ patchAndUploadUnpatchedInTrunk"
+ | trunk sourceRepo |
+ sourceDir assureExistence; deleteLocalFiles.
+ destDir assureExistence; deleteLocalFiles.
+ sourceRepo := MCDirectoryRepository directory: sourceDir.
+ (trunk := self trunk) cacheAllFileNamesDuring:
+ [| latestBranches latestUnbranched |
+ latestBranches := self packagesAndPatches keys collect:
+ [:package|
+ (trunk versionNamesForPackageNamed: package name, '.spur') detectMax: [:vn | vn asMCVersionName versionNumber]].
+ latestUnbranched := latestBranches collect: [:verName| (verName copyReplaceAll: '.spur' with: '') asMCVersionName].
+ (trunk possiblyNewerVersionsOfAnyOf: latestUnbranched) do:
+ [:unpatched|
+ sourceRepo storeVersion: (trunk versionNamed: unpatched)].
+ self patchAsNeeded.
+ self uploadFrom: (MCDirectoryRepository directory: destDir) to: trunk]!
More information about the Vm-dev
mailing list