Debugger-Crash

[JWi]

Hallo,
ich habe da eine kleine Merkwürdigkeit:
-----------------------------------------------------------
var FormMain: TFormMain;
implementation
{$R *.lfm}
// const a:array[0..0] of string=('1'); // globales Array
procedure TFormMain.Button1Click(Sender: TObject);
const a:array[0..0] of string=('1'); // lokales Array
begin
button1.Caption:=a[0]; <------------------------ Breakpoint
end;
------------------------------------------------------------
Rechner: RPI5 mit OS64 , Lazarus 4.0 und FPC 3.2.3

Beim Aufruf ohne Debugger funktioniert das Programm normal.
Ebenso wenn das Array sich im globalen Bereich befindet.
Beim Aufruf mit Debugger, stürzt dieser ab, siehe Anhang.

Unter Windows oder einem RPI4 mit OS32 läuft das Programm ebenfalls normal.
Der Workaround mit dem globalen Array kann doch nicht die Lösung sein.

[af0815]

Es ist leider so, das der gute alte GDB nicht unbedingt stabilst mit Pascal arbeitet.
Man kann versuchen die DWARF Variante mit Sets zu verwenden, bzw. auch eine andere GDB Version (älter) hat schon manchmal geholfen.
Dein Target ist nicht unbedingt im Mainstream und deswegen kann es zu sowas kommen. Martin Friebe, meistens im englischen Forum unterwegs, hat sich dem Debuggen angenommen, ich weiß nicht, ob der interne Debugger auf deinem Target läuft. Ev. Wirst du im englischen Forum da mehr Infos zu dem Thema bekommen.

[Zvoni]

und was hat das Problem mit Lazarus-Installation unter Linux zu tun?

Ausserdem: Eine "Const" innerhalb einer (lokalen) Prozedur ist keine Konstante, sondern sowas wie eine statische Variable (Behält letzten Wert beim Verlassen der Prozedur)
Ist die "Const" im globalen Bereich wird es zu einer Konstanten.

Ich glaube der Ansatz ist generell falsch

[JWi]

und was ist der richtige Ansatz ?

[Zvoni]

und was ist der richtige Ansatz ?

Kommt drauf an, was du machen willst.
Soll das "a"-Array wirklich eine Konstante sein, dann muss es in den globalen Bereich (egal ob jetzt unter Interface oder Implementation)

Ich sehe ein Button.Caption:=a[0]

Sieht aus als ob du dynamisch die Beschriftungen von Controls zur Laufzeit ändern willst.
Ist normalerweise ein Fall für Ressource-Strings

[JWi]

Das ist nur ein Beispiel.
Der folgende Code führt zu demselben Crash,
auch wenn der Breakpoint vor der Benutzung des Array liegt.
Ohne Breakpoint in der Proedure gibt es kein Problem

procedure TFormMain.Button1Click(Sender: TObject);
Var a:array[0..0] of string=('1'');
s:string;
begin
s:=''; <------------------- Breakpoint
s:=a[0];
end;