mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-11 06:26:28 +02:00
- unnecessary check in taddrnode.pass_1 removed, fixes bug #4010
git-svn-id: trunk@426 -
This commit is contained in:
parent
03dde52c5b
commit
c4449e9c26
@ -449,13 +449,6 @@ implementation
|
|||||||
if codegenerror then
|
if codegenerror then
|
||||||
exit;
|
exit;
|
||||||
|
|
||||||
{ we should allow loc_mem for @string }
|
|
||||||
if not(left.expectloc in [LOC_CREFERENCE,LOC_REFERENCE]) then
|
|
||||||
begin
|
|
||||||
aktfilepos:=left.fileinfo;
|
|
||||||
CGMessage(parser_e_illegal_expression);
|
|
||||||
end;
|
|
||||||
|
|
||||||
registersint:=left.registersint;
|
registersint:=left.registersint;
|
||||||
registersfpu:=left.registersfpu;
|
registersfpu:=left.registersfpu;
|
||||||
{$ifdef SUPPORT_MMX}
|
{$ifdef SUPPORT_MMX}
|
||||||
|
Loading…
Reference in New Issue
Block a user