Explorar el Código

* changed "directives" macro to "extdecl" to be more lazarus-friendly

git-svn-id: trunk@4778 -
Almindor hace 19 años
padre
commit
5d469b6847
Se han modificado 1 ficheros con 4 adiciones y 4 borrados
  1. 4 4
      rtl/bsd/bsd.pas

+ 4 - 4
rtl/bsd/bsd.pas

@@ -21,9 +21,9 @@ Unit BSD;
   {$Inline On}
   {$Macro On}
   {$ifdef FPC_USE_LIBC}
-  {$define directives:=cdecl; external 'c';}
+  {$define extdecl:=cdecl; external 'c'}
   {$else}
-  {$define directives:=inline;}
+  {$define extdecl:=inline}
   {$endif}
 {$ENDIF}
 
@@ -101,10 +101,10 @@ type
     uData  : Pointer;    { opaque user data identifier }
   end;
 
-function kqueue: cint; directives
+function kqueue: cint; extdecl;
   
 function kevent(kq: cint; ChangeList: PKEvent; nChanged: cint;
-                  EventList: PKevent; nEvents: cint; Timeout: PTimeSpec): cint; directives
+                  EventList: PKevent; nEvents: cint; Timeout: PTimeSpec): cint; extdecl;
 
 procedure EV_SET(kevp: PKEvent; const aIdent: cuint; const aFilter: cshort;
                    const aFlags: cushort; const aFFlags: cuint;