[Vm-dev] [commit][2895] Saner CogVMMaker image building.
commits at squeakvm.org
commits at squeakvm.org
Thu Apr 17 22:54:22 UTC 2014
Revision: 2895
Author: eliot
Date: 2014-04-17 15:54:20 -0700 (Thu, 17 Apr 2014)
Log Message:
-----------
Saner CogVMMaker image building. buildimage.sh is a fully automated script to
build from Squeak 4.5. There's still some crap:
- I need to cleave FT2Constants from the Freetype package.
- use of hex8 should be eliminated in favour of e.g. VMClass>>hex8:
- perform:with:with:with:with:with: belongs in the base.
Modified Paths:
--------------
branches/Cog/image/Slang Test Workspace.text
branches/Cog/image/VM Simulation Workspace.text
branches/Cog/image/Workspace.text
Added Paths:
-----------
branches/Cog/image/BuildImage.st
branches/Cog/image/FT2Constants.st
branches/Cog/image/Object-performwithwithwithwithwith.st
branches/Cog/image/buildimage.sh
Removed Paths:
-------------
branches/Cog/image/CogTrunk43.changes
branches/Cog/image/CogTrunk43.image
branches/Cog/image/NecessaryImageChangesForCogToWork.1.cs
branches/Cog/image/Parser-initPatternreturn.st
branches/Cog/image/Translated Primitives.st
branches/Cog/image/sanity-check
Property Changed:
----------------
branches/Cog/image/
Property changes on: branches/Cog/image
___________________________________________________________________
Modified: svn:ignore
- prefs
special-dirs
package-cache
SqueakDebug.log
+ CogVMMaker.*
Squeak-4.5-All-in-One.*
SqueakDebug.log
SqueakV41.sources
__MACOSX
crash.dmp
package-cache
prefs
special-dirs
Added: branches/Cog/image/BuildImage.st
===================================================================
--- branches/Cog/image/BuildImage.st (rev 0)
+++ branches/Cog/image/BuildImage.st 2014-04-17 22:54:20 UTC (rev 2895)
@@ -0,0 +1,49 @@
+| loadables load |
+loadables := #( ('http://source.squeak.org/FFI' 1 ('FFI-Pools' 'FFI-Kernel'))
+ ('http://source.squeak.org/VMMaker' 5 ('Balloon-Engine-Pools' 'VMMaker.oscog' 'Cog' 'CogTools'))
+ ('http://ss3.gemstone.com/ss/MethodMassage' 3 ('MethodMassage' 'MethodMassageCompatibility'))
+ ('http://www.squeaksource.com/AioPlugin' 6 ('VMConstruction-Plugins-AioPlugin'))
+ ('http://www.squeaksource.com/Alien' 0 ('Alien'))
+ "('http://www.squeaksource.com/FreeTypePlus' 7 ('FreeType')) can't load this. it is toxic to Squeak 4.5"
+ ('http://www.squeaksource.com/FreetypePlugin' 8 ('Freetype-Plugin'))
+ ('http://www.squeaksource.com/OSProcess' 4 ('OSProcess'))
+ ('http://www.squeaksource.com/OSProcessPlugin' 9 ('VMConstruction-Plugins-OSProcessPlugin.oscog'))
+ ('http://www.squeaksource.com/Speech' 2 ('SharedPool-Speech' ))).
+
+load := (loadables collect:
+ [:tuple|
+ [:path :order :packages| | repository |
+ repository := MCHttpRepository
+ location: path
+ user: 'squeak'
+ password: 'squeak'.
+ MCRepositoryGroup default addRepository: repository.
+ {repository. order. packages}] valueWithArguments: tuple])
+ sort: [:a :b| a second <= b second].
+
+#( 'FT2Constants.st'
+ 'Object-performwithwithwithwithwith.st'
+ 'Integer-hex8.st' ) do:
+ [:fileName| (FileDirectory default fileNamed: fileName) fileIn].
+
+load do:
+ [:tuple|
+ [:repository :order :packages|
+ packages do:
+ [:package| | latestVersion |
+ latestVersion := (repository versionNamesForPackageNamed: package) first.
+ [| version |
+ version := repository versionNamed: latestVersion.
+ version load.
+ version workingCopy repositoryGroup addRepository: repository]
+ on: Warning
+ do: [:ex|
+ (ex messageText beginsWith: 'This package depends on the following classes') ifFalse:
+ [ex pass].
+ ex resume]]
+ ] valueWithArguments: tuple].
+
+#( 'Workspace' 'Slang Test Workspace' 'VM Simulation Workspace' ) do:
+ [:textFileName|
+ (StringHolder new contents: (FileDirectory default fileNamed: textFileName, '.text') contentsOfEntireFile)
+ openLabel: textFileName]
Deleted: branches/Cog/image/CogTrunk43.changes
===================================================================
--- branches/Cog/image/CogTrunk43.changes 2014-04-14 22:32:11 UTC (rev 2894)
+++ branches/Cog/image/CogTrunk43.changes 2014-04-17 22:54:20 UTC (rev 2895)
@@ -1,592972 +0,0 @@
@@ Diff output truncated at 50000 characters. @@
More information about the Vm-dev
mailing list