[Lost] FPC per lpt verfügbar

[Kevin Wolf <mail@xxxxxxxxxxxxx>]

Hi zusammen,

im "offiziellen" lpt-Repository steht jetzt der FreePascal-Compiler zur 
Verfügung. Ist natürlich noch ungetestet, aber in der Theorie geht es, 
indem folgendes in file:/lpt/config/pkgsrc eingetragen wird:

lpt http://lpt.lost-os.ath.cx/current/

Anschließend "lpt scan" und "lpt get fpc" sollten FPC runterladen und 
installieren. Wenn ihr den Patch im Anhang anwendet, wird der 
Fortschritt beim Entpacken angezeigt - das ist ganz nett, weil das 
Entpacken eine Weile dauert.

Viel Spaß damit.

Index: src/modules/pas/lib/tar/tar.pas
===================================================================
--- src/modules/pas/lib/tar/tar.pas	(Revision 722)
+++ src/modules/pas/lib/tar/tar.pas	(Arbeitskopie)
@@ -116,9 +116,12 @@
 begin
     size := NextSize;
 
+    WriteLn;
+    Write('Entpacke...');
     for i := 1 to size div 512 do begin
         BlockRead(f, buffer, 1);
         BlockWrite(outfile, buffer, 512);
+        Write(#13, i*512, '/', size, ' Bytes entpackt');
     end;
 
     if (size mod 512) > 0 then begin
@@ -126,6 +129,7 @@
         BlockWrite(outfile, buffer, size mod 512);
     end;
 
+    WriteLn;
     ReadNextBlock;
 end;