diff options
Diffstat (limited to 'fhunit.pas')
-rw-r--r-- | fhunit.pas | 10 |
1 files changed, 2 insertions, 8 deletions
@@ -556,10 +556,7 @@ begin exit; end; - if rightStr(von,3)='.gz' then - loadFromGz(von,pt,len) - else - loadFromFile(von,pt,len); + loadFromGeneric(von,pt,len); if pLongint(pt)^ <> 314159265 then begin // magische Zahl nicht gefunden -> Rückfallebene: Text! sl:=tMyStringList.create; @@ -600,10 +597,7 @@ begin pLongint(pt)^:=314159265; // magische Zahl (pLongint(pt)+1)^:=0; // Version werte.dump(pt+2*sizeof(longint)); - if rightStr(nach,3)='.gz' then - saveToGz(nach,pt,i+2*sizeof(longint)) - else - saveToFile(nach,pt,i+2*sizeof(longint)); + saveToGeneric(nach,pt,i+2*sizeof(longint)); freemem(pt); end; end; |