[SOLVED] Stopped compiling without a reason

[CM630]

Happened multiple times - change somewhere, press F9 and some totally unrelated unit is not compiling.
Usually I do “clean up and build”, but this time it does not help.

I have attached the problematic file, though I believe there is nothing wrong with it, it compiled tens of time before it started creatig problems.

The error shown:

Code: Pascal  [Select][+][-]

1. fmultirename.pas(2276,27) Error: function header doesn't match any method of this class "SetFilePropertyResult(LongInt;TFile;TFileProperty;TSetFilePropertyResult);"
2. fmultirename.pas(328,15) Error: Found declaration: SetFilePropertyResult(LongInt;TFile;TFileProperty;TSetFilePropertyResult);

I have more than 1 GB on the dirve where Lazarus is installed, so it should not be caused by insuficient disk space.

[jamie]

using Generics ?

[CM630]

I do not understand your question.

[Thaddy]

If it were generics that would show up as a generics, Jamie...
Anyway, the 7zipped unit is not enough to debug it.
Wild guess, just by reading:
SetFilePropertyResult is private and the signature of TSetFilePropertyResult is different?
And you use it as a parameter....

And TSetFilePropertyResult is not declared in that unit.....

[Martin_fr]

My guess:

"uses" in implementation section. One of the types gets a new definition.

E.g.

Code: Pascal  [Select][+][-]

1. unit foo;
2. interface
3. use Bar; // defines TSome = class;
4. procedure a(b: TSome);
5. implementation
6. uses Bar2; // defines TSome = record
7.  
8. procedure a(b: TSome); // declaration does not match

[CM630]

The morning is wiser than the evening.
I have defined TFileProperty in another form, and SetFilePropertyResult(LongInt;TFile;TFileProperty;TSetFilePropertyResult); decided to prefer the new type, instead of his own.

The form in which I have defined TFileProperty does not see the other TFileProperty.

So it has nothing to do with the usual “Clean up and build”.

Edit: Martin_fr posted while I was typing. His post seems the right guess.