From b6d05dba9e0596aa632a6e5db679c6db27e2c54f Mon Sep 17 00:00:00 2001 From: nickysn Date: Wed, 12 Apr 2017 12:17:08 +0000 Subject: [PATCH] * mark the sar/shl/shr/rol/ror_assign nodes as having side effects git-svn-id: trunk@35781 - --- compiler/nutils.pas | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/compiler/nutils.pas b/compiler/nutils.pas index 2e27f5da81..e8b9b9d1c1 100644 --- a/compiler/nutils.pas +++ b/compiler/nutils.pas @@ -1329,7 +1329,8 @@ implementation in_reset_typedfile_name,in_rewrite_typedfile_name,in_settextbuf_file_x, in_inc_x,in_dec_x,in_include_x_y,in_exclude_x_y,in_break,in_continue,in_setlength_x, in_finalize_x,in_new_x,in_dispose_x,in_exit,in_copy_x,in_initialize_x,in_leave,in_cycle, - in_and_assign_x_y,in_or_assign_x_y,in_xor_assign_x_y,in_neg_assign_x,in_not_assign_x]) + in_and_assign_x_y,in_or_assign_x_y,in_xor_assign_x_y,in_sar_assign_x_y,in_shl_assign_x_y, + in_shr_assign_x_y,in_rol_assign_x_y,in_ror_assign_x_y,in_neg_assign_x,in_not_assign_x]) ) then result:=fen_norecurse_true; end;