Source position: pastree.pp line 123
type TPasMemberVisibilities = set of (
visDefault,
visPrivate,
visProtected,
visPublic,
visPublished,
visAutomated,
visStrictPrivate,
visStrictProtected,
visRequired,
visOptional
);