Turn on delphi mode for the package and/or add {$mode delphi} everywhere.
(big chance that you have to change the @'s back).

I just did this, turn on Delphi mode on every single unit. To make sure the class is compiled correctly, though I'd change them later to FPC_OBJFPC mode for better and cleaner syntax. But I'll do it later, after this convertion is done and the code run as expected (within Delphi mode).

Without it, it is possible that you now have shortstrings in a lot of
places.

I also did this, turn on LongString mode on every single unit.

And, unfortunately... I stuck at janSQL unit (main unit of TjanSQL class) at the class constructor method. It's at FEParser.onGetVariable assignment, for precise. Now, FPC can't compile it because of this. Here is the code of the class' constructor:

---
constructor TjanSQL.create;
begin
  DecimalSeparator:='.';
  FQueries:=TList.create;
  gen:=TStringList.create;
  FSQL:=TStringList.create;
  FNameSpace:=TmwStringHashList.create
              (tinyhash,HashSecondaryOne,HashCompare);
  FEParser:=TjanSQLExpression2.create;

  FEParser.onGetVariable:=getvariable; // <- here the compiler stucked!

  FrecordSets:=TjanRecordSetList.Create;
end;
---

The error message is "Incompatible type for arg no.1: Got...". If I changed the line into this

FEParser.onGetVariable:[EMAIL PROTECTED];

still FPC failed to compile. And the error message is "Variable identifier expected". Now... it can't be compiled at all. :(

I think it's because the "type incompatibility" between the getvariable() procedure in TjanSQL class and TSubExpressionEvent type in janSQLTOkenizer unit, though they both are perfectly equal. I wonder why FPC considered them incompatible. I don't know how to fix this, yet. I'll search more informations on the FPC documentation.

I'll still working on this and hope it'll be solved today because I have to do something else at the next day. Any helps will be very much appreciated. Thank you.

Regards,

-Bee-

has Bee.ography at
http://beeography.wordpress.com
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
http://lists.freepascal.org/mailman/listinfo/fpc-pascal

Reply via email to