* let def_cgsize() also recognise unicodestrings (avoid calling tdef.size)

git-svn-id: http://svn.freepascal.org/svn/fpc/trunk@15741 3ad0048d-3df7-0310-abae-a5850022a9f2

1 files changed, 1 insertions, 1 deletions

diff --git a/compiler/defutil.pas b/compiler/defutil.pas
index 10bc0228de..c23bbd4341 100644
--- a/compiler/defutil.pas
+++ b/compiler/defutil.pas
@@ -993,7 +993,7 @@ implementation
             end;
           stringdef :
             begin
-              if is_ansistring(def) or is_widestring(def) then
+              if is_ansistring(def) or is_wide_or_unicode_string(def) then
                 result := OS_ADDR
               else
                 result:=int_cgsize(def.size);