[Vm-dev] VM Maker: VMMaker-dtl.370.mcz
commits at source.squeak.org
commits at source.squeak.org
Tue Sep 15 01:53:06 UTC 2015
David T. Lewis uploaded a new version of VMMaker to project VM Maker:
http://source.squeak.org/VMMaker/VMMaker-dtl.370.mcz
==================== Summary ====================
Name: VMMaker-dtl.370
Author: dtl
Time: 14 September 2015, 9:52:35.845 pm
UUID: bdc970fd-9c84-4ece-8746-21060933384a
Ancestors: VMMaker-tfel.369
VMMaker 4.14.2
Nicolai Hess fix for Mantis 0007265: Bug in Matrix2x3Plugin okayIntValue: (also fixed in VMMaker.oscog-eem.1449 for Spur).
BitmapStreamTests pass before and after the change.
Change VMMakerTool layout to work with Squeak 4.6 / 5.0
=============== Diff against VMMaker-tfel.369 ===============
Item was changed:
----- Method: Matrix2x3Plugin>>okayIntValue: (in category 'private') -----
okayIntValue: value
+ ^(value >= -1073741824 asFloat and:[value <= 1073741823 asFloat])
- ^(value >= -1073741824 asFloat and:[m23ResultX <= 1073741823 asFloat])
!
Item was changed:
----- Method: VMMaker class>>versionString (in category 'version testing') -----
versionString
"VMMaker versionString"
+ ^'4.14.2'!
- ^'4.14.1'!
Item was changed:
----- Method: VMMakerTool>>buildCenterRows (in category 'window construction') -----
buildCenterRows
| rows color1 color2 labelWidth longestLabel |
color1 := Color blue veryMuchLighter.
color2 := Color green veryMuchLighter.
longestLabel := 'Path to platforms code:'. "calculate labelWidth for acceptable results on varous images"
labelWidth := (TextMorph new contents: longestLabel translated asText allBold) width *1.13.
rows := Morph new color: Color transparent;
layoutPolicy: TableLayout new;
vResizing: #spaceFill;
+ extent: 550 @ (TextStyle defaultFont height * 16);
- extent: 550 @ (TextStyle defaultFont height * 8);
hResizing: #spaceFill;
listDirection: #topToBottom;
borderStyle: (BorderStyle complexAltRaised width: 2);
wrapDirection: #none;
wrapCentering: #center;
yourself.
rows
addMorphBack: ((self
entryRowWithLabel: 'Interpreter class name:'
labelWidth: labelWidth
balloonText: 'The name of the Interpreter class'
getFieldText: #interpreterClassName
setFieldText: #interpreterClassName:
buttonLabel: nil
buttonAction: nil
buttonBalloonText: nil)
color: color1).
interpreterClassMorph := rows submorphs last submorphs first.
rows
addMorphBack: ((self
entryRowWithLabel: 'Path to platforms code:'
labelWidth: labelWidth
balloonText: 'The directory where the platform source tree is found; can be edited in text field to the right. Default of {working directory}/src is strongly recommended'
getFieldText: #platformsPathText
setFieldText: #platformsPathText:
buttonLabel: 'Find Path'
buttonAction: #findPlatformsPath
buttonBalloonText: 'Choose the directory where you keep the platform specific code from a file dialogue')
color: color2).
platformPathMorph := rows submorphs last submorphs second.
rows
addMorphBack: ((self
entryRowWithLabel: 'Platform name:'
labelWidth: labelWidth
balloonText: 'The platform name (as returned by Smalltalk platformName - unix, Mac OS, RISCOS, win32 etc); can be edited (in text field to the right) to cross generate'
getFieldText: #platformNameText
setFieldText: #platformNameText:
buttonLabel: 'Find platform'
buttonAction: #platformsListMenu
buttonBalloonText: 'Choose from a list of known platforms. The default is this current platform.')
color: color1).
platformNameMorph := rows submorphs last submorphs second.
rows
addMorphBack: ((self
entryRowWithLabel: 'Path to generated sources:'
labelWidth: labelWidth
balloonText: 'The directory where the built sources will be placed; can be edited in text field to the right. The default is strongly recommended; makefile alterations may be needed if you use a different path.'
getFieldText: #sourcePathText
setFieldText: #sourcePathText:
buttonLabel: 'Clean out'
buttonAction: #cleanoutSrcDir
buttonBalloonText: 'Clean out all the files in the target directory, ready for a clean build')
color: color2).
generatedPathMorph := rows submorphs last submorphs second.
^ rows!
More information about the Vm-dev
mailing list