XProfan

Hallo Pascal,

da es keinen Grund mehr gibt, es nicht zu tun, werde ich ein lange gehütetes Geheimnis lüften!

Zunächst einmal: Das Format der Header eines Compilates (gilt nicht für compilierte Unit) ist relativ einfach: Da steht eben nur am Anfang "RGH-PROFANx", wobei x derzeit ein Zeichen zwischen "2" und "A" ist und dem Runtime-Modul sagt, wie das Compilat zu interpretieren ist. (Dadurch ist es dem Runtime-Modul auch in Version 8.0a noch möglich, Compilate der Version 2.x zu verstehen.) Compilate der Version 8 haben hier entweder eine "9" oder ein "A" stehen, aus dem das Runtimemodul auf die Verschlüsselung "$P+" oder "$P*" schließen kann. Mehr Infos stehen nicht im Header und eine Checksumme gibt es auch nicht.

Das Runtime-Modul liest nun das komplette Compilat ein und geht (im Normalfall) davon aus, daß dieses bis zum Dateiende geht. Kommt nun - etwa durch angehängte Daten - etwas, das nicht als compilierter Code interpretiert werden kann, erfolgt die bekannte Fehlermeldung.

Und jetzt das bislang gehütete Geheimnis:

Wenn als physikalisch letzte Programmzeile der undokumentierte Befehl PROGEND steht, wird das Compilat nur bis zu diesem Befehl eingelesen. Das heißt: Dann können an die PRC-Datei (oder auch an die gelinkte EXE-Datei) angehängt sein, ohne das Runtimemodul zu irritieren. Passend dazu gibt es die Systemvariable %PROGEND, die die Position in der Datei angibt, wo das Compilat aufhört und die Daten beginnen. (Da diese Systemvariable natürlich nur im compilierten Zustand Sinn macht, liefert %PROGEND im Interpreter immer -1 zurück.)

Bei Units gibt es diese Möglichkeit allerdings nicht.

Warum ist das ganze bislang undokumentiert? Die Möglichkeit, Daten an das Compilat bzw. an die compilierte EXE anzuhängen, habe ich seinerzeit (bei Profan 6.5) für Sven Schmidts und sein Programm TME geschaffen, das diese Funktion benötigte. Mit ihm hatte ich Stillschweigen über diese Funktion bewahrt und ich pflege mich nun mal an mein Wort zu halten. Da aber TME seit einigen Jahren nicht mehr weiterentwickelt wurde und inzwischen auf Svens Seite schon lange nicht mehr gelistet ist, glaube ich dieses Schweigen nun brechen zu dürfen. (Sven, bitte nicht schlagen!)

Gruß
Roland