linux-l: Free Pascal Compiler

[Wolfgang Metze]

Hallo Mario!

Mario Thaten schrieb:

> Hallo,
>
> haben wir jemanden auf der Liste, der sich ein bißchen mit Pascal
> auskennt?

ja ich!


> Ich habe folgendes Problem:
>
> ich bin Borland Pascal-verdorben und freue mich daher besonders
> über den fpk. Ich habe ein Programm geschrieben, welches unter Borland
> Pascal einwandfrei arbeitet. Die bedeutenden Codezeilen sind die
> folgenden:
>
> type tpointer=^tzeile;
>      tzeile=RECORD
>                  inhalt:string[80];
>                  next:tpointer;
>             end;
>
> var zaktuell,zkopf:tpointer;
>
> und ich rufe diesen später auf mit
>
> if zkopf=NIL then zaktuell:=new(tpointer) else
> zaktuell.^next:=new(tpointer)
>
> Und bei new(tpointer) bricht fpk ab mit der Meldung
> "pointer to class expected".

Da hat er Recht. Du mußt bei NEw eine Variable angeben und keine Klasse, also
new(zaktuell). So ist auch der Standard, Borland hat da nur eine Erweiterung
eingebaut.

Gruß

Wolfgang