Defined in
- Partial Call Graph (max 5 caller/called nodes):
- Testcases:
-
No testcase defined.
Source code:
variable $token
upvar 0 $token state
set state(memberP) $state(glevel)
while {1} {
switch -- [parselexeme $token] {
LX_ATOM
-
LX_QSTRING {
append state(local) $state(buffer)
}
default {
return -code 7 [format "expecting mailbox in local-part (found %s)" $state(buffer)]
}
}
switch -- [parselexeme $token] {
LX_DOT {
append state(local) $state(buffer)
}
default {
return
}
}
}
XQL Not present:Generic, PostgreSQL, Oracle