Skip to content

Commit

Permalink
Made the debugging statements more usefully located
Browse files Browse the repository at this point in the history
  • Loading branch information
isc-cge committed Jun 24, 2024
1 parent 03b0fa0 commit 19ee5b4
Showing 1 changed file with 3 additions and 2 deletions.
5 changes: 3 additions & 2 deletions cls/TestCoverage/Manager.cls
Original file line number Diff line number Diff line change
Expand Up @@ -193,6 +193,7 @@ Method LogAssert(success, action, description, extra, location)
set $LIST(tProcessIDs, *+1) = $Job
}
set ..ProcessIDs = tProcessIDs
set ^IRIS.TEMPCG($i(^IRIS.TEMPCG)) = tProcessIDs
}
}

Expand Down Expand Up @@ -264,7 +265,7 @@ Method StartCoverageTracking() As %Status [ Private ]
}
ElseIf ($list(tProcessIDs, 1)="Interop")
{
set ^IRIS.TEMPCG($i(^IRIS.TEMPCG)) = "ProcessIDs was still Interop"
// set ^IRIS.TEMPCG($i(^IRIS.TEMPCG)) = "ProcessIDs was still Interop"
// Collect the list of PIDs used by Interoperability processes in the current namespace
// Run unit tests collecting coverage in that specific list of processes (plus the current process)
&sql(select %DLIST(Process) into :tProcessIDs from %SYS.ProcessQuery_SS() where "User" = '_Ensemble')
Expand All @@ -275,7 +276,7 @@ Method StartCoverageTracking() As %Status [ Private ]
set $LIST(tProcessIDs, *+1) = $Job
}
}
set ^IRIS.TEMPCG($i(^IRIS.TEMPCG)) = tProcessIDs
// set ^IRIS.TEMPCG($i(^IRIS.TEMPCG)) = tProcessIDs
Set tMetrics = $ListBuild("RtnLine") _ $Select(..Timing:$ListBuild("Time","TotalTime"),1:"")
$$$ThrowOnError(..Monitor.StartWithScope(tRelevantTargets,tMetrics,tProcessIDs))
}
Expand Down

0 comments on commit 19ee5b4

Please sign in to comment.