Jelajahi Sumber

haiku: fix clib value in sysos.inc

git-svn-id: trunk@40828 -
Károly Balogh 6 tahun lalu
induk
melakukan
72ee37e03b
1 mengubah file dengan 3 tambahan dan 2 penghapusan
  1. 3 2
      rtl/haiku/sysos.inc

+ 3 - 2
rtl/haiku/sysos.inc

@@ -19,12 +19,13 @@
 {$error There's no support on Haiku for building without libc/libroot}
 {$endif}
 
-const clib = 'c';
+const
+  clib = 'root';
 
 type libcint=longint;
      plibcint=^libcint;
 
-function geterrnolocation: Plibcint; cdecl;external 'root' name '_errnop';
+function geterrnolocation: Plibcint; cdecl;external clib name '_errnop';
 
 function geterrno:libcint; [public, alias: 'FPC_SYS_GETERRNO'];