Forget the cute but tiny Pi 3B+ running at a mere 1.4GHz with a puny 1Gb RAM. Feast your eyes upon the mighty Cavium ThunderX machine from avantek.co.uk
Whilst it is very configurable, a nice basic developer machine with a single 32-core v8 1.6GHz CPU, 32Gb RAM, half-gig SSD, Gb ethernet, FirePro graphics etc is a mere GBP 1850 - call it US$2500. For a comparison that's what ParcPlace paid in 1994 to get me a 70MHz ARM710 workstation with a colossal 4Mb ram.
Or of course you could go for the US18000 dual-32-core 2.2GHz etc version, but that's possibly going a bit over the top. The 384-core server model is definitely a bit much :-) Or is it?
At a fairly wild guess based on benchmark comparisons for other languages, I suspect each core would probably run Squeak about as fast as a ~2.5Hz intel i7. So, somebody wanting a fast 64-bit ARM VM should really consider the possibilities ...
tim
--
tim Rowledge; tim(a)rowledge.org; http://www.rowledge.org/tim
Oxymorons: Advanced BASIC
Marcel Taeumel uploaded a new version of MorphicTests to project The Trunk:
http://source.squeak.org/trunk/MorphicTests-mt.46.mcz
==================== Summary ====================
Name: MorphicTests-mt.46
Author: mt
Time: 6 May 2018, 3:12:17.556836 pm
UUID: da7669ef-c6b9-1e4b-a096-8ecab904367e
Ancestors: MorphicTests-mt.45
Supplement to refactoring in Morphic-mt.1427.
=============== Diff against MorphicTests-mt.45 ===============
Item was added:
+ TestCase subclass: #BorderedMorphTests
+ instanceVariableNames: ''
+ classVariableNames: ''
+ poolDictionaries: ''
+ category: 'MorphicTests-Basic'!
Item was added:
+ ----- Method: BorderedMorphTests>>test01OldInstVarRefs (in category 'tests') -----
+ test01OldInstVarRefs
+ "Only BorderedMorph should reference the (deprecated) borderWidth and borderColor isntance variables."
+
+ self
+ assert: 2
+ equals: (SystemNavigation default allAccessesTo: #borderWidth from: BorderedMorph) size.
+
+ self
+ assert: 2
+ equals: (SystemNavigation default allAccessesTo: #borderColor from: BorderedMorph) size.!
Item was added:
+ ----- Method: BorderedMorphTests>>test02ConvertColorSymbols (in category 'tests') -----
+ test02ConvertColorSymbols
+ "The use of #inset or #raised as border color should result in the use of a new border style."
+
+ | sut |
+ sut := BorderedMorph new.
+ self
+ assert: #simple equals: sut borderStyle style;
+ assert: Color black equals: sut borderStyle color.
+
+ sut borderColor: #raised.
+ self
+ assert: #raised equals: sut borderStyle style;
+ assert: Color black equals: sut borderStyle color.
+
+ "Enable color tracking."
+ sut borderColor: Color transparent.
+ self assert: sut color equals: sut borderStyle color.
+
+ sut borderColor: #inset.
+ self
+ assert: #inset equals: sut borderStyle style;
+ assert: sut color equals: sut borderStyle color.
+ !
Item was added:
+ ----- Method: BorderedMorphTests>>test03ColorTracking (in category 'tests') -----
+ test03ColorTracking
+
+ | sut c1 c2 |
+ sut := BorderedMorph new.
+ self assert: Color black equals: sut borderStyle baseColor.
+
+ sut borderInset.
+ self
+ assert: Color transparent equals: sut borderStyle baseColor;
+ assert: sut borderStyle topLeftColor ~= sut color;
+ assert: sut borderStyle bottomRightColor ~= sut color;
+ assert: sut borderStyle bottomRightColor ~= sut borderStyle topLeftColor.
+
+ c1 := sut borderStyle topLeftColor.
+ c2 := sut borderStyle bottomRightColor.
+ sut color: Color yellow.
+ self
+ assert: Color transparent equals: sut borderStyle baseColor;
+ assert: sut borderStyle topLeftColor ~= c1;
+ assert: sut borderStyle bottomRightColor ~= c2.
+
+ c1 := sut borderStyle topLeftColor.
+ c2 := sut borderStyle bottomRightColor.
+ sut borderStyle: BorderStyle raised.
+ self
+ assert: Color transparent equals: sut borderStyle baseColor;
+ assert: sut borderStyle topLeftColor = c2;
+ assert: sut borderStyle bottomRightColor = c1.!
Marcel Taeumel uploaded a new version of Graphics to project The Trunk:
http://source.squeak.org/trunk/Graphics-mt.398.mcz
==================== Summary ====================
Name: Graphics-mt.398
Author: mt
Time: 6 May 2018, 3:08:37.011836 pm
UUID: 73c0a26a-9209-cb42-90b7-b679bb5b467d
Ancestors: Graphics-mt.397
Supplement to refactoring in Morphic-mt.1427.
=============== Diff against Graphics-mt.397 ===============
Item was added:
+ ----- Method: Form class>>dotOfSize:color: (in category 'examples') -----
+ dotOfSize: diameter color: color
+
+ | form |
+ form := self extent: diameter asPoint depth: Display depth.
+ form getCanvas fillOval: form boundingBox color: color.
+ ^form!