Source position: pasresolver.pp line 769
type TIterateScopeElement = procedure(
El: TPasElement;
ElScope: TPasScope;
StartScope: TPasScope;
Data: Pointer;
var Abort: Boolean
) of object;