FEHLERBERICHTIGUNG

Wa gib e rgere al ein Testhilfe di selbs fehlerhaf ist 
soda ma nich wei o de angezeigt Fehle i Program ode i 
de Testhilf steck !

Di Testhilf TP wa bei Auto scho jahrelan zufriedenstellen 
unte CP/ i Betrie un wurde u Stof f eine Ausat i de 
PC-New z bekommen "gschwind-gschwind i ein MS-DOS-Versio 
umgeschriebe un natrlic auc getestet 

I Beitra "Testhilf f TURBO-Programme i Hef PC-News-1/86 
Seit 64 sin leide doc einig teuflisch Fehle unterlaufen 
welch sic be de praktische Anwendun herausgestell habe un 
nachfolgen korrigier werden I PCC-TG steh i Zukunf di 
korrigiert Versio zu Verfgung.p
I de drittletzte Zeil de nachstehen nochmal angegebene 
Prozedu TPT_ASCI mu e zweima (recht vo : - Zeichen stat 
TPT_PT heien TPT_PT1^ E fehl als zweima da Pointer-Zeiche 
 a End de Variablennamens.

PROCEDURE TPT_ASCII(VAR V; SIZE: BYTE);   (** ASCII AUSGEBEN **)

VAR I: BYTE;
BEGIN TPT_PT1:=PTR(SEG(V),OFS(V));
      FOR I:=1 TO SIZE DO
          BEGIN IF (TPT_PT1^>31) AND (TPT_PT1^<127)
                   THEN TPT_WRITE (0,CHR(TPT_PT1^))
                   ELSE TPT_WRITE (0,'.');
                TPT_PT1:=PTR(SEG(TPT_PT1^),OFS(TPT_PT1^)+1)
          END
END;

Nu zu zweite Fehler de a einige Stelle imme i gleiche 
Weis sei Unwese treibt A etliche Stelle wurd anstell vo 
SEG(variable einfac di Standardfunktio DSEǠ verwendet De 
Auto glaubt dami besonder schla z sein den ursprnglic wa 
alle mi SE geschriebe gewesen D da Testprogram nu ei 
einfache Hauptprogram war wa da Ergebni de nderun auc 
durchau zufriedenstellend I de Praxi stellt sic jedoc he
raus da da TURBO-Syste offensichtlic f jede Unterprogram 
ein neu Datensegment-Basisadress festleg un dahe be Ver
wendun de Testhilf i eine Unterprogram falsch Adresse bere
chne wurden.

Mi de Bitte da Versehe z entschuldigen verabschiede sic 
de zerknirscht Autor

                                        W. Riemer



Die korrigierte Programm-Version finden Sie auf der Diskette TGM-10.
.pa
