From 25fc10b556f24d9dc21905c64df378d6eedd5489 Mon Sep 17 00:00:00 2001 From: florian Date: Sun, 9 Feb 2014 08:41:51 +0000 Subject: [PATCH] * do not store references to dyn. arrays git-svn-id: trunk@26741 - --- compiler/optcse.pas | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/compiler/optcse.pas b/compiler/optcse.pas index e725ce8acb..3dda3c8384 100644 --- a/compiler/optcse.pas +++ b/compiler/optcse.pas @@ -201,7 +201,7 @@ unit optcse; one instruction on every platform except i8086/i386 so consider in this case loading the address of the data } - (((n.resultdef.typ in [arraydef,recorddef]) or is_object(n.resultdef)) and + (((n.resultdef.typ in [arraydef,recorddef]) or is_object(n.resultdef)) and not(is_dynamic_array(n.resultdef)) and (n.nodetype=loadn) and (tloadnode(n).symtableentry.typ=staticvarsym) )