2
0
Эх сурвалжийг харах

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

git-svn-id: trunk@4778 -
Almindor 19 жил өмнө
parent
commit
5d469b6847
1 өөрчлөгдсөн 4 нэмэгдсэн , 4 устгасан
  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;