Michael Van Canneyt
michael.vancanneyt at wisa.be
Tue Mar 7 06:48:18 EST 2000
On Tue, 7 Mar 2000, Martin Waldenburg wrote:
> Michael Van Canneyt wrote:
> > I know it, but does it compile with Free Pascal ?
> > Pasdoc does, since it was (at least partially) developed using Free Pascal.
> The Pascal HighLighter of mwEdit is stripped from the lexer
> at DECAM.
> If the Pascal HighLighter compiles, the lexer should do it too.
I had a look at the code.
Have a look at the 'uses' clause:
SysUtils, Windows, Messages, Classes, Controls, mwPasLexTypes, mwPasLex,
To be usable by Free Pascal, this should be reduced to
SysUtils,Classes, mwPasLexTypes, mwPasLex, mwSimplePasParTypes,
Windows, messages, controls and dialogs have no place in a parser.
The same is true for the mwpaslex unit. But I assume you don't need them,
that they are inserted by Delphi by default.
Then, Free Pascal gets stuck on mwpaslextypes :
function ptTokenName(Value: TptTokenKind): string;
result := GetEnumName(TypeInfo(TptTokenKind), Integer(Value));
I assume the typinfo call is something of Delphi 5 ? the call doesn't
exist in Free Pascal.
(Florian: Apparently this should become an internal function of
Free Pascal, since I see no other way of doing this)
There are some more errors; the
construct is not provided. In Free pascal you must write the call again
explicitly, with it's arguments.
(Florian, I don't remember what the problem was with implementing this ? )
So for the moment, using this unit is not possible, but if you are willing
to make some slight changes to accomodate Free Pascal, it should be possible.
More information about the Lazarus