Source position: exec.pas line 1417
procedure ForEachNodeSafe(
List: PList;
NodeProc: TNodeProcedure
);