mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-03 09:09:26 +01:00
* changed of do_optdeadstoreelim must be passed by reference as noted by Alexey Torgashin
This commit is contained in:
parent
c5f4fe2882
commit
e67670fa70
@ -31,7 +31,7 @@ unit optdeadstore;
|
||||
uses
|
||||
node;
|
||||
|
||||
function do_optdeadstoreelim(var rootnode : tnode;changed: boolean) : tnode;
|
||||
function do_optdeadstoreelim(var rootnode : tnode;var changed: boolean) : tnode;
|
||||
|
||||
implementation
|
||||
|
||||
@ -106,7 +106,7 @@ unit optdeadstore;
|
||||
end;
|
||||
|
||||
|
||||
function do_optdeadstoreelim(var rootnode: tnode;changed: boolean): tnode;
|
||||
function do_optdeadstoreelim(var rootnode: tnode;var changed: boolean): tnode;
|
||||
begin
|
||||
{$ifdef EXTDEBUG_DEADSTORE}
|
||||
writeln('******************* Tree before deadstore elimination **********************');
|
||||
|
||||
Loading…
Reference in New Issue
Block a user