hi

given:

program bug;

procedure foo; begin end;

begin foo( 1 ); writeln("OK"); end.

gives these compile errors:

bug.pas: In main program: bug.pas:8: error: too many (>1) arguments to routine `foo' bug.pas:3: error: routine declaration bug.pas:8: error: too few (1) arguments to function `foo'

russ