소스 검색

* fixed missing cdecl procedure directive

Jonas Maebe 21 년 전
부모
커밋
81adfcccd8
1개의 변경된 파일5개의 추가작업 그리고 2개의 파일을 삭제
  1. 5 2
      rtl/unix/bunxovl.inc

+ 5 - 2
rtl/unix/bunxovl.inc

@@ -144,7 +144,7 @@ begin
 end;
 
 {$ifdef FPC_USE_LIBC} // can't remember why this is the case. Might be legacy.
-function xFpread(fd: cint; buf: pchar; nbytes : size_t): ssize_t; external clib name 'read';
+function xFpread(fd: cint; buf: pchar; nbytes : size_t): ssize_t; cdecl; external clib name 'read';
 {$else}
 function xFpread(fd: cint; buf: pchar; nbytes : size_t): ssize_t; external name 'FPC_SYSC_READ';
 {$endif}
@@ -331,7 +331,10 @@ end;
 
 {
  $Log$
- Revision 1.10  2004-03-28 19:36:19  marco
+ Revision 1.11  2004-06-01 10:30:03  jonas
+   * fixed missing cdecl procedure directive
+
+ Revision 1.10  2004/03/28 19:36:19  marco
   * fix for recursive fpc.exe ?
 
  Revision 1.9  2004/01/04 21:04:08  jonas