trim trailing line spaces in most source code files

(no functional change)

PasZip.pas

@@ -40,7 +40,7 @@
   Version 1.18
   - enhanced compatibility with new targets and compilers (Win32, Win64,
     Delphi 2009+, FPC)
   - even more refactoring, and fixes 
   - even more refactoring, and fixes

}

@@ -177,7 +177,7 @@ function UpdateCrc32(aCRC32: cardinal; inBuf: pointer; inLen: integer): cardinal

type
  /// generic file information structure, as used in .zip file format
  // - used in any header, contains info about following block 
  // - used in any header, contains info about following block
  TFileInfo = packed record
    neededVersion: word;       // $14
    flags: word;               // 0
@@ -331,7 +331,7 @@   TZipWrite = class
    destructor Destroy; override;
  end;

  

implementation

// special tuned Move() routine, including data overlap bug correction

SQLite3/TestSQL3.dpr

@@ -108,6 +108,7 @@ uses
  SynEcc in '..\SynEcc.pas',
  SynCrtSock in '..\SynCrtSock.pas',
  SynBidirSock in '..\SynBiDirSock.pas',
  //SynOpenSSL,
  SynCommons in '..\SynCommons.pas',
  SynLog in '..\SynLog.pas',
  SynTests in '..\SynTests.pas',
@@ -190,7 +191,31 @@ uses
{$R ..\Vista.res} // includes manifest to identify Windows 10 OS
{$endif}

//
{
procedure test;
var s: RaWUTF8;
    sock: THttpClientSocket;
    i, status: integer;
begin
  sock := THttpClientSocket.Open('synopse.info','',cslTCP,10000,true);
  try
    for i := 1 to 10 do begin
      status := sock.Get('forum/index.php',10000);
      assert(status = 200, Format('status=%d i=%d', [status, i]));
      s := sock.Content;
      assert(s<>'');
    end;
    FileFromString(s, ExeVersion.ProgramFilePath + 'test.html');
  finally
    sock.Free;
  end;
end;

begin
  test;
  exit;
//}begin
  {$ifdef ISDELPHI2007ANDUP}
  {$ifdef DEBUG}
  ReportMemoryLeaksOnShutdown := True;

SQLite3/TestSQL3.lpi

@@ -1,7 +1,7 @@
<?xml version="1.0" encoding="UTF-8"?>
<CONFIG>
  <ProjectOptions>
    <Version Value="10"/>
    <Version Value="11"/>
    <PathDelim Value="\"/>
    <General>
      <Flags>
@@ -24,9 +24,10 @@
      <Version Value="2"/>
    </PublishOptions>
    <RunParams>
      <local>
        <FormatVersion Value="1"/>
      </local>
      <FormatVersion Value="2"/>
      <Modes Count="1">
        <Mode0 Name="default"/>
      </Modes>
    </RunParams>
    <Units Count="51">
      <Unit0>
@@ -86,8 +87,9 @@
        <IsPartOfProject Value="True"/>
      </Unit13>
      <Unit14>
        <Filename Value="..\SynBidirSock.pas"/>
        <Filename Value="..\SynBiDirSock.pas"/>
        <IsPartOfProject Value="True"/>
        <UnitName Value="SynBidirSock"/>
      </Unit14>
      <Unit15>
        <Filename Value="..\SynTests.pas"/>