Defined in
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
-
No testcase defined.
Source code:
global errorCode errorInfo
variable mime
set token [namespace current]::[incr mime(uid)]
variable $token
upvar 0 $token state
set code [catch {mime::parseaddressaux $token $string} result]
set ecode $errorCode
set einfo $errorInfo
foreach name [array names state] {
unset state($name)
}
catch {unset $token}
return -code $code -errorinfo $einfo -errorcode $ecode $result
XQL Not present:Generic, PostgreSQL, Oracle