Bug report - Gpc

24 Oct 1997


      Hi all,
I have found a bug in the new beta. If you export a function in
one unit, and then in another unit that uses that first unit, you
have the same function (but only in the implementation section),
you get a compiler error. This result;
[----]
two.pas:9: warning: static declaration for `Positive' follows
non-static
two.pas: In function `Positive':
two.pas:10: undeclared identifier `I' (first use this function)
two.pas:10: (Each undeclared identifier is reported only once
two.pas:10: for each function it appears in.)
[----]
is produced by these two units;
unit one;
interface
  function positive(var i:integer):boolean;
implementation
  function positive(var i:integer):boolean;
  begin
    positive := i > 0;
  end;
end.
{//}
unit two;
interface
uses one;
  function negative(var i:integer):boolean;
  function neutral(var i:integer):boolean;
implementation
  function positive(var i:integer):boolean;
  begin
    positive := i > 0;
  end;
function neutral(var i:integer):boolean;
  begin
    neutral := i = 0;
  end;
function negative(var i:integer):boolean;
  begin
    negative := i < 0;
  end;
end.
{////}
Best regards, The Chief
--------
Dr. Abimbola A. Olowofoyeku (The African Chief) 
Email: laa12@keele.ac.uk
Author of: Chief's Installer Pro 4.01 for Win16 and Win32: 
  Winner of PC PLUS Magazine Gold Award (April 1995 U.K. edition)
  http://ourworld.compuserve.com/homepages/African_Chief/
ftp://ftp.demon.co.uk/pub/ibmpc/win3/apps/chief/pro/chief401.zip