29634930850

Committed 18 Jul 2026 06:58AM UTC coverage: 67.614% (-1.9%) from 69.534%

Build # 29634930850

Build Type

Pull #689

github

Committed by

web-flow

Commit Message

Merge ec7959366 into 18749ba7c

Pull Request Pull Request #689: pharo: update versions

Coverage Stats

2712 of 4011 relevant lines covered (67.61%)

0.68 hits per line

Source File
Press 'n' to go to next uncovered line, 'b' for previous

0.0

/repository/SmalltalkCI-Pharo-Core.package/SCIPharoTestRunner.class/instance/stackTraceString.of..st

private
stackTraceString: err of: aTestCase

        ^ String streamContents: [ :str |
                  | context |
                  context := err signalerContext.
                  [
                  context isNil or: [
                          context receiver == aTestCase and: [
                                  (self selectorIn: context) == #runCase ] ] ] whileFalse: [
                          str print: context.
                          (self class isTestMethod: context method) ifTrue: [
                                  | pcRange code |
                                  pcRange := context debuggerMap
                                                     rangeForPC: context pc
                                                     contextIsActiveContext: false.
                                  code := context method sourceCode asString
                                                  copyFrom: pcRange first
                                                  to: pcRange last.
                                  str nextPutAll: ' ...' , code ].
                          str cr.
                          context := context sender ] ]

1	private	×
2	stackTraceString: err of: aTestCase	×
3		×
4	^ String streamContents: [ :str \|	×
5	\| context \|	×
6	context := err signalerContext.	×
7	[	×
8	context isNil or: [	×
9	context receiver == aTestCase and: [	×
10	(self selectorIn: context) == #runCase ] ] ] whileFalse: [	×
11	str print: context.	×
12	(self class isTestMethod: context method) ifTrue: [	×
13	\| pcRange code \|	×
14	pcRange := context debuggerMap	×
15	rangeForPC: context pc	×
16	contextIsActiveContext: false.	×
17	code := context method sourceCode asString	×
18	copyFrom: pcRange first	×
19	to: pcRange last.	×
20	str nextPutAll: ' ...' , code ].	×
21	str cr.	×
22	context := context sender ] ]	×

hpi-swa / smalltalkCI / 29634930850

Source File Press 'n' to go to next uncovered line, 'b' for previous

Source File
Press 'n' to go to next uncovered line, 'b' for previous