Source position: fpsonar.traversal.pp line 50
type TAstRoutine = record
Decl: TPasProcedure;
Block: TPasImplBlock;
end;