RegEx, um RPG Fixed Form zu erkennen

[Fuerchau]

Das wird sich auch nicht ändern, da z-B. eine D-Zeile leer sein kann oder nur einen Namen enthält.
Dies könnte auch der Name einer dcl-x sein, der zufällig da steht.

 dcl-s
   DasFeld
   char(10);

In der C-Karte siehts ja nicht anders aus.

     C                       eval      Feld1 = Feld2
                             eval      Feld1 = Feld2;

Herausfinden kann man das nur, wenn man die Zeilen davor und die folgenden berücksichtigt, also eine Kontext-Evaluierung versucht.

Da kannst du mal sehen, welche Leistung ein Compiler macht.

Dein Problem bei Regex ist, dass Regex von variablem Text ausgeht.
Somit musst du Alternativen beschreiben die die Varianten einer D-Karte darstellen.
Oder eben die Karten als DS definieren und die Inhalte auf Fixformat prüfen, also ganz ohne Regex.

[Ranger]

OK, vielen Dank für die Meinung.

Ich hatte mich aktuell mit den einzelnen Prüfungen verzettelt, und habe gehofft, dass das noch etwas eleganter geht. Aber dann bleibt das zunächst so wie es jetzt ist.

[BenderD]

Dies könnte auch der Name einer dcl-x sein, der zufällig da steht.

 dcl-s
   DasFeld
   char(10);

nein, das kann nicht sein, das prüft der Compiler!!! bei c Zeilen ebenso!!! Probiert das doch gefälligst mal aus!!!

[Fuerchau]

Der Compiler kann das natürlich.
Aber mit RegEx zeileinweise kann man nicht erkennen, dass "___DasFeld" keine D-Zeile ist.
Bei den C-Zeilen ähnelt sich das halt nur. Mal mit "C", mal ohne "C" aber mit Semicolon.

[camouflage]

Für was ihr alles wieder Zeit habt ...

Bei den C-Zeilen ähnelt sich das halt nur. Mal mit "C", mal ohne "C" aber mit Semicolon.

Der mit dem Semicolon hinkt, nämlich spätestens dann, wenn die Anweisung über mehrere Zeilen geht, knallt es.

Let it be!

Just my 2cts.

[Fuerchau]

Bisher hatte ich damit noch keine Probleme, ins besonders wenn man komplexe geschachtelte DS'n hat.
Dann mache ich das Semikolon auch schon mal alleine in eine neue Zeile.
Den "eval" kann man im free ja weglassen, den evalr muss man ja explizit angeben.