From 6475cd8e422b88e8d0fa3499195e6392bd3bbf12 Mon Sep 17 00:00:00 2001
From: Tomas Bzatek <tbzatek@redhat.com>
Date: Sun, 22 Dec 2024 23:39:42 +0100
Subject: Drop Kylix support

A piece of history, will be remembered.
---
 ULibc.pas | 27 ---------------------------
 1 file changed, 27 deletions(-)

(limited to 'ULibc.pas')

diff --git a/ULibc.pas b/ULibc.pas
index 3c2a615..f7fa32f 100644
--- a/ULibc.pas
+++ b/ULibc.pas
@@ -30,12 +30,6 @@ const GLIBC_LIB = 'libc.so.6';
       PTHREAD_LIB = 'libpthread.so.0';
 
 type
-{$IFDEF KYLIX}
-   DWORD = Cardinal;
-   QWORD = Int64;
-   LongWord = LongInt;
-{$ENDIF}
-
    cUShort = Word;
    cInt = LongInt;
    cuInt = LongWord;
@@ -666,13 +660,8 @@ const
    _MKNOD_VER_SVR4 = 2;
    _MKNOD_VER = _MKNOD_VER_LINUX;
 
-{$IFNDEF KYLIX}
 function stat64(const afile: PChar; buf: Pstat64): longint; cdecl; external GLIBC_LIB name 'stat64';
 function lstat64(const path: PChar; buf: Pstat64): longint; cdecl; external GLIBC_LIB name 'lstat64';
-{$ELSE}
-function stat64(const afile: PChar; buf: Pstat64): longint;
-function lstat64(const path: PChar; buf: Pstat64): longint;
-{$ENDIF}
 
 function statfs64(const path: PChar; buf: Pstatfs64): longint; cdecl; external GLIBC_LIB name 'statfs64';
 
@@ -932,22 +921,6 @@ implementation
 uses SysUtils;
 {$ENDIF}
 
-
-{$IFDEF KYLIX}
-function glibc__xstat64(ver: integer; const afile: PChar; buf: Pstat64): longint; cdecl; external GLIBC_LIB name '__xstat64';
-function glibc__lxstat64(ver: integer; const path: PChar; buf: Pstat64): longint; cdecl; external GLIBC_LIB name '__lxstat64';
-
-function stat64(const afile: PChar; buf: Pstat64): longint;
-begin
-  Result := glibc__xstat64(_STAT_VER, afile, buf);
-end;
-
-function lstat64(const path: PChar; buf: Pstat64): longint;
-begin
-  Result := glibc__lxstat64(_STAT_VER, path, buf);
-end;
-{$ENDIF}
-
 function errno : error_t;
 begin
   Result := __errno_location()^;
-- 
cgit v1.2.3