Shane Miller wrote

Wasn't there a program called PASDOC? WHere can I find info on it?

It isn't working right now. For some reason it crashes when attempting to create documentation for some of the LCL code. The author won't be able to work on it for about a month so I am working on debugging the code to find the problem. I am working on using it to document all of the LCL code.

In case you want to look at it yourself here is the URL.

http://www.geocities.com/SiliconValley/Lakes/6686/pasdoc.html

TypeInfo is also part of Delphi 4 system unit.

(Florian: Apparently this should become an internal function of Free Pascal, since I see no other way of doing this)

In Delphi it is as well

We came accross this with porting the editor, it should be no problem to include some ifdefs

Marc

Wasn't there a program called PASDOC? WHere can I find info on it? Shane

http://www.geocities.com/SiliconValley/Lakes/6686/pasdoc.html

Op Mon, 06 Mar 2000, schreef Shane Miller:

I know it, but does it compile with Free Pascal ?
Pasdoc does, since it was (at least partially) developed using Free Pascal.

Michael.

I'll take a the way I just wanted to say that it is nice to have you as a participant on our list. It is an honor to have your input. :-)

Hi!

Take a look at http://decam.home.att.net/
It should be quite easy to build a ducumentor with that stuff.(About one day or less)
It's published under MPL.

Martin

Hi!

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.

Martin

I had a look at the code.

Have a look at the 'uses' clause:

 SysUtils, Windows, Messages, Classes, Controls, mwPasLexTypes, mwPasLex,
  mwSimplePasParTypes, Dialogs;

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;
begin
  result := GetEnumName(TypeInfo(TptTokenKind), Integer(Value));
end;

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

  inherited;

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.

Michael.