method
vvrbl vi =
if
vi.vaddrof
||
vi.vglob
then
(br :=
true
;
SkipChildren
)
else
DoChildren