Marcel Taeumel uploaded a new version of ToolsTests to project The Trunk:
http://source.squeak.org/trunk/ToolsTests-mt.106.mcz

==================== Summary ====================

Name: ToolsTests-mt.106
Author: mt
Time: 8 December 2021, 6:03:53.981213 pm
UUID: e29e20cc-32b4-f84f-a7e3-839a27889c4d
Ancestors: ToolsTests-ul.105

Complements Tools-mt.1084. Also fixes failing tests for ContextInspector.

=============== Diff against ToolsTests-ul.105 ===============

Item was changed:
  ----- Method: ContextInspectorTest>>createObject (in category 'running') -----
  createObject
  
  	InnerTestObject := super createObject.
  	[[:arg1 :arg2 |
  		| temp1 temp2 |
  		temp1 := arg1 printString size - 1.
  		temp2 := arg2 - 1.
  		temp1 / temp2]
  	value: InnerTestObject value: 1]
  		on: Error do: [:error |
+ 			^ error signalerContext "Integer >> /" sender "SmallInteger >> /" sender "createObject" copy
- 			^ error signalerContext sender copy
  				push: 42;
  				yourself].
  	self error: 'Failed to set up context to inspect'!

Item was changed:
  ----- Method: ContextInspectorTest>>selectInvalidField (in category 'support - error') -----
  selectInvalidField
  
  	self inspector selectFieldSuchThat: [:field |
+ 		field type = #tempVar and: [field value == InnerTestObject]].
+ 	self inspector selectedField ifNil: [self fail: 'Could not select invalid field.'].!
- 		field type = #tempVar and: [field value == InnerTestObject]].!

Item was added:
+ ----- Method: InspectorTest>>testTruncationEllipsisInspectOne (in category 'tests - special') -----
+ testTruncationEllipsisInspectOne
+ 
+ 	(self class includesSelector: #createObjectWithTruncation)
+ 		ifFalse: [^ self "Run this test only if explicitely refined."].
+ 
+ 	self inspector object: self createObjectWithTruncation.
+ 	self inspector selectFieldSuchThat: [:field | field type = #ellipsis].
+ 	
+ 	self
+ 		shouldnt: [self inspector elementAt: self inspector truncationLimit - self inspector truncationTail]
+ 		raise: NotFound.!