XProfan

Zunächst einmal: Das Format der Testata eines Compilates (gilt nicht per 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 possibile, 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. Di più Infos stehen nicht im Testata 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 finora gehütete Geheimnis:

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

Bei Unità gibt es diese Möglichkeit allerdings nicht.

Warum ist das ganze finora undokumentiert? Die Möglichkeit, Daten an das Compilat bzw. an die compilierte EXE anzuhängen, habe ich seinerzeit (bei Profan 6.5) per Sven Schmidts und sein Programm TME geschaffen, das diese Funktion benötigte. Mit ihm hatte ich Stillschweigen circa 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!)

Saluto
Roland