|
@@ -3721,7 +3721,8 @@ type
|
|
begin
|
|
begin
|
|
c:=inputpointer^;
|
|
c:=inputpointer^;
|
|
{ eat utf-8 signature? }
|
|
{ eat utf-8 signature? }
|
|
- if (ord(inputpointer^)=$ef) and
|
|
|
|
|
|
+ if (bufsize>2) and
|
|
|
|
+ (ord(inputpointer^)=$ef) and
|
|
(ord((inputpointer+1)^)=$bb) and
|
|
(ord((inputpointer+1)^)=$bb) and
|
|
(ord((inputpointer+2)^)=$bf) then
|
|
(ord((inputpointer+2)^)=$bf) then
|
|
begin
|
|
begin
|