This procedure is defined in the server but not documented via ad_proc or proc_doc and may be intended as a private interface.
The procedure is defined as:
proc ::nsmcp::usageAdd {statsVar record} {
upvar 1 $statsVar stats
dict incr stats questions
set state [dict get $record state]
dict incr stats $state
set tokens [dict get $record tokens]
foreach key {inputTokens outputTokens totalTokens cachedInputTokens} {
if {[dict exists $tokens $key] && $state ne "unavailable"} {
set bucket [dict get $stats ${state}Tokens]
dict incr bucket $key [dict get $tokens $key]
dict set stats ${state}Tokens $bucket
} else {
set missing [dict get $stats missingCounters]
dict incr missing $key
dict set stats missingCounters $missing
}
}
}
