Kaynağa Gözat

* cvar needs to be external.

git-svn-id: trunk@13267 -
marco 16 yıl önce
ebeveyn
işleme
c00204c1b3
1 değiştirilmiş dosya ile 1 ekleme ve 1 silme
  1. 1 1
      ide/fpmingw.pas

+ 1 - 1
ide/fpmingw.pas

@@ -34,7 +34,7 @@ uses gdbint; // force dependancies that hopefully make it execute at the right m
 Type
 Type
   TAtexitFunction = function(p:TCFUnction):longint cdecl;
   TAtexitFunction = function(p:TCFUnction):longint cdecl;
 
 
-var _imp__atexit : TAtExitFunction; Cvar;  // "true" atexit in mingw libs.
+var _imp__atexit : TAtExitFunction; Cvar; external;  // "true" atexit in mingw libs.
 
 
 function atexit(p:TCFunction):longint;cdecl; [public, alias : '_atexit'];
 function atexit(p:TCFunction):longint;cdecl; [public, alias : '_atexit'];