Pārlūkot izejas kodu

* use voidpointertype.size to obtain the current data (self) pointer size,
instead of checking the i8086 memory model manually in tprocvardef.size

git-svn-id: trunk@27313 -

nickysn 11 gadi atpakaļ
vecāks
revīzija
b1f69349f8
1 mainītis faili ar 1 papildinājumiem un 4 dzēšanām
  1. 1 4
      compiler/symdef.pas

+ 1 - 4
compiler/symdef.pas

@@ -5824,18 +5824,15 @@ implementation
     function tprocvardef.size : asizeint;
       var
         far_code_extra_bytes: integer = 0;
-        far_data_extra_bytes: integer = 0;
       begin
 {$ifdef i8086}
          if po_far in procoptions then
            far_code_extra_bytes:=2;
-         if current_settings.x86memorymodel in x86_far_data_models then
-           far_data_extra_bytes:=2;
 {$endif i8086}
          if ((po_methodpointer in procoptions) or
              is_nested_pd(self)) and
             not(po_addressonly in procoptions) then
-           size:=2*sizeof(pint)+far_code_extra_bytes+far_data_extra_bytes
+           size:=sizeof(pint)+far_code_extra_bytes+voidpointertype.size
          else
            size:=sizeof(pint)+far_code_extra_bytes;
       end;