Browse Source

* addstringdef() now correctly declares the debug information for a Windows WideString, so use that instead of treating it merely like a PWideChar

git-svn-id: trunk@42039 -
svenbarth 6 years ago
parent
commit
faaa9f94fa
1 changed files with 1 additions and 9 deletions
  1. 1 9
      compiler/dbgdwarf.pas

+ 1 - 9
compiler/dbgdwarf.pas

@@ -4350,15 +4350,7 @@ implementation
            end;
          st_widestring:
            begin
-             if not(tf_winlikewidestring in target_info.flags) then
-               addstringdef('WideString',cwidechartype,true,-1)
-             else
-               begin
-                 { looks like a pwidechar (no idea about length location) }
-                 append_entry(DW_TAG_pointer_type,false,[]);
-                 append_labelentry_ref(DW_AT_type,def_dwarf_lab(cwidechartype));
-                 finish_entry;
-              end;
+             addstringdef('WideString',cwidechartype,true,-1)
            end;
         end;
       end;