* initialize the defid in trecorddef.create_global_internal as unique_id_str needs it

git-svn-id: trunk@43625 -

compiler/symdef.pas

@@ -4801,6 +4801,7 @@ implementation
           pname:=@n
         else
           begin
+            init_defid;
             name:='$InternalRec'+unique_id_str;
             pname:=@name;
           end;