|
@@ -1489,13 +1489,8 @@ begin
|
|
if NPT^.CanBeTerminal and
|
|
if NPT^.CanBeTerminal and
|
|
assigned(NPT^.SpecialHandler) then
|
|
assigned(NPT^.SpecialHandler) then
|
|
break;
|
|
break;
|
|
- End;
|
|
|
|
- if ch<>#0 then
|
|
|
|
- begin
|
|
|
|
- store[arrayind]:=ch;
|
|
|
|
- inc(arrayind);
|
|
|
|
- end;
|
|
|
|
- if not assigned(NNPT) then
|
|
|
|
|
|
+ End
|
|
|
|
+ else
|
|
begin
|
|
begin
|
|
if ch<>#0 then
|
|
if ch<>#0 then
|
|
begin
|
|
begin
|
|
@@ -1508,6 +1503,11 @@ begin
|
|
end;
|
|
end;
|
|
break;
|
|
break;
|
|
end;
|
|
end;
|
|
|
|
+ if ch<>#0 then
|
|
|
|
+ begin
|
|
|
|
+ store[arrayind]:=ch;
|
|
|
|
+ inc(arrayind);
|
|
|
|
+ end;
|
|
end;
|
|
end;
|
|
if assigned(NPT) and NPT^.CanBeTerminal then
|
|
if assigned(NPT) and NPT^.CanBeTerminal then
|
|
begin
|
|
begin
|