mORMot and Open Source friends
Check-in [4e5384f8f7]
Not logged in

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:{4325} fixed GPF in ExistsIniName() when P=nil
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 4e5384f8f7407ef1d1c1c0e276a3240805b5d9ab
User & Date: ab 2018-02-21 11:25:30
Context
2018-02-21
18:25
{4326} new DeduplicateInteger/DeduplicateInt64 functions - and also slighly optimized various overloaded QuickSort() check-in: e690a40036 user: ab tags: trunk
11:25
{4325} fixed GPF in ExistsIniName() when P=nil check-in: 4e5384f8f7 user: ab tags: trunk
11:23
{4324} moved TSynBloomFilter logic to SynTable.pas - with the files, this time! :) check-in: d583e7ae0f user: ab tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to SynCommons.pas.

28783
28784
28785
28786
28787
28788
28789
28790
28791
28792
28793
28794
28795
28796
28797
end;

function ExistsIniName(P: PUTF8Char; UpperName: PAnsiChar): boolean;
var table: PNormTable;
begin
  result := false;
  table := @NormToUpperAnsi7;
  if P^<>'[' then
    repeat
      if P^=' ' then begin
        repeat inc(P) until P^<>' '; // trim left ' '
        if P^=#0 then
          break;
      end;
      if IdemPChar2(P,UpperName,table) then begin






|







28783
28784
28785
28786
28787
28788
28789
28790
28791
28792
28793
28794
28795
28796
28797
end;

function ExistsIniName(P: PUTF8Char; UpperName: PAnsiChar): boolean;
var table: PNormTable;
begin
  result := false;
  table := @NormToUpperAnsi7;
  if (P<>nil) and (P^<>'[') then
    repeat
      if P^=' ' then begin
        repeat inc(P) until P^<>' '; // trim left ' '
        if P^=#0 then
          break;
      end;
      if IdemPChar2(P,UpperName,table) then begin

Changes to SynopseCommit.inc.

1
'1.18.4324'
|
1
'1.18.4325'