Marcel Taeumel uploaded a new version of System to project The Trunk:
http://source.squeak.org/trunk/System-mt.1158.mcz
==================== Summary ====================
Name: System-mt.1158
Author: mt
Time: 17 May 2020, 11:57:20.815517 am
UUID: 0e8657fb-96fb-fb4d-8bd2-41f093b385e4
Ancestors: System-nice.1157
Complements Graphics-mt.432
=============== Diff against System-nice.1157 ===============
Item was changed:
----- Method: Project class>>shutDown: (in category 'snapshots') -----
shutDown: quitting
+ Project current shrinkDisplay.
+
quitting ifTrue: [
Project current world triggerEvent: #aboutToLeaveWorld].!
Item was added:
+ ----- Method: Project>>shrinkDisplay (in category 'displaying') -----
+ shrinkDisplay
+
+ Display shrink.!
Marcel Taeumel uploaded a new version of ToolsTests to project The Trunk:
http://source.squeak.org/trunk/ToolsTests-mt.96.mcz
==================== Summary ====================
Name: ToolsTests-mt.96
Author: mt
Time: 15 May 2020, 10:17:11.552447 am
UUID: 60cf49eb-5d79-5244-8b92-930d37256988
Ancestors: ToolsTests-mt.95
Fixes tests for CompiledCodeInspector.
Hmm... Maybe #compiledCode would be a better accessor for BlockClosure? Comparing with #sourceCode?
=============== Diff against ToolsTests-mt.95 ===============
Item was changed:
----- Method: CompiledCodeInspectorTest>>createObject (in category 'running') -----
createObject
"Note that we cannot return the block directly but require the indirection of #evaluate: because the resulting block will be modified during the tests. A block directly embedded in this #createObject method, however, would be re-used across test runs."
InnerTestObject := super createObject.
^ Compiler new
+ evaluate: '[String withAll: #[67 97 114 112 101] "Carpe", #Squeak, InnerTestObject printString] method'
- evaluate: '[String withAll: #[67 97 114 112 101] "Carpe", #Squeak, InnerTestObject printString] compiledBlock'
in: nil
to: self "Required for access to InnerTestObject"!
Eliot Miranda uploaded a new version of Kernel to project The Trunk:
http://source.squeak.org/trunk/Kernel-eem.1329.mcz
==================== Summary ====================
Name: Kernel-eem.1329
Author: eem
Time: 14 May 2020, 1:49:30.722858 pm
UUID: 9510b93b-82ea-47e0-897f-a62f29cfd349
Ancestors: Kernel-nice.1328
Better document InstructionPrinter>>callPrimitive:
=============== Diff against Kernel-nice.1328 ===============
Item was changed:
----- Method: InstructionPrinter>>callPrimitive: (in category 'instruction decoding') -----
callPrimitive: index
+ "Print the callPrimitive bytecode. This is the m = 0 case in SistaV1: ** 248, and V3/Spur 139 below.
- "Print the callPrimitive bytecode."
+ SistaV1: ** 248 (2) 11111000 iiiiiiii mssjjjjj Call Primitive #iiiiiiii + (jjjjj * 256)
+ m=1 means inlined primitive, no hard return after execution.
+ ss defines the unsafe operation set used to encode the operations.
+ (ss = 0 means sista unsafe operations, ss = 01 means lowcode operations, other numbers are as yet used)
+ V3/Spur: 139 10001011 i i i i i i i i jjjjjjjj Call Primitive #iiiiiiii + (jjjjjjjj * 256)"
+
self print: 'callPrimitive: ' , index printString!
Eliot Miranda uploaded a new version of Compiler to project The Trunk:
http://source.squeak.org/trunk/Compiler-eem.433.mcz
==================== Summary ====================
Name: Compiler-eem.433
Author: eem
Time: 14 May 2020, 1:48:32.974358 pm
UUID: b3cd02a1-011c-4dee-83e5-8fcaa5860843
Ancestors: Compiler-nice.432
Better document SistaV1 bytecode 248
=============== Diff against Compiler-nice.432 ===============
Item was changed:
BytecodeEncoder subclass: #EncoderForSistaV1
(excessive size, no diff calculated)
tim Rowledge uploaded a new version of Nebraska to project The Trunk:
http://source.squeak.org/trunk/Nebraska-tpr.57.mcz
==================== Summary ====================
Name: Nebraska-tpr.57
Author: tpr
Time: 10 May 2020, 6:23:13.835738 pm
UUID: 52d8a16e-0096-4d51-a380-0fe4b0732434
Ancestors: Nebraska-mt.56
Correct a case of assigning to a block arg
=============== Diff against Nebraska-mt.56 ===============
Item was changed:
----- Method: NebraskaSenderMorph>>hideField: (in category 'as yet unclassified') -----
hideField: aFieldName
+ fields at: aFieldName ifPresent: [:f| |m |
+ m := f.
- fields at: aFieldName ifPresent: [:m |
[m owner notNil and: [m owner submorphs size =1]]
whileTrue: [m := m owner].
m delete]!