path: root/Test/og/parallel6.bpl

procedure A();
procedure C() { async call A(); }