Преглед изворни кода

* use voidcodepointertype to determine tprocvardef.size; ifdef i8086 removed

git-svn-id: trunk@27546 -
nickysn пре 11 година
родитељ
комит
37168c8625
1 измењених фајлова са 2 додато и 8 уклоњено
  1. 2 8
      compiler/symdef.pas

+ 2 - 8
compiler/symdef.pas

@@ -5604,19 +5604,13 @@ implementation
 
 
 
 
     function tprocvardef.size : asizeint;
     function tprocvardef.size : asizeint;
-      var
-        far_code_extra_bytes: integer = 0;
       begin
       begin
-{$ifdef i8086}
-         if po_far in procoptions then
-           far_code_extra_bytes:=2;
-{$endif i8086}
          if ((po_methodpointer in procoptions) or
          if ((po_methodpointer in procoptions) or
              is_nested_pd(self)) and
              is_nested_pd(self)) and
             not(po_addressonly in procoptions) then
             not(po_addressonly in procoptions) then
-           size:=sizeof(pint)+far_code_extra_bytes+voidpointertype.size
+           size:=voidcodepointertype.size+voidpointertype.size
          else
          else
-           size:=sizeof(pint)+far_code_extra_bytes;
+           size:=voidcodepointertype.size;
       end;
       end;