Jelajahi Sumber

* always treat interrupt routines as far, so their address can be taken even in
{$F-} mode

git-svn-id: trunk@27591 -

nickysn 11 tahun lalu
induk
melakukan
9a44ab2fc2
1 mengubah file dengan 1 tambahan dan 1 penghapusan
  1. 1 1
      compiler/i8086/symcpu.pas

+ 1 - 1
compiler/i8086/symcpu.pas

@@ -263,7 +263,7 @@ implementation
         exit(true);
       if (procoptions*[po_classmethod,po_virtualmethod,po_abstractmethod,
                        po_finalmethod,po_staticmethod,po_overridingmethod,
-                       po_external,po_public])<>[] then
+                       po_external,po_public,po_interrupt])<>[] then
         exit(true);
       if is_methodpointer then
         exit(true);